wie ändere ich die Abmessungen eines Bildes?

[himitsu]

Uups, Stimmt ja.

Dann halt doch BitMaps:

Delphi-Quellcode:

Procedure ZoomBitMap(Filename: String);
  Var BM, BM2: TBitMap;

  Begin
    BM := TBitMap.Create;
    BM.LoadFromFile(Filename);
    BM2 := TBitMap.Create;
    BM2.Width := 800;
    BM2.Height := 600;
    BM2.PixelFormat := BM.PixelFormat;
    (* Größe des BitMap's ändern *)
    BM2.Canvas.StretchDraw(Rect(0, 0, 799, 599), BM);
    BM2.SaveToFile(Filename);
    BM2.Free;
    BM.Free;
  End;

(es gibt zwar noch 'ne Möglichkeit es doch mit nur einem BitMap zu machen, da ist aber das hier einfacher)


http://www.FrankNStein.de/Smiley-Kuss.gif * * http://www.FrankNStein.de/Smiley-Spinne.gif * * * http://www.FrankNStein.de/Smiley-Winken.gif