JPEG komprimieren - kleiner als 100kb - wie?

[scp]

Zitat von Yheeky:

Wie geht das "auch" denn? Ich wollte ne and bzw. or Verknüpfung erstellen aber da meinte er "end erwartet".

Wie beim Rechnen, mit Klammern:

Delphi-Quellcode:

   Dec(Kompression);
until (GetFileSize(JPGDateiname) < 100) or (Kompression < 1);