Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: TBitmap verkleinern

    Delphi
    by bitsetter, 14. Nov 2007
  ...
  bmpGross.Canvas.StretchDraw(Rect(0,0,100,100), bmpGross);
  
  bmpGross.Width:= 100;
  bmpGross.Height:= 100;
  
  bmpGross.SaveToFile(ExtractFilePath(ParamStr(0)) + 'BildNeu.bmp');
  bmpGross.Free;
  bmpKlein.Free;
  end;
• Forum: Multimedia

  Re: TBitmap verkleinern

    Delphi
    by bitsetter, 14. Nov 2007
  Hallo,
  
  oder so:
  var
  Bild: TBitmap;
  begin
  Bild:= TBitmap.Create;
  try
  Bild.Width:= 100;
  Bild.Height:= 100;