Einzelnen Beitrag anzeigen

Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#4

Re: name von Timage herausfinden

  Alt 27. Jun 2004, 19:22
Delphi-Quellcode:
procedure TForm1.ImageOnClick(Sender: TObject);
var LImage: TImage;
begin
  if Sender = Timage then
  begin
    LImage := TImage(Sender);
    showmessage(LImage.Name);
  end;
end;
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat