Модераторы: Snowy, bartram, MetalFan, bems, Poseidon, Riply
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Изменение переменных BIOS. Запуск программ.... Как это сделать? 
:(
    Опции темы
LamerTM
Дата 11.3.2006, 13:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 97
Регистрация: 11.3.2006

Репутация: нет
Всего: 0



Здравствуйте. У меня в BIOS есть функция Resume on RTC Alarm. Она включает комп в определенное время, которое задается переменными BIOS:
RTC Alarm date
RTC Alarm Hour
RTC Alarm Minute
RTC Alarm Second

Эту функцию я сегодня проверил, она работает.

Я очень много чего не знаю, но мне это очень нужно.

1. Я хочу узнать как менять эти переменные BIOS из программы написанной на делфи (RTC Alarm date, RTC Alarm Hour...)
2. Как запустить программу из другой программы. Есть ли функция которая запускает Exe файл?
3. Как закрыть программу.
4. Как получить список работающих процессов.
5. Как завершить процесс.
6. Как установить соединение с интернет.
7. Как отключить соединение.
8. Как выключить компьтер из программы.

Пункт 2 (запуск другой проги из моей) я нашел на этом форуме, еще не разобрался и не проверил правда.

Для чего все это мне нужно. Мне нужно чтобы компьютер сам включался каждые 30 минут, чтобы загружалась ОС, запускалась программа №1, которая устанавливает соединение с интернет и запускает программу №2.
Программа №2 может глючить и ее возможно надо будет закрыть, а потом открыть снова. Т.к. она сильно глючит, то возможно понадобиться завершить ее процесс (как из диспетчера задач). После того как программа №2 нормально отработает, программа №1 должна закрыть программу №2, отключить соединение с интернет, изменить настройки BIOS чтобы обеспечить следующее включение компа через 30 минут и выключить компьютер.

Еще я не учел что должен быть произведен вход в систему. Скорее всего придется сделать так чтобы система не требовала ввода пароля и входила сразу. Не знаю можно ли так сделать в Windows 2000, сейчас проверю.
PM MAIL   Вверх
Тьма
Дата 11.3.2006, 17:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 339
Регистрация: 22.1.2005
Где: Украина, Винница

Репутация: нет
Всего: 4



ну во-первых: каждому топику свой вопрос

1 я не знаю как НТ-система отреагирует на твое желание напрямую обратится к биосу
2
запуск процесса и ожидание его завершения
Код

var 
 pi : TProcessInformation;  
 si : TStartupInfo;  
  
begin 
 ZeroMemory(@si,sizeof(si));  
 si.cb:=SizeOf(si);  
 if not CreateProcess(  
                                        PChar(lpApplicationName), //pointer to name of executable module  
                                        PChar(lpCommandLine), // Command line.  
                                        nil, // Process handle not inheritable.  
                                        nil, // Thread handle not inheritable.  
                                        False, // Set handle inheritance to FALSE.  
                                        0, // No creation flags.  
                                        nil, // Use parent's environment block.  
                                        nil, // Use parent's starting directory.  
                                        si, // Pointer to STARTUPINFO structure.  
                                        pi ) // Pointer to PROCESS_INFORMATION structure.  
 then begin  
             Result:=false;  
             RaiseLastWin32Error;   
             Exit;  
         end;  
 WaitForSingleObject(pi.hProcess,INFINITE);  
 CloseHandle(pi.hProcess);  
 CloseHandle(pi.hThread);  
 // ... здесь твой код  
end; 

Автор ответа: TAPAKAH


3. LRESULT SendMessage(
HWND hWnd, // handle of destination window
UINT Msg, // message to send
WPARAM wParam, // first message parameter
LPARAM lParam // second message parameter
);
SendMessage(FindeWindow(nil, 'Заголовок програмы 2'), WM_CLOSE, nil, nil)

4.

5. BOOL TerminateProcess(
HANDLE hProcess, // handle to the process
UINT uExitCode // exit code for the process
);

6.

7.

8.

скачай себе ДРКБ www.drkb.ru там есть ответы на все твои вопросы или смотри ЧАВО http://forum.vingrad.ru/index.php?act=modu...dule=vingradfaq



--------------------
Vir magni ingenii                 
PM MAIL ICQ   Вверх
MIX55
Дата 11.3.2006, 17:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


много работы
*


Профиль
Группа: Awaiting Authorisation
Сообщений: 208
Регистрация: 23.10.2005
Где: Здесь

Репутация: нет
Всего: 4



Цитата

я не знаю как НТ-система отреагирует на твое желание напрямую обратится к биосу

да никак она не отреагирует в нт системах нельзя напрямую обратится к биос
--------------------
Hарод, а как в дельфи писать паскалевские проги....?*********************************************Жизнь слишком коротка, чтобы писать на Assembler'e
PM MAIL ICQ   Вверх
LamerTM
Дата 12.3.2006, 08:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 97
Регистрация: 11.3.2006

Репутация: нет
Всего: 0



Если нельзя менять BIOS то все вопросы кроме 6 и 7 отпадают. Остается только дважды кликнуть на ярлыке подключения и потом отключить соединение. Или установить/отключить соединение другим способом (даже не представляю каким).
PM MAIL   Вверх
MIX55
Дата 12.3.2006, 11:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


много работы
*


Профиль
Группа: Awaiting Authorisation
Сообщений: 208
Регистрация: 23.10.2005
Где: Здесь

Репутация: нет
Всего: 4



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

Удачи
З.Ы.

И ВООБЩЕ ОДИН ТОПИК ОДИН ВОПРОС


--------------------
Hарод, а как в дельфи писать паскалевские проги....?*********************************************Жизнь слишком коротка, чтобы писать на Assembler'e
PM MAIL ICQ   Вверх
LamerTM
Дата 13.3.2006, 00:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 97
Регистрация: 11.3.2006

Репутация: нет
Всего: 0



Извиняюсь за то что в одном топике задал кучу вопросов. Я не знал таких правил. Поиском уже воспользовался и проблему решил. Делаю все имитацией нажатия кнопки мыши в нужном месте. Не самый лучший способ, но на время сойдет. Потом научусь делать лучше.
Форум хороший у вас.
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: WinAPI и системное программирование"
Snowybartram
MetalFanbems
PoseidonRrader
Riply

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Delphi обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • 99% ответов по WinAPI можно найти в MSDN Library, оставшиеся 1% здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, bartram, MetalFan, bems, Poseidon, Rrader, Riply.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: WinAPI и системное программирование | Следующая тема »


 




[ Время генерации скрипта: 0.0423 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.