Einzelnen Beitrag anzeigen

Praxist

Registriert seit: 6. Jul 2008
39 Beiträge
 
Delphi 7 Professional
 
#1

Image Resize ohne verzerung ?

  Alt 3. Aug 2008, 13:46
hallo

ich habe immer noch nicht geschafft mein Image breiter oder schmaler zu machen ohne das Bild in
Image verzerren zu müssen.
ich möchte einfach das Bild von einer Seite erweitern
Die Erweiterung soll z.B. mit weissem Hintergrund wie im Bild
Was schlagt Ihr vor ?

ich kann nur die Erweiterung von rechts und von unten
wie kann ich das Bild auch von links und von oben erweitern?
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
image1.autosize:=true;
image1.Stretch:=false;
Image1.Picture.Bitmap.Width := Image1.Picture.Bitmap.width+50;
Image1.Picture.Bitmap.height := Image1.Picture.Bitmap.height+50;
end;
Miniaturansicht angehängter Grafiken
image1_resize_838.jpg  
  Mit Zitat antworten Zitat