Вот я делаю это:
#hws
event(OnResult, 'Resultat') //пробовал и без кавычек, результат одинаковый.
А, в ответ, получаю это:
#pas
procedure TClassFTCG_Tools_8EA8BB0.event_doData(var Data:TData; index:word);
begin
resultat1 := 6 + 6;
val4 := 0;
end;
val4 - это подключенный элемент memory, а вместо нуля должен был стоять resultat1.
Assasin, не работает по причине: Error: There is no overloaded version of '_hi_OnEvent' that can be called with these arguments
Netspirit, нолик то у памяти был integer. А если память NULL, то результат такой:
#pas
procedure TClassFTCG_Tools_8EA8BB0.event_doData(var Data:TData; index:word);
begin
resultat1 := 6 + 6;
val4 := '';
end;
Поиск
Друзья
Администрация