![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
подскажите пожалуйста
|
|
#2
|
||||
|
||||
|
Это можно сделать несколькими способами, но наиболее оптимальный - занесение файла в автозапуск реестра, который находится по следующему адресу:
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Curr entVersion\Run Вот код: Код:
uses Registry;
procedure TForm1.FormCreate(Sender: TObject);
var
// Переменная реестра
h: TRegistry;
begin
h := TRegistry.Create;
with h do
begin
RootKey := HKEY_LOCAL_MACHINE;
OpenKey('\Software\Microsoft\Windows\CurrentVersion\Run', true);
WriteString('DelphiWorldApp', 'C:\Application.exe');
CloseKey;
Free;
end;
end; |
|
#3
|
|||
|
|||
|
artemavd
Вы написали как сделать автоматическую загрузку программы при старте Windows. А я хочу сделать, чтобы моя программа загружалась в boot-e (как операционная система). |
|
#4
|
||||
|
||||
|
Это уже получается не Win32(64) приложение, а Native. Такое приложение пишут на NativeAPI. Короче "покури" доки по Native API. Вот тебе ссылка на Windows NT/2000: Native API Reference - читай ее. Я приаттачил портированный на Delphi NativeAPI.
![]() Последний раз редактировалось moo2k, 09.08.2008 в 18:16. |