DECLARE SHORT DrawIcon IN Win32API; INTEGER Hdc, INTEGER X, INTEGER Y, INTEGER hIcon DECLARE INTEGER ExtractAssociatedIcon IN Shell32; INTEGER hInst, STRING @lpIconPath, INTEGER @lpiIcon DECLARE INTEGER GetClassLong IN Win32API; INTEGER hWnd, INTEGER nIndex DECLARE INTEGER GetDC IN Win32API; INTEGER hWnd DECLARE INTEGER ReleaseDC IN Win32API; INTEGER hwnd, INTEGER hdc PROCEDURE DisplayIcon LPARAMETER pcfilename LOCAL lnHdc, lnHWnd, lnHIcon, lnHInstance, lniconindex lniconindex = 0 * Foxtools required here lnHWnd = _WHToHwnd(_WFindTitl(ThisForm.Caption)) lnHdc = GetDC(lnHWnd) lnHinstance = GetClassLong(lnHWnd, GCL_HMODULE) && GCL_HMODULE = -16 HIcon = ExtractAssociatedIcon(lnHinstance, @pcfilename, @lniconindex) UDraw = DrawIcon(lnHdc, 0, 0, lnHIcon) = ReleaseDC(lnHWnd, lnHdc) RETURN ENDPROCNote, however, that it's not very stable. You'll need a timer to monitor the window status. Further, it's limited to displaying 32x32 icons.