Dmitri Kuzmenko пишет:
если хочешь, приведи пример типаvar a: string; b: integer; begin a:='b'; SetVar(a):=10; // чтобы в b присвоилось 10 как integer end
Во время какой-то дискуссии о преимуществах FoxPro понял,
что не вижу никаких особых проблем в реализации:
var
a,b,c, ...., x,y,z: Variant;
procedure ExecScript(S: String);
begin
...
end;
begin
a:='b';
ExecScript('&a=10');
end;
--
Игорь Захребетков

