I've tried ActiveBar but I have some problems with shortcuts.
I'm creating bars (with ActiveBar) programmatically, based on VB samples, but to link the shortcuts I have to do something like this:
* In VB sample
Dim aShortcuts(0) As New Shortcut
aShortcuts(0) = "Ctrl+1"
oleActiveBar.Bands("band").Tools("tool").Shortcuts = aShortcuts
* I've tried this way in VFP...
Local aShortcuts
Dimension aShortcuts(1)
aShortcuts(1) = "Ctrl+1"
oleActiveBar.Bands("band").Tools("tool").Shortcuts = aShortcuts
But when I run the form I receive an error message: "Invalid Subscript Reference".
Do you have any idea?
Emerson Santon Reed
emerson@folhamatic.com.br
Emerson Santon Reed
"One Developer CAN Make a Difference. A community CAN make a future." - Craig Boyd