Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?

Официальный форум Simple-Scada.

Просмотр сообщений

В этом разделе можно просмотреть все сообщения, сделанные этим пользователем.


Сообщения - atomix

Страницы: [1]
1
Вставляем этот код в SimulationTimer и заводим глобальную переменную objTemp.

Вот так работает:
Код: (delphi)
function Test(param : variant) : Variant;
var
  WshNetwork  : Variant;
begin
  WshNetwork := CreateOleObject("WScript.Network");
  Field41.text :=  WshNetwork.ComputerName;
  //ShowMessageAll('Заголовок окна', WshNetwork.ComputerName, clNone);
end;

Вот так НЕ работает:
Код: (delphi)
function Test(param : variant) : Variant;
var
  WshNetwork  : Variant;
begin
  objTemp.Value := CreateOleObject("WScript.Network");
  Field41.text :=  objTemp.Value.ComputerName;
  //ShowMessageAll('Заголовок окна', objTemp.Value.ComputerName, clNone);
end;

VarType и IsObject нужны чтобы определить создался ли объект. может по другому как надо я не знаю подскажите.

2
Будут ли реализованы глобальные переменные в скриптах, а также функции вызываемые при старте проекта и остановке (например подключился первый клиент то вызывается некая функция старта, а если отключился последний живой клиент, то вызывается функция стопа).

Те переменные (внутренние виртуальные) не подходят у них нет значения хранить как Variant Type.

Также не хватает функции VarType и IsObject.

Пока на этом у меня застопоролось перевод проектов на вашу платформу.

Также при использовании скриптов в обработчике нажатия например от кнопки, возникает рядом с курсором мыши изображение колесика загрузки на доли секунды, может его не показывать если исполнение скрипта длится меньше секунды.

3
Ошибки / Re: "Мелкие" ошибки
« : 04 Июня 2018, 10:01:30 »
 В версии 2.2.9.0 при установке программы в каталог отличный от "c:\Program Files (x86)\Simple-Scada 2\",  все равно появляется эта папка  и в ней файлы деинсталлятора.

4
Большое спасибо.

И еще Аваст ругается (пишет вирус IDP.Generic) и помещает файлы Server.exe и sscrep.exe в карантин.

А еще в скаде (SimpLight) есть такое - https://support.simplight.ru/knowledge-bases/2/articles/299-integratsiya-simp-light-i-oborudovaniya-radsel-ccu825

Может эти объекты (TIdHTTP и TlkJSON, или такие же по возможностям на ваш выбор, что вам легче внедрить) тоже сможете добавить будет вообще замечательно.

5
Как реализовать вот такое в скриптах (т.е. работа с СОМ объектами).

Код: (delphi)
V := CreateOleObject('PDFCreator.clsPDFCreator');
V.Test('ok test.');

Пишет ошибку "need insert 'IMPORT_ActiveX.pas'"
очень такое нужно, если это получится то я все проекты переведу на вашу скаду (мне она понравилась).

Страницы: [1]