Глобальные переменные

[ZZR]

Stealth RC 3
пример

Code: Select all

Program test;
var
s1,s2:string;
begin
SetGlobal('stealth',s1,'0');
Addtosystemjournal(GetGlobal('stealth',s1));
SetGlobal('stealth',s2,'1');
Addtosystemjournal(GetGlobal('stealth',s1));
end.

первый рапорт 0, следующий 1.

Stealth не работает с несколькими глобальными переменными, или я не так их использую?

[CFA]

не так используешь, это не переменные в обычном понимании.
в твоем случае s1 и s2 пустые строчки, а они должны задавать име переменной, а не значение.
те если ты добавишь после begin -
s1 := 'var1'; s2 := 'var2';
то все будет работать как ты хотел, а сейчас тк s1 = s2 получается, что ты командой SetGlobal('stealth',s2,'1'); - задаешь для переменной с именем '' значение '1'

[ZZR]

Спасибо за науку))), все заработало