Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Command Button help
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00705257
Message ID:
00705267
Views:
9
>Hi,
>
>I have a holiday's table.
>
>myholiday.dbf
>
>holidate description
>01/01/2002 New year
>12/25/2002 Xmax
>
>In myform.sc* to include a command button called cmdHoliday in one of command
>group cmgHoliday.
>
>each time the current date means date() = holidate equal to 01/01/2002 for example ,
>
>thisform.cmgholiday.cmdholiday.enabled should display otherwise should always
>hidden until it will reach the next holiday for example 12/25/2002.
>
>here my codes;
>
>select myholiday
>if holidate=date()
> this.cmgholiday.cmdholiday.visible=.t.
>endif
>
>it is not working, please correct my code.
>Thanks in advance,
>PP

Paul,

Something like this in the command button's refresh method should work without any problems.
* Refresh
IF NOT EOF('MyHoliday')
  This.Enabled = (DATE() = MyHoliday.HoliDate)
ELSE
  * Whatever you need to do here
ENDIF
George

Ubi caritas et amor, deus ibi est
Previous
Reply
Map
View

Click here to load this message in the networking platform