- Code: Select all Expand view
DEFINE DIALOG oWdlg1 BRUSH oBrush RESOURCE "WOMAINw" TRANSPARENT OF oWdlg TITLE cTitle
REDEFINE FOLDEREX oFld ID 356 OF oWdlg1 ;
PROMPT " General ", " Parts ", " Labor ", " Recommend ", " Totals ", " Inspect ", " Costing ", " Services ", " Attachments " ;
DIALOGS "WOGENw", "WOPARw", "WOLABw", "WORECw", "WOTOTw", "WOINSw", "WOCSTw", "WOSVCw", "WOATTw" ;
ON CHANGE ( oCurrentOrder:FolderCheck( oFld, oWorkParts, oWorkPartsr, oWorkLabor, oWorkLaborr, ;
oWorkNeeds, oWorkNeedsr ), oWdlg1:update() ) ;
ROUND 5 TRANSPARENT
oFld:aGradUnSel := { { 0.50,16776960,16777215 }, { 0.50,16777215,16776960 } }
oFld:aGradOverUnSel := { { 0.25, nRGB( 100, 149, 237 ), nRGB( 100, 149, 237 ) },{ 0.75, 16777215,16776960 } }
And the .rc:
- Code: Select all Expand view
WOMAINw DIALOG 0, 0, 850, 460
STYLE WS_POPUP | WS_CAPTION
CAPTION "Workorder Development Options"
{
CONTROL "", 101, "TBar", 0|WS_CHILD|WS_VISIBLE, 0,0, 850, 30
CONTROL "",356,"TFolderex",WS_TABSTOP,5,35,840,420
LTEXT "",4001,550,10,150,13
}
The GET:
REDEFINE GET oWorkPartsr:parlbs PICTURE "99999.99" MESSAGE aMsg[ 79 ] ID 748 OF oFld:aDialogs[ 2 ] UPDATE
And .rc
EDITTEXT 748,100,85,50,10, ES_RIGHT | ES_MULTILINE
Built with FWH 16.06, cursor does not display in any fields that are numeric and right justified. It works correctly on dialogs that are not in a folder, and it works correctly for non-numeric fields. However, when clicking on a numeric field, the cursor will not show.
I have spent two days drilling down code, re-writing code, etc. with the same result. Any ideas would be appreciated.
Tim