Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > ОС и железо
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 12.02.2014, 14:51
Redddd Redddd вне форума
Прохожий
 
Регистрация: 18.02.2013
Сообщения: 40
Репутация: 10
По умолчанию Определить, когда полностью загрузилась ОС

Проблема следующая - моя прога сидит в автозагрузке. И в момент загрузки ОС из функции OnCreate, обращается к функции АПИ. Как бы определить, что система еще не загрузилась и пока рано вызывать функцию
Ответить с цитированием
  #2  
Старый 12.02.2014, 15:09
Аватар для Xotabu4
Xotabu4 Xotabu4 вне форума
Прохожий
 
Регистрация: 05.07.2012
Сообщения: 9
Репутация: 10
По умолчанию

Наверное только по запущенным процессам и службам проверять.
Ответить с цитированием
  #3  
Старый 12.02.2014, 17:20
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
Радость

сначала запускается ОС, которая, в свою очередь, запускает остальные программы. не?
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
  #4  
Старый 12.02.2014, 17:39
Аватар для Aristarh Dark
Aristarh Dark Aristarh Dark вне форума
Модератор
 
Регистрация: 07.10.2005
Адрес: Москва
Сообщения: 2,906
Версия Delphi: Delphi XE
Репутация: выкл
По умолчанию

Цитата:
Сообщение от NumLock
сначала запускается ОС, которая, в свою очередь, запускает остальные программы. не?
Возможно используются какие-нить не системные API.
__________________
Некоторые программисты настолько ленивы, что сразу пишут рабочий код.

Если вас наказали ни за что - радуйтесь: вы ни в чем не виноваты.
Ответить с цитированием
  #5  
Старый 12.02.2014, 17:59
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

ну LoadLibrary загрузит их
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
  #6  
Старый 12.02.2014, 18:53
Redddd Redddd вне форума
Прохожий
 
Регистрация: 18.02.2013
Сообщения: 40
Репутация: 10
По умолчанию

Цитата:
Сообщение от NumLock
сначала запускается ОС, которая, в свою очередь, запускает остальные программы. не?
Наверно, я сам еще не разобрался что мне надо.
После загрузки/перезагрузки компа выскакивает ошибка:

System Error. Code 5
Отказано в доступе.

Грешу на следующие строчки:
Цитата:
if Assigned(SetThreadExecutionState) then
begin
SetThreadExecutionState(ES_DISPLAY_REQUIRED);
SystemParametersInfo(SPI_GETSCREENSAVETIMEOUT,0,@B uff,0);
SystemParametersInfo(SPI_SETSCREENSAVETIMEOUT,Buff ,nil,0);
end;
Ответить с цитированием
  #7  
Старый 12.02.2014, 19:28
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

добавил программу:
Код:
var
  i: Integer;
begin
  SetThreadExecutionState(2);
  if not SystemParametersInfo(SPI_GETSCREENSAVETIMEOUT,0,@i,0) then RaiseLastOSError;
  ShowMessage(IntToStr(i));
  if not SystemParametersInfo(SPI_SETSCREENSAVETIMEOUT,i,nil,0) then RaiseLastOSError;
end;
в автозагрузку, все запускается и работает
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 09:10.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter