|
From: Itamar M. L. J. L. <ita...@gm...> - 2015-01-12 22:48:13
|
Hi!
>This strange behavior appears not because of DS_CENTER, but because other necessary styles (WS_POPUP) are not present.
It is an unfortunate bug. Because there's no way a simple users know
this, it took me a few days with this problem to isolate it. Of the
Hwgui should automatically detect and add the correct syntax or at
least warn that something is missing.
If possible add a "How to", of what clause we use with DIALOG and STYLE
Anyway thanks for the clear up the problem.
Best regards,
Itamar M. Lins Jr.
2015-01-11 13:09 GMT-03:00 Itamar M. Lins Jr. Lins <ita...@gm...>:
> It was difficult to create a sample.
> But I found and isolate the problem
> This problem only occurs if I use clause STYLE DS_CENTER
>
>
> #include "hwgui.ch"
>
> Function main
>
> LOCAL oFormMain
> INIT WINDOW oFormMain MAIN AT 0,0 SIZE 800,600
>
> oFormMain:bActivate := {|| fInit(oFormMain) }
> oFormMain:Activate()
>
>
> Function fInit(oFormMain)
> LOCAL oDlg,oGet,cGet:=" ", cPhantom
> //hwg_msginfo("ok") if I active this not occurs problem same I use
> DS_CENTER!!
>
> INIT DIALOG oDlg AT 0,0 SIZE 400,300 STYLE DS_CENTER
>
> @ 010,090 say "None:" SIZE 65,15
> @ 010,110 get oGet VAR cGet PICTURE "!" SIZE 100,30 Valid
> {||fFunc_A(cGet)} //Press "E" now DIALOG show twice
>
> @ 030,120 get oPhantom var cPhantom size 0,0
>
> oDlg:Activate()
>
> Function fFunc_A(cGet)
>
> If cGet == "E"
> hwg_MsgStop("Error")
> return .F.
> Else
> hwg_EndDialog()
> ENDIF
> return .T.
>
>
|