Zitat von
Hawkeye219:
Du kannst die Eigenschaft
Graphic überprüfen:
Delphi-Quellcode:
if (Image1.Picture.Graphic = nil) then
// kein Bild enthalten
else
if (Image1.Picture.Graphic is TBitmap) then
// bitmap
else
if (Image1.Picture.Graphic is TJPEGImage) then
// jpg
else
...
Gruß Hawkeye
Sicher, dass das so geht ?
Bei der Überprüfung auf ein TBitmap kommt diese Fehlermeldung:
Zitat:
[Fehler] Unit1.pas(158): Operator ist auf diesen Operandentyp nicht anwendbar