Delphi-Quellcode:
// z.B. so:
procedure TForm1.Prozedur;
begin
Image1.Picture.LoadFromFile(...);
end;
// oder so:
procedure Prozedur(Image: TImage);
begin
Image.Picture.LoadFromFile(...);
end;
// Wenn du's unbedingt selbst createn willst:
procedure TForm1.Prozedur(
out Image: TImage);
begin
Image := TImage.Create(self);
Image.Picture.LoadFromFile(...);
end;
// oder...
function TForm1.Funktion: TImage;
var
Image: TImage;
begin
Image := TImage.Create(self);
Image.Picture.LoadFromFile(...);
Result := Image;
// oder im alten TP-Style:
Funktion := Image;
end;
// und es gibt noch hunderte mehr Möglichkeiten............
Was ist daran jetzt so schwer?
