mikakoistinen
9 years agoContributor
TAdvMainMenu item captions
Hi,
I'm trying to access our Delphi 2007 written application, which main menu is TAdvMainMenu from TMS software.
I can access items by numbers but not by caption.
On Keyword test this works
MainMenu Click ['5'|'7'|'11']
But if I change parameter to 'Invoices|Integrations|Some 3rdparty' it says control item 'Invoices' not found.
(I have tried with &-sign and with out - but as fas as I understand & signs are not required).
Then I wrote following testscript, but I see empty messageboxes..
is it so that TAdvMainMenu is not fully compatible ?
procedure menulist; var filemenu, i,w; begin w := Aliases.ourApp.OurAppMainForm; // name changed FileMenu := w.MainMenu.Items[0].SubMenu; showmessage(w.MainMenu.Items[0].caption); for i := 0 to filemenu.count -1 do begin ShowMessage(filemenu.Items[i].caption) end; end;