Вниз
Скачать: CL | DM;

создание своего 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;


 
Ihor Osov'yak ©   (2003-04-07 22:08) [2]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c
3-26338
qwerty2
2003-05-20 11:50
2003.06.09
Странное поведение BDE


9-26320
Silentor
2003-01-03 20:03
2003.06.09
Где бы почитать о теории создания МПП?


3-26337
kingdom2000
2003-05-16 19:07
2003.06.09
TDBGridEh и GetEditText(X, Y)


1-26577
wera
2003-05-28 13:03
2003.06.09
Опять списки


14-26674
Kair
2003-05-24 13:13
2003.06.09
Инфо по DelphiX




   Наверх