Вверх ↑
Ответов: 2125
Рейтинг: 159
#1: 2008-04-28 16:09:57 ЛС | профиль | цитата
Между точками, между которыми замеряется время, нету НИ ОДНОГО вызова API
А разница в том, что в пакете Delphi происходит больше операций копирования строк (такая уж реализация передачи данных между компонентами).

Алексей писал(а):
вот что получилось с InlineCode

Можно и так записать, так короче:
PointWork doBeep
  invoke MessageBeep,0
EndPoint

А вот так - с параметром:
Add(Button,2515314,252,252)
{
Left=10
Top=10
Caption="Beep"
Data=Integer(0)
link(onClick,16630716:doWork2,[])
}
Add(InlineCode,2227711,329,252)
{
WorkPoints=#6:doBeep|
Code=#16:PointWork doBeep|25: invoke MessageBeep,data|8:EndPoint|
}
Add(Button,13388996,252,294)
{
Left=10
Top=35
Caption="Beep"
Data=Integer(32)
link(onClick,16630716:doWork3,[(305,300)])
}
Add(HubEx,16630716,301,245)
{
link(onEvent,2227711:doBeep,[])
}


Алексей писал(а):
ну ладно разберусь как-нибудь

Ага, если будешь разбираться, имей ввиду, что там макросы трёхэтажные
Макрос, который определяет макрос, который определяет макрос.

карма: 1

0