Скрипты Simple-Scada
Синтаксис
procedure RunApplication(AClientName, AFileName: string; const AParameters: string = ''; AShowCmd: Integer = 1);
Описание
Запускает приложение на заданном десктоп-клиенте. Не работает на web-клиентах, т.к. запуск приложений запрещен в браузерах. AFileName - путь к приложению. AParameters (необязательный параметр) - параметры запуска. Если требуется запустить приложение на ПК-сервере, то в качестве первого параметра AClientName необходимо использовать специальную константу SS_SERVER_NAME.
AShowCmd(необязательный параметр) - определяет как должно быть показано окно запускаемого приложения. Может принимать следующие значения:
Значение |
Описание |
|---|---|
SW_HIDE |
Скрыть окно приложения и активировать другое окно. |
SW_SHOWNORMAL |
Активировать и отобразить окно. |
SW_SHOWMINIMIZED |
Отобразить в свернутом виде. |
SW_SHOWMAXIMIZED |
Отобразить в развернутом виде. |
SW_SHOWNOACTIVATE |
Отобразить окно в текущем размере и позиции. Активное окно оставить активным. |
SW_SHOW |
Отобразить окно в текущем размере и позиции. |
SW_MINIMIZE |
Свернуть окно и активировать следующее окно верхнего уровня. |
SW_SHOWMINNOACTIVE |
Отобразаить окно в свернутом виде. Активное окно оставить активным. |
SW_SHOWNA |
Отобразить окно в текущем состоянии. Активное окно оставить активным. |
SW_RESTORE |
Отобразить окно. Если окно свернуто или развернуто, то восстановить его в первоначальных размерах и позиции. |
SW_SHOWDEFAULT |
Активировать и отобразить окно. |
Пример кода для клиента
begin
// запустить блокнот на клиенте "Client_Name"
RunApplication('Client_Name', 'notepad.exe');
// запустить калькулятор на клиенте, который вызвал скрипт
RunApplication(GetClientName, 'calc.exe');
// запустить bat-файл на клиенте "Client_Name"
RunApplication('Client_Name', 'D:\Моя папка\mybat.bat');
// запустить браузер на клиенте, который вызвал скрипт и открыть страницу http://simple-scada.com
RunApplication(GetClientName, 'C:\Program Files\Internet Explorer\iexplore.exe', 'http://simple-scada.com');
// запустить Paint на клиенте, который вызвал скрипт и открыть изображение с удаленного ПК
RunApplication(GetClientName, 'mspaint.exe', '"\\192.168.1.10\Моя_папка\Изображение1.jpeg"');
// открыть диск D в проводнике Windows
RunApplication(GetClientName, 'explorer.exe', 'D:\');
// открыть документ Excel
RunApplication(GetClientName, 'excel.exe', 'D:\MyFile.xlsx');
end.
Пример кода для сервера
begin
// запустить калькулятор на сервере
RunApplication(SS_SERVER_NAME, 'calc.exe', '');
// запустить bat-файл на сервере
RunApplication(SS_SERVER_NAME, 'D:\Моя папка\mybat.bat', '');
end.
