Набор команд системы. Объект возвращает свойство Commands объекта Zulu.
Входит в состав ZuluGIS 11.0 Application.
Команды нумеруются с единицы: Item возвращает объект для номеров с 1 по Count - 1.
Если команды с таким именем нет, метод возвращает не Nothing, а объект-заглушку: у неё Name — пустая строка, а ID равен -1. Проверять результат надо именно по ID = -1.
Методы AddCommand и AddCommandCategory пополняют состав команд системы, EnableCommand управляет доступностью команды.
Visual Basic:
Sub ICommands_cls Set C = Zulu.Commands 'Читаются номера с 1 по Count - 1 s = "" For i = 1 To 10 Set cmd = C.Item(i) s = s & i & ": " & cmd.Name & " (ID " & cmd.ID & ")" & vbCrLf Next MsgBox "Всего команд: " & C.Count & vbCrLf & vbCrLf & s End SubPython:
import zulu def Macro_ICommands_cls(): C = zulu.App.Commands print("Всего команд:", C.Count) # Читаются номера с 1 по Count - 1 for i in range(1, 11): cmd = C.Item(i) print(" %d: %s (ID %d)" % (i, cmd.Name, cmd.ID))