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

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

mailslot already exests


xman ©   (2004-04-23 16:17:00) 

Что нужно зделать что бы этой ошибки не было в WinXPи Win2000?
Если можно програмным путем.


Rouse_   (2004-04-23 21:55:00) [1]

Вот так остановить:

uses ..., WinSvc;

procedure TForm1.Button1Click(Sender: TObject);
var
hSCM, hSrv: THandle;
SS:SERVICE_STATUS;
begin
hSCM:=OpenSCManager(nil,nil,SC_MANAGER_ALL_ACCESS);
hSrv:=OpenService(hSCM,'Messenger',SERVICE_ALL_ACCESS);
ControlService(hSrv,SERVICE_CONTROL_STOP,SS);
CloseServiceHandle(hSrv);
CloseServiceHandle(hSCM);
end;


Piter   (2004-04-23 20:46:00) [2]

Можно, есть комманда остановки сервисов. Правда не помню какая :(
А вообще если тебе надо послать сообщение - то пользуйся функцией NetBufSend  ... блин, тоже забыл :)
Я думаю народ подскажет


xman   (2004-04-23 20:24:00) [3]

А программно это можно реализовать?


Rouse_   (2004-04-23 17:53:00) [4]

Какой именно мэйлслот пытаешся создать? "\\.\mailslot\messngr"?
Если да - то отключи службу сообщений...


Наверх

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