[Alan85]

procedure OnClik(Sender: TObject); »

b.OnClick:=OnClik; »

Процедура тут типизирована, т.е. должно обязательно иметь формат

procedure MyName (Sender : TObject);

Должны совпадать количество параметров и их типы . Здесь это параметр типа TObject;