Überprüfen ob ein bestimmter Pfad ein JPEG ist?

[cruso]

Hi!

Ich müsste wissen, wie ich überprüfen kann, ob ein bestimmter Pfad (also der Pfad eines Bildes) ein JPG/JPEG ist um danach bestimmte Maßnahmen einzuleiten. Wie kann ich nun überprüfen ob es sich bei einem bestimmten Pfad um ein JPG-Bild handelt?

MfG
Cruso

[arbu man]

if extractfileext(pfad)='.jpg' {oder jpg} then ...

[himitsu]

Also, da man ja die Dateiendung beliebig festlegen/ändern kann und somit kein wirklicher Zusammenhang zwischen Dateinamen und Inhalt vorhanden ist,
würde ich ich einfach die Datei laden und nachsehn was passiert.

z.B. (ist natürlich nur ein Vorschlag und kein wirklich funktionierender Code )

Delphi-Quellcode:

Var J: TJpeg;

Try
  J := TJpeg.Create;
  Try
    J.LoadFile(Pfad);
    Ergebnis := True;
  Except
    Ergebnis := False;
  End;
Finally
  J.Free;
End;
If Ergebnis Then {Ja, es ist ein JPeg}