Назначение процедуры действию динамически созданного компонента

← →
smus © (2006-01-29 17:36) [0]

Здравствуйте. Допустим я динамически, через массив, создал компоненты, например Label"ы, теперь мне нужно, чтоб по клику на определённый Label исполнялась процедура с определённым параметром. Подскажите, как это сделать? Вот мой код, там где вопрос, куда я вставлял название процедуры(только не бейте меня:)) - выдавало incompatyble types. Спасибо.
var
Lbl : array of TLabel;
I:integer;
for I := Low(Lbl) to High(Lbl)
do begin
Lbl[I] := TLabel.Create(self);
Lbl[I].Parent := ScrollBox1;
...
Lbl[I].OnClick := ?
end;

← →
Kerk © (2006-01-29 17:37) [1]

Процедура-обработчик должна быть методом класса.
Вставь ее например в private у формы.

← →
smus © (2006-01-29 17:42) [2]

То же: [Error]Incompatyble types:"TNotifyEvent" and "procedure, untyped pointer or untyped parameter".

← →
Kerk © (2006-01-29 18:00) [3]

smus © (29.01.06 17:42) [2]

Покажи код?
Процедуру-обработчик правильно задаешь?

procedure ButtonOnClick(Sender: TObject) ?

← →
VirEx © (2006-01-29 18:12) [4]

> [3] Kerk © (29.01.06 18:00)

ты же под винды не программишь и даже не хочешь)) всё перл да перл))

VirEx © (29.01.06 18:12) [4]
ты же под винды не программишь и даже не хочешь))

Дык а кушать хочется :)
Другие скиллзы пока не готовы :)

procedure ButtonOnClick(Sender: TObject);
****

> Lbl[I].OnClick := ButtonOnClick

Назначение процедуры действию динамически созданного компонента Найти похожие ветки