Ja soweit geht das nur ich habe jetzt sozusagen 2 Images. Man sieht das Bild in normaler Größe und in klein..
Muss ich das Image löschen und dann wieder erzeugen oder wie läuft das ab?
Delphi-Quellcode:
bmp := TBitmap.Create;
bmp := Form1.imgZeichenflaeche.Picture.Bitmap;
with Form1.imgZeichenflaeche do begin
Width := StrToInt(edBreite.Text);
Height := StrToInt(edHoehe.Text);
Canvas.StretchDraw(Rect(0,0,StrToInt(edBreite.Text),StrToInt(edHoehe.Text)), bmp);
end;