Registriert seit: 7. Jan 2003
Ort: Menden
192 Beiträge
Delphi 7 Enterprise
|
Re: wie kann man das vereinfachen?
13. Feb 2004, 15:37
Delphi-Quellcode:
procedure TForm1.ImageClick(Sender: TObject);
begin
if Sender is TImage then
TImage(Sender).Picture.LoadFromFile(...);
end;
TObject kennt kein Picture....
Christian Killing for peace is like fucking for virginity
Nightshade
|