Вниз
Скачать: CL | DM;

как в DLL организовать таймер, или вывернутся другим способом   Найти похожие ветки 

 
Демо ©   (2010-06-01 12:01) [40]


> из проги вызовите любую процедуру и запишите через 5 сек
> лог


Почему через 5 сек., а не через 10?
Как организовано взаимодействие основного приложения и DLL?

Ответь на вопросы, а то из твоих сообщений ничего не понятно. Вообще.


 
user51   (2010-06-01 12:26) [41]

12 © СПАСИБО

это то что нужно было

procedure MMM;
begin
ShowMessage("MMM");
end;

function Text:integer; stdcall;
var
 t:tTimer;
 MyEvnt : TMethod;
begin
MyEvnt.Code := @MMM;
MyEvnt.Data := nil;
t := tTimer.Create(nil);
t.Enabled := false;
t.Interval := 9000;
t.OnTimer := TNotifyEvent(MyEvnt);
t.Enabled := true;

result := 0;
end;

это ответ на заданный вопрос


 
Демо ©   (2010-06-01 12:31) [42]


> это то что нужно было


Я бы сказал - жуть.


 
sniknik ©   (2010-06-01 12:31) [43]

> помогите человеку если можете.
какая разница могу или не могу? хочу или не хочу вот в чем вопрос... особенно за "Б О Л Ь Ш О Е    С П А С И Б О".

> Ответь на вопросы, а то из твоих сообщений ничего не понятно. Вообще.
он не может. он своим "гнутьем пальцев" загнал себя в угол, и сейчас, что бы не сказал будет противоречить сказанному ранее.

> это ответ на заданный вопрос
это очень грустно... таймаут как самоцель. я бы считал ответом решение по устранению от ошибки изза которой закрутилась вся эта "бодяга".



Страницы: 1 2 вся ветка

Скачать: CL | DM;



Память: 0.52 MB
Время: 0.046 c
15-1271364443
pokey
2010-04-16 00:47
2010.08.27
Регистрация в QIWI


2-1274878317
Delphist2
2010-05-26 16:51
2010.08.27
копирование из spinedit


2-1267700625
Цукор5
2010-03-04 14:03
2010.08.27
использование TIBSQL


15-1275738264
Desdechado
2010-06-05 15:44
2010.08.27
Если б человек не мог врать, как изменился бы мир?


15-1266819424
b/@.
2010-02-22 09:17
2010.08.27
Нужен драйвер USB flash -> DVD-дисковод




   Наверх