Delphi

pvr30 · Отправлено: **18:15, 21-07-2003** | #11

Да друзья ну и понесло вас.
>Цитата: В общем случае неверно. Ты такой командой закрываешь окно. А если у программы несколько равнозначных окон (или, по другому, нет главного)
А я и не говорил про общий случай и разве я не ясно выразился что, цитата:"В принцыпе я сделал по другому, я в своей программе использую handle одного из ДОЧЕРНИХ окон этой проги А1, ну а далее определяю handle A2:=GetWindow (A1,GW_OWNER); РОДИТЕЛЬСКОГО окна и делаю SENDMESSAGE (A2,WM_CLOSE,0,0); "

>Цитата: Метод можно рассматривать как безопасный или как небезопасный только после того, как он становится рабочим.
Уже работает 2 дня и нормально работает.

[s]Исправлено: pvr30, 20:16 21-07-2003[/s]

RealRascal · Отправлено: **00:28, 27-07-2003** | #12

Здрасьте! А как, глубокоуважаемые, Вы найдете и уничтожите программу у которой нет(допустим, на данный момент нет, или вообще нет) окна? Что если окна в целях экономии ОЗУ создаются, а потом уничтожаются? А вдруг где-нибудь, глубоко в оперативке, сидит себе злобное безоконное приложение и ждет своего часа?

Guest · Отправлено: **08:16, 06-08-2003** | #13

vasketsov

Не подскажешь?

Ситуация: служба создает процесс (пресловутый Notepad),
dwCreationFlags: NORMAL_PRIORITY_CLASS

StartupInfo.dwFlags:=STARTF_USESHOWWINDOW;
StartupInfo.wShowWindow:=SW_SHOW;

Процесс запускается, но без GUI. И при попытке убить процесс с помощью диспетчера задач : "Операция не может быть завершена. Отказано в доступе."

В чем дело? Спасибо.

vasketsov · Отправлено: **19:15, 06-08-2003** | #14

Guest
1) Почему не видно окна. Служба помечена как неинтерактивная, она запускает notepad в рамках системной оконной станции, которая не видна вошедшему пользователю. Для того, чтобы notepad появлялся, надо либо службе разрешить взаимодействие с рабочим столом, либо, если это своя служба и не хочется ее делать интерактивной, научить создавать процесс на конкретном рабочем столе конкретной оконной станции. Необходимая информация есть в msdn в описании функций CreateProcess (и SetProcessWindowStation с SetThreadDesktop, если хочется уметь переключать процесс с одного рабочего стола на другой).

2) Почему не завершается. Для завершения такого процесса необходимо получить привилегии отладки. Как это делается, уже вроде бы писалось, в любом случае искать надо функцию AdjustTokenPrivileges либо здесь, либо в msdn.microsoft.com. Можно еще попробовать использовать RtlAdjustPrivilege, пример находится здесь внизу: http://ntprog.by.ru/_rtl.htm