>>>>>>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"
>>>   *!* ...etc.
>>>   EndCase
>>>Return lcRet

>>>HTH
>>
>>From what I can tell it runs the code when the menu is loaded and sets your messages into the menu. My problem is that as I don't have the status bar visible I can't seem to change the text as the mouse moves over the menu option.
>>
>>Any thoughts?
>
>I think you need to define your menu with code instead of going through the menu designer for this to work.
>
>Do you have the statusbar in each form or in the _screen inside a container?

The statusbar is part of the main screen.

Is your code really firing when you highlight a menu option as mine definatly wasn't? (I'm trying it just with a wait window nowait and nothing is happening!)