Буфер 500 мкс:
StrList, ListBox, StringTable, = 240 мкс. Много, это аж половина времни.
SqLite = счет идет в миллисекундах..

FTCG array of array of array = 2-3 мкс. Остановился на них.
------------ Дoбавленo в 13.33:
Помогите, не могу побороть:
Пишу функцию чтения:
#hws
func doRead()
println(a, ' := ',Array,'[0,0];')
event(onRead, a)
end
А в код выводит _hi_onEvent без переменной "a", хотя он ее видит, и печатает в первую строку:
#pas
a2 := arr3[0,0];
_hi_onEvent(THIFTCG_Tools(FParent).Events[0]);
end;