Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Grid Builder and Errors
Message
De
15/11/1999 15:02:02
Rex Mahel
Realm Software, Llc
Ohio, États-Unis
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
The Mere Mortals Framework
Titre:
Grid Builder and Errors
Divers
Thread ID:
00291270
Message ID:
00291270
Vues:
61
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
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform