Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Grid Builder and Errors
Message
From
15/11/1999 15:02:02
Rex Mahel
Realm Software, Llc
Ohio, United States
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
The Mere Mortals Framework
Title:
Grid Builder and Errors
Miscellaneous
Thread ID:
00291270
Message ID:
00291270
Views:
63
Kevin,

I have modified the Grid Builder to allow errors in the GridColumnControls to be reported:

1) Add a record to the MMBDMeta table
cKey = "GRIDCOLUMN"
cMethod = "ERROR"
mMemo =
LPARAMETERS nError, cMethod, nLine, tcSys16, toErrObj
THIS.Parent.Error(nError, cMethod, nLine, tcSys16, toErrObj)

Add the following code to the mmSec_CGrid.ColumnSetUp

SELECT * FROM MMBDMeta ;
WHERE UPPER(MMBDMeta.cKey) = 'GRIDCOLUMN ' ;
INTO CURSOR MM_TempColumnCode

SCAN
*--- Check if the header already contains code
lcMethod = ALLTR(MM_TempColumnCode.cMethod)
lcCode = ThisForm.oObject.Columns[tnColumn].Controls[1].ReadMethod(lcMethod)
IF EMPTY(lcCode)
*--- The method is empty. Replace with specified code
ThisForm.oObject.Columns[tnColumn].WriteMethod(lcMethod,MMBDMeta.mMemo)
ENDIF
ENDSCAN

USE IN MM_TempColumnCode

Thanks

Rex
Next
Reply
Map
View

Click here to load this message in the networking platform