Eine Projektarbeit

[Felix Stein]

vielleicht damit es nicht so verwirrend ist:


procedure TForm1.Image1Click(Sender: TObject);
begin
label1.caption:='Image1 ist gedrückt';
picture1.LoadFromFile('Unbenannt1.png');
Image1.Picture:=picture1;
end;