GetMenuItems
Returns all items of the active menu matching Caption as a list of strings.
Returns nothing if no active menu exists, no menu with the specified caption is found, or the character is disconnected.
For structured records instead of strings, use GetMenuItemsEx. For items of the last menu regardless of caption, use GetLastMenuItems.
Возвращает все элементы активного меню с заголовком Caption в виде списка строк.
function GetMenuItems(Caption: String): TArray<String>;
DWS overload:
procedure GetMenuItems(Caption: String; var TL: TStringList);
procedure GetMenuItems(Caption: String; var TL: TStringList);
def GetMenuItems(Caption: str) -> list[str]: ...
var
Items: TStringList;
i: Integer;
begin
Items := TStringList.Create;
GetMenuItems('Tinkering', Items);
for i := 0 to Items.Count - 1 do
AddToSystemJournal(Items[i]);
Items.Free;
end.
items = GetMenuItems('Tinkering')
for item in items:
AddToSystemJournal(item)