Delphi-PRAXiS - Delphi Bei TImage OnClick Event auf das geklickte Image schliessen.

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi Bei TImage OnClick Event auf das geklickte Image schliessen. (https://www.delphipraxis.net/102473-bei-timage-onclick-event-auf-das-geklickte-image-schliessen.html)

wtf123

29. Okt 2007 16:45

Bei TImage OnClick Event auf das geklickte Image schliessen.

Hallo,

ich habe mehrere TImages so erstellt:
var
bilder: array[0..zahl - 1] of TImage;
x: integer;
begin
for x := 0 to high(bilder) do begin
bilder[x] := TImage.create(self);
bilder[x].parent := self;
bilder[x].autosize := true;
end;

Wie kann ich jetzt, wenn alle Bilder das selbe OnClick Event haben,
auf das Image schliessen auf welches gelickt wurde?

Danke

Neutral General

29. Okt 2007 16:47

Re: Bei TImage OnClick Event auf das geklickte Image schlies

Hi,

Ganz einfach: Im Parameter Sender bekommst du das Image geliefert das angeklickt wurde ;)

Delphi-Quellcode:

			procedure TForm1.ImageClick(Sender: TObject);

begin

  TImage(Sender).Visible := false;

end;

Gruß
Neutral General

wtf123

29. Okt 2007 18:48

Re: Bei TImage OnClick Event auf das geklickte Image schlies

Funzt! Vielen Dank!

Deep-Sea

30. Okt 2007 07:22

Re: Bei TImage OnClick Event auf das geklickte Image schlies

Zitat:

Zitat von wtf123

[...] Wie kann ich jetzt, wenn alle Bilder das selbe OnClick Event haben,
auf das Image schliessen auf welches gelickt wurde?

Was meinst du mit "schließen"? :shock: ...
PS: Verwende lieber eine TComponentList (oder ähnliches) anstatt ein Array :wink:

Alle Zeitangaben in WEZ +1. Es ist jetzt 08:44 Uhr.