CenterMsgs()
Posted: Sun Dec 22, 2019 2:05 pm
If on start of the app CenterMsgs() are using, then freezes the programm after call a msgrun() with title!
www.FiveTechSoft.com
https://fivetechsoft.com/forums/
Code: Select all
MsgRun( cCaption, cTitle, bAction, oWndParent )
Please make the following correction tobyte-one wrote:If on start of the app CenterMsgs() are using, then freezes the programm after call a msgrun() with title!
Code: Select all
IF cTitle == NIL
DEFINE DIALOG oDlg ;
FROM 0,0 TO 3, Len( cCaption ) + 4 ;
STYLE nOr( DS_MODALFRAME, WS_POPUP )
ELSE
DEFINE DIALOG oDlg ;
FROM 0,0 TO 4, Max( Len( cCaption ), Len( cTitle ) ) + 4 ;
TITLE cTitle ;
STYLE DS_MODALFRAME
ENDIF
Code: Select all
IF cTitle == NIL
DEFINE DIALOG oDlg ;
FROM 0,0 TO 3, Len( cCaption ) + 4 ;
STYLE nOr( DS_MODALFRAME, WS_POPUP )
ELSE
DEFINE DIALOG oDlg ;
FROM 0,0 TO 4, Max( Len( cCaption ), Len( cTitle ) ) + 4 + 2 ;
TITLE cTitle
ENDIF