TImage Bitmap vergrößern

[sk0r]

Hallo,

ich habe mal eine Frage:

und zwar möchte ich gerne im Resize Event meiner Form die größe meines Bitmaps von meiner TImage Instanz dynamisch verändern.

Dazu habe ich folgende Code in der Form1 Resize Methode implementiert (diesen durch Google Suche gefunden).

Delphi-Quellcode:

procedure TForm1.FormResize(Sender: TObject);
begin
  Image1.Width := ClientWidth;
  Image1.Height := ClientHeight;
  Image1.Picture.Bitmap.Width := Image1.Width;
  Image1.Picture.Bitmap.Height := Image1.Height;
end;

Leider ist das Ergebnis nicht wie gewünscht:
http://www.abload.de/img/resizes7qln.png

Ich möchte ja, dass die Bitmap in diesem Beispiel Fall immer die ganze Form bedeckt.

Durch den Button Klick gebe ich die Abmessungen meiner Form, des TImages und des TImage.Picture.Bitmap aus.

Was habe ich hier falsch gemacht bzw. vergessen?

Vielen Dank und MfG

[freeway]

unter Eigenschaften "Stretch" auf true setzen

[sk0r]

Zitat:

Zitat von freeway (Beitrag 1206636)

unter Eigenschaften "Stretch" auf true setzen

Danke, das funktioniert.