Einzelnen Beitrag anzeigen

Quick_silver

Registriert seit: 2. Jan 2003
78 Beiträge
 
Delphi 6 Enterprise
 
#1

1 Procedur für um viele bilder Unsichtbar zu machen?

  Alt 15. Jan 2003, 18:30
Ich will das man über ein bild mit der Maus kommt und es verschwindet. Das will ich mit ca. 80 aber ich will nicht 80 Prozeduren.

Code:
procedure TForm1.weg(Sender: TObject; Shift: TShiftState; X, Y: Integer);
begin
Image1.visible:=false;
end;
So geht Image1 Weg.

aber kann ich das Image1 nicht durch ne Variable ersetzen die sich einstellt sobald man über Image1,Image2,... mit der Maus geht so das ich nur diese Prozedur habe?
  Mit Zitat antworten Zitat