Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Adding code to existing grid textboxes
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9 SP1
OS:
Vista
Network:
Windows 2003 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01241212
Message ID:
01241311
Views:
31
>
DoDefault()
>
>(REVISED)
>*
>Local mName, oCol,  oControl
>FOR EACH oCol IN this.Columns
>  for each oControl in oCol.controls
>    if Upper(oControl.class) == 'TEXTBOX'
>      mName = oControl.name  && Keep same name
>      oCol.RemoveObject(mName)
>      oCol.NewObject(mName,[cTextBox],[vjctrl.vcx])
>      oCol.CurrentControl = mName
>      oCol.mName.Visible = .t.
>    EndIf
>  endfor
>ENDFOR
This would not work - the last line. I'm sorry, you need to either use STORE or evaluate. Or just go with text1, nobody will change the default name anyway, I tried to be a purist when it doesn't call for.
If it's not broken, fix it until it is.


My Blog
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform