// die Header-Datei jpeg.hpp muss eingebunden sein void __fastcall TForm1::Button1Click(TObject *Sender) { TJPEGImage *jpg = new TJPEGImage(); try { jpg->LoadFromFile("c:Tempsq15.jpg"); jpg->CompressionQuality = 1; // 1..100 jpg->DIBNeeded(); jpg->Compress(); jpg->SaveToFile("c:Tempcompressed.jpg"); } catch ( ... ) { ShowMessage("Compression error."); } delete jpg; }
Kategorien
-
Neueste Beiträge
- [SAP Gateway] Daten versenden über einen eventbasierten Aufruf einer OData-Funktion
- [ABAP] SE80: Tricks für den ABAP-Editor
- [SAP] Kurz- und Langtexte in Objekten suchen
- [SAP] Buchungskreis, Werk, Bewertungskreis, Kostenrechnungskreis, Einkaufsorganisation, Lagerort
- [ABAP] SAP-Workdir ermitteln
- [ABAP] SELECT-OPTIONS: Möglichkeiten, um Variablen zu definieren
- Bluttest erkennt Demenz bis zu 15 Jahre vor Diagnose
- Herpesviren können Alzheimer-Risiko verdoppeln
- [SAP EWM] Dokumentation zu SAP Extended Warehouse Management (SAP EWM)
- [SAP] Disposition / MRP