1
Ваши вопросы / Re: Вопросы по скриптам в Simple-Scada 2
« : 05 Июня 2018, 08:57:29 »
Вставляем этот код в SimulationTimer и заводим глобальную переменную objTemp.
Вот так работает:
Вот так НЕ работает:
VarType и IsObject нужны чтобы определить создался ли объект. может по другому как надо я не знаю подскажите.
Вот так работает:
Код: (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 нужны чтобы определить создался ли объект. может по другому как надо я не знаю подскажите.