Помогите разобраться с использованием переменных
Использую:
CodeGear™ RAD Studio 2007
Из Delphi пытаюсь объявить переменную в скрипте, при исполнении скрипта присвоить переменной значение и вернуть значение назад в Delphi.
Ниже код:
var
ScriptResult : variant;
begin
Result := false;
fsscriptTreatNode.Clear; { fsscriptTreatNode : TfsScript }
{---}
fsscriptTreatNode.AddVariable( 'ScriptR', 'variant', ScriptResult );
fsscriptTreatNode.Lines.Text := 'begin ScriptR := ''Тест''; end.';
if fsscriptTreatNode.Compile then
begin
try
fsscriptTreatNode.Execute;
ScriptResult := fsscriptTreatNode.Variables;
...
При компиляции ( на строке fsscriptTreatNode.Compile ) получаю Exception - Incompartible types variant, string
Не понимаю смысла... Я не могу присвоить в FastScript строковое значение переменной типа variant?
CodeGear™ RAD Studio 2007
Из Delphi пытаюсь объявить переменную в скрипте, при исполнении скрипта присвоить переменной значение и вернуть значение назад в Delphi.
Ниже код:
var
ScriptResult : variant;
begin
Result := false;
fsscriptTreatNode.Clear; { fsscriptTreatNode : TfsScript }
{---}
fsscriptTreatNode.AddVariable( 'ScriptR', 'variant', ScriptResult );
fsscriptTreatNode.Lines.Text := 'begin ScriptR := ''Тест''; end.';
if fsscriptTreatNode.Compile then
begin
try
fsscriptTreatNode.Execute;
ScriptResult := fsscriptTreatNode.Variables;
...
При компиляции ( на строке fsscriptTreatNode.Compile ) получаю Exception - Incompartible types variant, string
Не понимаю смысла... Я не могу присвоить в FastScript строковое значение переменной типа variant?