|
Registriert seit: 16. Jan 2004
364 Beiträge
|
Re: *.jpeg Datei erstellen
2. Feb 2004, 18:04
Delphi-Quellcode:
buf: TJPEGImage;
buf.Assign(Bitmap);
buf.CompressionQuality := 50;
buf.ProgressiveEncoding := true;
buf.Compress;
buf.SaveToFile('bild.jpg');
[edit=r_kerber]Delphi-Tags eingefügt. Mfg, r_kerber[/edit]
Power is nothing without TControl
|