Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
FLL creation problem
Message
De
18/11/2011 15:54:24
 
 
À
18/11/2011 15:36:47
Emerson Reed
Folhamatic Tecnologia Em Sistemas
Americana - São Paulo, Brésil
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Versions des environnements
Visual FoxPro:
VFP 9
OS:
Windows 7
Divers
Thread ID:
01529243
Message ID:
01529260
Vues:
54
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.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform