Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Убрать приложение из таскбара [D5, Win2k]

Niger © (2003-02-04 17:09:00)
Уважаемые мастера, подскажите, как сделать так, чтоб в таскбаре не было видно мое приложение? Заранее спасибо.

gsu (2003-02-06 13:03:00) [1]
> Nick_N_A ©

Сказал А говори Б

cdadmitriy (2003-02-06 12:29:00) [2]
> Nick_N_A ©

Сказал А говори Б

Nick_N_A (2003-02-06 05:50:00) [3]
Я много раз говорил и еще раз скажу - В NT-образных список Ctrl+Alt+Del отлично ловится и отлично сворачивается, и бедный пользыватель ничего кроме RESET сделать не сможет

gsu (2003-02-05 15:13:00) [4]
>> Сколько из них успешных ?
они ж не докладывались, поэтому история умалчивает (-:|~

Игорь Шевченко (2003-02-05 13:19:00) [5]
gsu © (05.02.03 12:21)

Сколько из них успешных ?

gsu (2003-02-05 12:21:00) [6]
>> Игорь Шевченко © (05.02.03 09:48)
Однако, только на моей памяти таких попыток было около 20 (-:|~

Игорь Шевченко (2003-02-05 09:48:00) [7]

> как приложение убрать чтобы по CTRL+ALD+DEL не было видно
> под NT

Никак. Это надо написать большими буквами при входе в форум

Nic_B (2003-02-04 20:21:00) [8]
К сожалению как приложение убрать чтобы по CTRL+ALD+DEL не было видно под NT не смог разобраться :(
Если проверку не ставить под NT программа вылетает

gsu (2003-02-04 19:56:00) [9]
>> // Это NT
табу ? (-:|~

Nic_B (2003-02-04 19:48:00) [10]
{Проверяем - Win9x или NT.}
info.dwOSVersionInfoSize := sizeof(info);
GetVersionEx(info);
if (info.dwPlatformId = VER_PLATFORM_WIN32_NT) then begin
// Это NT
end else begin
hNdl:=LoadLibrary("KERNEL32.DLL");
RegisterServiceProcess:=GetProcAddress(hNdl,"RegisterServiceProcess");
RegisterServiceProcess(GetCurrentProcessID,1);
FreeLibrary(hNdl);
// Это чтобы по CTRL+ALD+DEL не было видно
end;

Application.Minimize;
ShowWindow(Application.Handle, SW_HIDE); // Прячемся

gsu (2003-02-04 17:23:00) [11]
procedure TForm1.WMSysCommand(var Message: TWMSysCommand);
begin
if Message.CmdType = SC_MINIMIZE
then Hide
else inherited;
end;

Интересно, как ты его восстановишь (-:|~

Наверх

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