Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Wizbtns class
Message
 
To
29/12/2000 10:48:10
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Miscellaneous
Thread ID:
00457739
Message ID:
00457872
Views:
32
Cetin, where exactly do I go to get the below paragraph on my screen?
"**********In properties window make sure you see 'txtbtns' in combo at top, if not select it. Rightclick on title and select 'Non default properties only'. You'll see buttonresh there (you might need to scroll down). Dblclick it to get code window and you should see this code : **************"

Not sure where the above is accessble from.
-TB




>
>* This is a generic routine which refreshes the buttons
>* for appropriate table environments.
>IF SELECT()# THIS.nWorkArea
> SELECT (THIS.nWorkArea)
>ENDIF
>
>THIS.SetAllProp()
>THIS.cmdFind.Enabled = !THIS.EditMode
>THIS.cmdPrint.Enabled = !THIS.EditMode
>THIS.cmdExit.Enabled = !THIS.EditMode
>THIS.cmdDelete.Enabled = !THIS.EditMode AND !ISREADONLY()
>THIS.SetCaption()
>
>As I could see from code caption change is in SetCaption :) Dblclick on Setcaption in proerties window brings this code :
>
>
#DEFINE ADD_CAPTION_LOC		"\<Add"
>#DEFINE EDIT_CAPTION_LOC	"\<Edit"
>#DEFINE REV_CAPTION_LOC		"\<Revert"
>#DEFINE SAVE_CAPTION_LOC	"\<Save"
>
>IF THIS.EditMode
>	THIS.cmdAdd.Caption = SAVE_CAPTION_LOC
>	THIS.cmdEdit.Caption = REV_CAPTION_LOC
>ELSE
>	THIS.cmdAdd.Caption = ADD_CAPTION_LOC
>	THIS.cmdEdit.Caption = EDIT_CAPTION_LOC
>ENDIF
Cetin
"Build a man a fire, and he's warm for a day.
Set a man on fire, and he's warm for the rest of his life."
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform