Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Люди не подскажите как в виндах и в ХР прописать прогу, которая [D5, Win95/98]


ЗГ ©   (2002-05-23 07:32:00) 

Приветствую!!!
Люди не подскажите как в виндах и в ХР прописать прогу, которая автоматически загружаться будет, но не через автозагрузку
И как сделать прогу невидимой при нажатии C_A_Del


cok   (2002-05-31 18:07:00) [1]

Как говорил VID © (23.05.02 10:20) не получится никак. если у тя Win9x.


начинающий програмер   (2002-05-23 19:20:00) [2]

Извините меня, чайника, но если можно, то поподробнее про LoadLibrary().(а если с куском кода, то вообще рекрасно)


Song   (2002-05-23 18:05:00) [3]

Как говорил VID © (23.05.02 10:20) не получится. Надо подзогружать ф-ию через LoadLibrary()


Начинающий програмер   (2002-05-23 17:54:00) [4]

Я попробовал то, что говорил VID © , но при запуске выдаёт сообщение:
точка входа в процедуру RegisterServiceProcess не найдена в файле kernel32.dll
Что делать???


Drakan   (2002-05-23 12:13:00) [5]

А ещё прикольнее (если твоя прога очень пакостная):
[HKEY_CLASSES_ROOT\exefile\shell\open\command\] и т.д. и т.п.


VID   (2002-05-23 10:20:00) [6]

Для скрытия приложения из CTRL+ALT+DEL тебе придёться юзать WIN98/98 (а может ещё и линолеум)

...
function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer; stdcall; external "KERNEL32.DLL";

implementation
...
а потом вызывать функцию
RegisterServiceProcess(GetCurrentProcessID, 1); //ДЛЯ Скрытия
RegisterServiceProcess(GetCurrentProcessID, 0); //ДЛЯ Отображения

Для автозапуска приложения при загрузке оси можно прописать приложение в секции RUN, в реестре, в ветвке HKEY_LOCAL_MACHINE:
...
Var Reg:TRegistry;
begin
try
reg := TRegistry.Create;
reg.RootKey := HKEY_Local_Machine;
reg.LazyWrite := false;
reg.OpenKey("Software\Microsoft\Windows\CurrentVersion\Run",false);
reg.WriteString("myExecutable", application.exename);
reg.CloseKey ;
reg.free;
except end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо