![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
фоновое приложение
malij © (2004-12-21 15:18:00)хочу написать приложение которое будет работать в фоне(без форм) . я тут одно написал , но оно что-то много ресурсов жрет, может кто подскажет как правильно
malij (2004-12-21 19:38:00) [1]да телепаты бы помогли
Digitman (2004-12-21 16:36:00) [2]
> правильно будет если написать типа такого
именно "типа" ..
ибо никто не знает, что у тебя там в логике твоего приложения творится
а телепаты ушли в новогодний отпуск
malij (2004-12-21 16:29:00) [3]ну шо так ни кто и не поможет?
а правильно будет если написать типа такого
var
msg:Tmsg
begin
while getmessage(msg,0,0,0) do begin
TranslateMessage(Msg);
DispatchMessage(Msg);
end;
end;
Digitman (2004-12-21 16:21:00) [4]
> но что-то много ресурсов жрет
> это вообще правильно или нет
про GetMessage() слыхал что-нть ?
> работать в фоне(без форм)
а формы-то тут причем ?!
malij (2004-12-21 16:07:00) [5]это вообще правильно или нет
malij (2004-12-21 16:06:00) [6]да я и делаю через прием сообщений я вот так делаю:
while not finished do
begin
if PeekMessage(Msg,0,0,0,PM_REMOVE) then
begin
if Msg.message = WM_QUIT then
finished := True
else
begin
TranslateMessage(msg);
DispatchMessage(msg);
end;
end
else
begin
if keys[vk_escape] then
finished := True;
end;
end;
вот типа такого
-=SS=- (2004-12-21 15:51:00) [7]Ты наверное всё циклами без приёмки сообщений...
попробуй чё нить на winApi ... грузить проц не так будет это точно
Jay1982 (2004-12-21 15:39:00) [8]Или попробуй понизить приоритет своей программы
Stanislav (2004-12-21 15:38:00) [9]А что ты там делаешь ?
Poirot (2004-12-21 15:35:00) [10]ЗЫ... смотри в сторону написания сервисов если речь идёт об апликухаха для 2K/XP
Poirot (2004-12-21 15:34:00) [11]В зависимости от того, что твой приложение делает можно использовать например Объекты синхронизации...
Jay1982 (2004-12-21 15:30:00) [12]Вставляй для "передышки" Sleep()