Вверх ↑
Ответов: 9906
Рейтинг: 351
#1: 2007-07-24 13:48:59 ЛС | профиль | цитата
3042, ну и чего тут было сверхестественного
Обыкновенные дельфячие правила
Которые по-любому соблюдать надо, хоть API, хоть 2+2
В чем проблема-то была

А если конкретизироваться на GetTickCount, то становятся уже возможны ответы на вопросы. И Dilma тогда имел в виду такое:
Add(MainForm,2721443,343,210)
{
Left=20
Top=105
}
Add(InlineCode,16049232,287,161)
{
VarPoints=#11:GetAnyPopup|
Code=#15:unit HiAsmUnit;|0:|9:interface|0:|29:uses Windows,Kol,Share,Debug;|0:|4:type|29: THiAsmClass = class(TDebug)|9: public|47: procedure GetAnyPopup(var d:TData; I:word);|6: end;|0:|14:implementation|0:|34:procedure THiAsmClass.GetAnyPopup;|5:begin|38: dtInteger(d, integer(GetTickCount));|4:end;|0:|4:end.|
}
Add(Timer,926414,231,210)
{
Interval=200
link(onTimer,6590758:doData,[])
}
Add(DoData,6590758,287,210)
{
link(onEventData,2721443:doCaption,[])
link(Data,16049232:GetAnyPopup,[])
}
А не то, чего Вы написали (это у Вас вообще не код IC)
карма: 9

0