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

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

Убить Exploer [D5, WinXP]

rezya ©   (2004-03-16 10:58:00) 

Как сделать так чтобы при загрузке Windows XP не загружался Exploer?

---

DuchmanSoft   (2004-03-16 11:48:00) [1]

procedure TForm1.Button1Click(Sender: TObject);
Var
 ShellF: array [0..78] of Char;
 Sh: TRegistry;
begin
 StrPCopy(ShellF, 'Путь к замене Explorer.exe либо оставь пустым и тогда вообще ничего незагрузится');
 Sh := TRegistry.Create(KEY_ALL_ACCESS);
 Sh.RootKey := HKEY_LOCAL_MACHINE;
 Sh.OpenKey('\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon', True);
 Sh.WriteString('Shell', ShellF);
 Sh.CloseKey;
 Sh.Free;
 MyExitWindows(EWX_LOGOFF or EWX_FORCE); {Завешение работы LogOff)}
end;

Проверял на Win2k.

---

Legran   (2004-03-16 11:31:00) [2]

загружать вместо него свой Shell

---

Наверх