Extract associated icon from a file

[pluis]

The problem I have is when I try to obtain (and to save into a bmp image) the associated icon from a file like a word documment, image file, ...
I have the solution for Visual Basic but I have problems when I try to use functions in Foxpro like Extractassociatedicon or Extracticon cause of they need as a parameter the handle of instance for the main foxpro window. Is there somebody to know the solution? Thanks.

Pedro Luis R.
Spain

 

[Walid]

Hi my friend

FUNCTION GetMainWindH
llRemove=.F.
IF !("FOXTOOLS" $ SET('LIBRARY '))
SET LIBRARY TO FOXTOOLS.FLL ADDITIVE
llRemove=.T.
ENDIF
nhMainWind=MainHwnd( )

IF llRemove
RELEASE LIBRARY LibraryName
ENDIF
RETURN nhMainWind
Walid Magd
Engwam@Hotmail.com

 

[pluis]

First of all, Thank you very much for your fast answer.

Yes, ... with this function I can obtain the handle of the main foxpro windows, but not the handle of the instance (I can obtain it with the property hinstance in Visual Basic, but in foxpro...??)

Well, I go on with the doubt... but really thanks Wallid!