Hoch- und Querformat von jpg-Bildern bestimmen

lemmond1976 · Beiträge: 66

Hallo, weiß jemand, mit welcher Funktion man das Format von jpg-files bestimmen kann ?
Für eine Antwort wäre ich sehr dankbar.

Gruss
Gunnar

Andreas Pfau · Beiträge: 997

Wenn ich das richtig verstanden habe, willst du wissen, ob ein TJpegImage im Hoch- oder Querformat vorliegt? Ganz einfach, wenn das Image breiter als hoch ist, dann ist's quer.

markieren

Quelltext

1:
2:
3:
4:

function Querformat(Image: TJpegImage): Boolean;
begin
  Result := Image.Width > Image.Height;
end;

_________________
Life is a bad adventure, but the graphic is really good!

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme