создание своего WinPopup а

← →
Сергей (2003-04-07 00:25) [0]

Хочу создать свой WinPopup.
Думаю, что для этого надо знать его порт и формат посылки сообщений (протокол, надо полагать, UDP).
Кто-нибудь, подскажите, плиз, где найти информацию или поделитесь, если кто что подобное уже делал.

← →
Dimich1978 © (2003-04-07 08:52) [1]

ZHERTVA:=Form1.Edit1.Text;//кому
USER:=Form1.Edit2.Text;//от кого
COMP:=Form1.Edit3.Text;//от кокого компа
Data:=Form1.Memo1.Text;//текст сообщения
CharToOEM(PChar(USER),PChar(USER));
CharToOEM(PChar(COMP),PChar(COMP));
CharToOem(Pchar(Data),Pchar(Data));
Data:=USER+#0+COMP+#0+Data;
Len:=Length(Data);
MSopen:=CreateFile(pchar("\\"+ZHERTVA+"\mailslot\messngr"),
GENERIC_WRITE,FILE_SHARE_READ,NIL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,0);
if MSopen<>INVALID_HANDLE_VALUE then
begin
WriteFile(MSopen,Pointer(PChar(Data))^,Len,Len,nil);
end;
closeHandle(MSopen);
end;

WinPopup работает не только по майлслотам. В W2k/XP/NT - также через механизм RPC. Сия фича во всю уже пользуется спамерами...

создание своего WinPopup а Найти похожие ветки