Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
FLL creation problem
Message
 
To
18/11/2011 15:36:47
Emerson Reed
Folhamatic Tecnologia Em Sistemas
Americana - São Paulo, Brazil
General information
Forum:
Visual FoxPro
Category:
Other
Environment versions
Visual FoxPro:
VFP 9
OS:
Windows 7
Miscellaneous
Thread ID:
01529243
Message ID:
01529260
Views:
52
This message has been marked as a message which has helped to the initial question of the thread.
>Hi Borislav.
>Here is the full code:
>
>VC++
>
>#include "stdafx.h"
>#include "pro_ext.h"
>
>// http://msdn.microsoft.com/en-us/library/windows/desktop/ms679347%28v=vs.85%29.aspx
>void vfpFlashWindowEx (ParamBlk *parm)
>{
> HWND hWnd;
> if (parm->p[0].val.ev_long==0)
> {
> hWnd = _WhToHwnd(_WMainWindow());
> }
> else
> {
> hWnd = _WhToHwnd(parm->p[0].val.ev_long);
> }
>
> FLASHWINFO info;
> info.cbSize = sizeof(info);
> info.hwnd = hWnd;
> info.dwFlags = FLASHW_ALL;
> info.dwTimeout = 0;
> info.uCount = parm->p[1].val.ev_long;
>
> _RetInt(FlashWindowEx(&info), 10);
>}
>
>FoxInfo myFoxInfo[] =
>{
> {"VFPFLASHWINDOWEX", (FPFI) vfpFlashWindowEx, 2, "I,I"},
>};
>
>extern "C" FoxTable _FoxTable =
>{
> (FoxTable *)0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo
>};
>
>VFP:
>
>Set Library To VisualFoxProFLL.fll
>
>Local lnHwnd
>m.lnHwnd = 0
>Try
> Messagebox(vfpFlashWindowEx(m.lnHwnd,3))
>Catch
> Throw
>Finally
> Release Library VisualFoxProFLL.fll
>Endtry
>
>Return
>
>I don't know how to debug... : (




To Debug:
1. Build an VFP EXE just with your code:
Set Library To VisualFoxProFLL.fll

Local lnHwnd
m.lnHwnd = 0
Try
   Messagebox(vfpFlashWindowEx(m.lnHwnd,3))
Catch
   Throw
Finally
   Release Library VisualFoxProFLL.fll
Endtry

Return
Then in VS right click on the project (not on solution) in Solution Explorer.
Expand DEBUGING node.
In COMMAND choose your VFP EXE file.
In WORKING DIRECTORY set it to where your EXE and FLL are placed.
Then press F5 :-)
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform