Add(For,9609712,147,140)
{
End=10000
link(onEvent,7424651:doStrCat,[])
}
Add(Button,4595367,91,140)
{
Left=90
Top=140
link(onClick,9609712:doFor,[])
}
Add(StrCat,7424651,203,140)
{
Str2="s"
link(onStrCat,5579684:doValue,[(245,146)(245,128)(193,128)(193,90)])
link(Str1,5579684:Value,[])
}
Add(Memory,5579684,203,84)
{
Default=String()
}
[size=-2]------ Добавлено в 22:11
скажем пакет PHP сгенерит для аналогичной схемы вот такой код:
for($i = 0; $i < 10000; $i++) {
$var2 = $var2."s";
}
этот код(при условии хорошего парсера php) оптимален на 100%. Стоит ли приводить тут, как эта схема выглядит в кодах для Delphi? Полагаю, что в FASM, где соблюден примерно такой же принцип построения компонент код будет тоже таким(далеко не оптимальным).