FiveTech Software tech support forums

... 999,999,999,999.99" SIZE 250,60 PIXEL FONT oFont OF oDlgSegPan CENTER ;
COLOR RGB(247,144,39),cColorFondo


ENDIF

ACTIVATE DIALOG oDlgSegPan NOMODAL ON INIT ( FW_GetMonitor( nNroPan ):Center( oDlgSegPan ) , creaBrowseLec(vConBrw,oGrpDet,nAncPan) )

MSGWAIT("Activando segunda pantalla","Russoft ...

... the first window created is MODAL and all other windows created are NONMODAL.
All dialogs are MODAL by default and dialogs activated with NOMODAL clause are NONMODAL.

Statements after ACTIVATE command of MODAL Window (i.e., the 1st window, i.e., the MainWindow) and all MODAL dialogs are ...

... Activation of ALL other windows are NONMODAL invariably.

Dialogs:
All dialogs are activated as MODAL by default, except when we activate with NOMODAL clause.

MODAL ACTIVATION

ACTIVATE WINDOW oMainWnd / ACTIVATE DIALOG oDlg
<CleanupCode:closing tables,releasing resources,etc.>
return nil ...

... BORDER
REDEFINE BTNBMP oBtn ID 106 OF oDlg2 RESOURCE "no2" ; // NO
ACTION oDlg2:End() ;
TOOLTIP "Cancelar" BORDER
ACTIVATE DIALOG oDlg2 NOMODAL
oBrw:setfocus()
oBrw:Refresh()
return nil

*--------------------------------------
FUNCTION V0100B1(oBrw ...

... BORDER
REDEFINE BTNBMP oBtn ID 106 OF oDlg2 RESOURCE "no2" ; // NO
ACTION oDlg2:End() ;
TOOLTIP "Cancelar" BORDER
ACTIVATE DIALOG oDlg2 NOMODAL
return nil

*--------------------------------------
FUNCTION V0100B1(oBrw)
*--------------------------------------
cSql := "SELECT * FROM mae_cli ...

Sorry, it's not my decision.

EMG

I not understood, explain us
I don't want to advertise because James Bott doesn't need it but system 'Bott is usefull, although I have not yet understood all the possibilities,
for example for a Daniel Garcia class ( tplan) there are big problems, but for all ...

Sorry, it's not my decision.

EMG

You can also avoid these kinds of problems by using database objects. Every database object creates its own unique workarea and handles it internally. Thus you never have to deal with workareas.

you are newbie ?
and since when are you a newbie?
I really tried to understand and until you created the test sample I kept understanding that what I understood was not the problem you said you had because I really didn't think I could make a beginner mistake, I didn't believe it possible and now ...

Ok, I made a newbie mistake...

It works!

Many many thanks!

EMG

Enrico, I tested your sample
Please use clause NEW when you Open dbf

Please look my sample

( Now I will test your example. )

... oDlg, oBrw USE CUSTOMER ALIAS &#40; CGETNEWALIAS&#40;&#41; &#41; SHARED DEFINE DIALOG oDlg @ 0, 0 XBROWSE oBrw ALIAS ALIAS&#40;&#41; oBrw:CreateFromCode&#40;&#41; ACTIVATE DIALOG oDlg; ON INIT oBrw:AdjClient&#40;&#41;; VALID &#40; DBCLOSEAREA&#40; oBrw:cAlias &#41;, .T. &#41;; NOMODAL RETURN NIL

EMG

Please, open the same table (with different alias) in both browses. Then put, in both dialogs, a button in the buttonbar with this action

ACTION MSGINFO( FIELD -> first )

From which workarea (1 or 2) it will read the field value?

EMG

Dear Enrico
I do not think I fully understand the problem that it raises. Can you better explain to me what you need
Here are two non-modal dialogs with xbrowse