MessageBox(frm_2.Handle, PChar(frm_2.Handle), PChar('hiasm msg'), MB_OK);[/code] Ничерта не компилируется, оказывается нет в этом пакете преобразования типов. Пока не сделал вот так вручнуюMessageBox(frm_2.Handle, PChar(int2str(frm_2.Handle)), PChar('hiasm msg'), MB_OK);[/code] -- не заработало. Вот что значит обезличенные переменные. Конверторы типов нужны обязательно.
[size=-2]------ Добавлено в 16:17 [/size]
Да еще и StrCat пришлось дописывать вот так if(linked(Result))
old = block.select(BLK_PRIV_VAR)
println(s, ':string;')
block.select(old)
println(s, ' := ', s1 & s2, ';')
event(onStrCat, s)
else
event(onStrCat, s1 & s2)
end
Иначе эту переменную никуда не воткнешь как string
[size=-2]------ Добавлено в 16:22 [/size]
Вот сейчас начну наращивать пакет, а куда это показывать, для рецензий?
[size=-2]------ Добавлено в 16:24 [/size]
[b]Dilma[/b], сделай всеже нормальную компиляцию в exe.
Разработчик
Ответов: 26113
Рейтинг: 2126
|
|||
Ну что, первые трудности. Вот кусок результата генерации кода после доделки Message
|
|||
карма: 22 |
|