A) See here


2004-09-25 09:53:48 PM
delphi131
Here's a website with good info on how to do this efficiently:
www.awaresystems.be/techtalks/001_format_from_data.html
Kind regards,
Nils Haeck
www.simdesign.nl
"Byungho Jeon" <XXXX@XXXXX.COM>writes
Quote
I want to know how can I detect image can loads!! only filename!!

here is bad solution.. It loads every files!! Bad performance!!
Is there exists simple solution?

function SupportImage(Filename: string): Boolean;
var
P: TPicture;
begin
P := TPicture.Create;
try try
P.LoadFromFile(Filename);
Result := True;
except
Result := False;
end;
finally
P.Free;
end;
end;

Although TFileFormatsList.FindExt( MyExtension ) function exists In
Graphics.pas unit, TFileFormatsList is single instance varable!! (Can't
access other unit!!)

Can you help me?

Byungho