>>>Hi,
>>>
>>>Does anybody out there know if there is a way of getting the Menu message text to appear on a custom status bar ie the Microsoft Statusbar control?
>>>
>>>Thanks
>>
>>You could set the message text to a function on a PRG available through SET PROCEDURE and set the message text to the status bar from there, as well as returning the same string.
>>
Thisform.Statusbar1.Panels(1).Text = "Hello!"
>>HTH
>
>I can't seem to get that to work
>
>If in my menu I set the message to MenuMessage("Select an option") then that function never appears to be run?
Is MenuMessage available in a PRG that's been SET PROCEDURE TO?
I have a menu that uses this, it works OK. In the message box for the menu option I have something like:
MnuMessage("About")
And in the code for the function I have:
Function MnuMessage
LParameters tcMsg
Do Case
Case tcMsg = "About"
lcRet = "General Info about this application"
EndCase
Return lcRet
HTH