[igordth]

Вообщем проблема такая в методе TForm1.FormCreate я создаю изображения их там 52 штуки, каждому изображению присваиваю обработчик Image.OnClick:=ImageClick, мне нужно чтобы в Edit по клику на определенном изображении выводились данные связанные с именем image по которому кликнули.
Имена присваивает Delphi, на форме других изображений нет.
вообщем что-то вроде этого:

Код:

1 2 3 4

procedure TForm1.ImageClick(Sender: TObject); begin Edit1.Text:=this.image.name; end;

подскажите как это сделать?

[Aristarh Dark]

Код:

1 2 3 4

procedure TForm1.ImageClick(Sender: TObject); begin Edit1.Text:=(Sender as TImage).name; end;

[M.A.D.M.A.N.]

Sender - отправитель, на него завязывайся.