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

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

Shell в XP [D6, WinXP]


Сергей Ю. ©   (2004-06-15 10:02:00) 

Вот создал свой шелл. Все прекрасно работает в 98/ME. Там я его в system.ini прописал все ок. А как его заставить запускаться в XP? Я его в реестр вписал в параметрах winlogona, но при этом запрашивается имя пользователя, сам этот winlogon грузится и т.д. А хочется чтоб комп врубился и сразу мой шелл (как в 98-ой)?


GrayFace   (2004-06-24 18:28:00) [1]

Dimaxx   (21.06.04 23:35) [7]
Функциональности нету. Не помню, че мне в нем не понравилось.

Stany ©   (24.06.04 08:24) [11]
Вначале открывай, как страницу, внутри - не битая.


DVM   (2004-06-24 09:20:00) [2]


> Stany ©   (24.06.04 08:24) [11]

Все нормально, все качается. У яндекса утром проблемы были, он сам открывался с трудом.


Stany   (2004-06-24 08:24:00) [3]

> DVM ©
> http://dvmuratov.narod.ru/Release.rar

ссылки битые зачем постить?


DVM   (2004-06-23 12:17:00) [4]

Кому интересно, вот можете поглядеть на аналогичное мое творение. Очень маленький т.к. на API. Не совсем доделан, но уже используется в клубе весьма успешно.

Работает как под Explorer так и без (лучше без). И лучше под XP. Под 98 без гарантий.

Установка -install
Удаление -uninstall
Пароль 3141592653

http://dvmuratov.narod.ru/Release.rar


Петров Денис   (2004-06-22 12:14:00) [5]

> экран с приветстием все время "моргает"

Просто отрабатывает автоматический вход в систему. От того, что ты его включил, winlogon работать не перестал, он просто автоматически  "заполняет" данные для входа в систему.

Повторюсь - хочешь красивое решение, пиши обертку вокруг MSGINA.


Сергей Ю.   (2004-06-22 12:00:00) [6]

См [6]


Dimaxx   (2004-06-21 23:35:00) [7]

2 GrayFace: А Aston чем тебе не угодил? Жрет памяти меньше, чем explorer и работает устойчивее.


Сергей Ю.   (2004-06-21 20:25:00) [8]

Спасибо, все работает. Только вот при загрузке ХР экран с приветстием все время "моргает", то приветствие, то пусто и т.п., будто она пытается грузить оболочки, они ей "ненравятся" :) и она пробует другую. (Сам-себя читаю - бред какойто :) но как это другими словами описать непойму). Видемо винлогон так робит ;(


Петров Денис   (2004-06-21 14:15:00) [9]

Тебе нужно включить еще и автоматический вход в систему.
Как вариант:

1. Регистрация твоей оболочки в системе:


procedure RegisterShell(const User, Password, Domain: string);
var
 R: TRegistry;
begin
 R := TRegistry.Create;
 try
   R.RootKey := HKEY_LOCAL_MACHINE;
   R.OpenKey('SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon', False);
   R.WriteString('Shell', 'MyShell.exe');
   R.WriteString('AutoAdminLogon', '1');
   R.WriteInteger('ShowLogonOptions', 0);
   R.WriteString('DefaultUserName', User);
   R.WriteString('DefaultDomainName', Domain);
   R.WriteString('DefaultPassword', Password);
   R.WriteInteger('DisableStatusMessages', 1);
 finally
   R.Free;
 end;
end;


2. Так можно восстановить Explorer обратно:


procedure UnRegisterShell;
var
 R: TRegistry;
begin
 R := TRegistry.Create;
 try
   R.RootKey := HKEY_LOCAL_MACHINE;
   R.OpenKey('SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon', False);
   { восстановление Explorer в качестве оболочки Windows }
   R.WriteString('Shell', 'Explorer.exe');
   R.WriteString('AutoAdminLogon', '0');
   R.WriteInteger('ShowLogonOptions', 1);
   R.DeleteValue('DefaultPassword');
   R.WriteInteger('DisableStatusMessages', 0);
 finally
   R.Free;
 end;
end;


Хотя, IMHO, для реализации своего собственного способа входа в систему, все-таки более корректным вариантом является написание обертки вокруг MSGINA.


Сергей Ю.   (2004-06-21 13:55:00) [10]

В инете нет. Шелл нужен для клуба, стандартный неподходит, т.к. клиент должен видеть лишь то что ему можно видеть + процессы авторизации при посадке и т.д. Вообщем это даже не вопрос. Посмотреть можно тут: г.Пермь, "Интернет-центр К-77" или компьютерный клуб "Драйвер", приезжайте :).


GrayFace   (2004-06-21 11:34:00) [11]

Неужели нужен именно шелл, ведь гораздо легче добавить нужные фичи к стандартному. Шеллы, которые я видел, и в подметки не годились виндовскому, но твой посмотреть было бы интересно. Он есть в инете?


Stany   (2004-06-21 10:16:00) [12]

в нете везде написано:HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\ Shell


Stany   (2004-06-21 09:33:00) [13]

Молодец. А taskbar у твого шелла есть? Дома буду гляну - было сто пудов.


Наверх

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