Entwickler-Ecke

Multimedia / Grafik - jpg verkleinerm


GBoris - Sa 01.02.03 11:13
Titel: jpg verkleinerm
Hallo !

Wie kann ich ein jpg in Auflösung und Farbtiefer "schrumpfen" ?
Hat da schon jemand ein Proggi geschrieben ?

cu
Boris


Andreas Pfau - Sa 01.02.03 15:58
Du kannst die Farbtiefe mit der Property Pixelformat festlegen. Die Auflösung änderst du z.B. so:

Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
 
var
  J: TJpegImage;
  B: TBitmap;
begin
  J := TJpegImage.Create;
  J.LoadFromFile('C:\Stuff\Delphi.jpg');
  B := TBitmap.Create;
  B.Width := 100;
  B.Height := 100;
  B.Canvas.StretchDraw(B.Canvas.ClipRect, J);
  J.Assign(B);

  // Jetzt kannst du damit machen was du willst, z.B. speichern

  B.Free;
  J.Free;


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!