Вверх ↑
Разработчик
Ответов: 26135
Рейтинг: 2126
#1: 2008-08-15 00:59:42 ЛС | профиль | цитата
Dilma писал(а):
Эдик, советую почаще просматривать элементы палитры:
code_9709.txt

Dilma, почему вот так


Add(MainForm,2953706,252,231)
{
}
Add(Button,7913403,252,273)
{
Left=215
Top=95
link(onClick,12083433:doPrint,[])
}
Add(FTCG_Tools,12083433,308,273)
{
}
BEGIN_SDK
Add(EditMultiEx,6444690,21,21)
{
WorkCount=#7:doPrint|
EventCount=#7:onPrint|
Width=475
Height=179
link(doPrint,14130509:doPrint,[(35,27)(35,69)])
}
Add(VisualInline,14130509,49,63)
{
Lines=#14:var t:integer;|5:begin|15: t := 50 + 90;|46: messagebox(0, pchar(int2str(t)), '', mb_ok);|4:end;|
Width=348
Height=113
link(onPrint,6444690:onPrint,[(447,69)(447,27)])
}
END_SDK

эта схема выдает ошибку


W:\Elements\delphi\code\hiFTCG_Tools_DD1C58.pas(80) Error: Expression expected but ')' found

и, собственно, то самое место в полученном коде


procedure TClassFTCG_Tools_DD1C58.event_doPrint(var Data:TData; index:word);
begin

printCode(data);
_hi_onEvent(THIFTCG_Tools(FParent).Events[0], ); //???
end;

карма: 22

0