func doCheck
println('if(', check, ') {')
event(onOn, _data_)
println('} else {')
event(onOff, _data_)
println('}')
end
[size=-2]------ Добавлено в 18:11
Galkov писал(а):
Ничего он не копируетэто впрочем и не важно. Проблема с копированием в любом случае решаема использованием PChar на худой конец Важно почуствовать сам процесс вызова большого количества методов на каждый чих программы. А после этого скомпилировать этот пример в Delphi 2 и изумляться тому, что на самом деле это всего одна строка кода...