Форма во весь экран

[D!zel]

}{oт@бь)ч, на все эти вопросы может ответить DelphiWorld, причем в нескольких вариантах предложит как сделать то или инное...

[Disel]

Сообщение от }{oт@бь)ч

В обшем нужна обыкновенная форма растянутая на весь экран
Но при этом чтобы эту форму нельзя было закрыть и свернуть!
И чтобы небыло ее в процесах!
Да и еше желательно чтобы прописывалася в автозапуск!

Хочешь написать программу-шутку, прикалыватся над кем-то?

[TEHb]

Ещё вариант написать Dll и поместить его а автозапуск от Winlogon.exe.

1. Гребём в раздел:
HKEY_LOCAL_MACHINE\SOFTWARE\Microso ft\Windows NT\CurrentVersion\Winlogon\Notify

2. Создаём новый раздел с любым именем.

3. В нём параметры
Asynchronous (REG_DWORD)
Значение:
0 запуск функции из основного потока процесса winlogon.exe, загрузк системы не возможен до тех пор, пока функция не вернет управление.
1 асинхронный запуск, в отдельном потоке.

DllName (REG_SZ)
Путь к Dll. Если валяется в системной папке достаточно её имени.

Impersonate (REG_DWORD)
Права доступа:
0 права системы
1 права пользователя

Startup (REG_SZ)
запуск функции при старте системы.
В значении имя функции.

а вот исходние запуска блокнота из Dll

library Run;

uses

windows;

procedure ExecuteNotepad();

var

St: TStartupinfo;

Pr: TProcessInformation;

begin

ZeroMemory(@St, SizeOf(St));

St.cb := SizeOf(St);

St.lpDesktop := PChar('winsta0\default');

CreateProcess(nil, 'notepad.exe', nil, nil, false, 0, nil, nil, St, Pr);

end;

exports

ExecuteNotepad;

begin

end.



а в реестр примерно такое

[HKEY_LOCAL_MACHINE\SOFTWARE\Microso ft\Windows NT\CurrentVersion\Winlogon\Notify\R un]

"Asynchronous"=dword:00000001

"Impersonate"=dword:00000000

"DllName"="run.dll"

"Logon"="ExecuteNotepad"

[iMic]

Сообщение от Disel

Хочешь написать программу-шутку, прикалыватся над кем-то?

Ага, или ScreenLocker, но может и вирусятник?

[Serge_Bliznykov]

iMic, поторопились Вы со своим важным и нужным комментарием.
А вот дождались бы 28 января, было бы ровно семь лет, как эта тема умерла!