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

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

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

popup сообщение [D6, Win2k]

_Andrey © (2005-04-05 13:02:00)
Уважаемые мастера, помогите с такой проблемой:
Пишу программу для отправки простых попап сообщений по сети, используя mailslot\messngr.
Когда сообщение доходит до клиента оно может повторяться до четырех раз, хотя отправляю я только одно. Т.е. получается послал один раз, а пришло 1,2,3 и больше одинаковых сообщений.
Вот код отправки самому себе на комп: comp-имя моего компа.

function send():boolean;
var h:THandle;
BytesWritten:DWord;
Slot,s:String;
begin
result:=false;
s:=#0+#0+'test';
Slot:='\\comp\mailslot\messngr'; //имя mailslot'а
h:=CreateFile(PChar(Slot),
GENERIC_WRITE,
FILE_SHARE_READ,
NIL,
CREATE_ALWAYS,
FILE_ATTRIBUTE_NORMAL,
0);
if h<>INVALID_HANDLE_VALUE then
begin
if WriteFile(h,Pointer(s)^,Length(s),BytesWritten,NIL) <> false then result:=true;
end else result:=false;
end;

проверка BytesWritten показывает что послано ровно 6 байт. В чем же может быть проблемма?

Hawkie (2005-04-09 18:37:00) [1]
:))
aus, то были малеха траблы со связью

aus, ты случакем получением popup сообщения ты не занимался?

aus (2005-04-09 18:22:00) [2]
Hawkie © (09.04.05 0:18) [1]
Трижды у тебя передается.

Hawkie (2005-04-09 00:19:00) [3]
У меня сообщение стабильно передается дважды.
Почему пока не разобрался.

А случайно обратной задачей: получением popup сообщения ты не занимался?

Hawkie (2005-04-09 00:19:00) [4]
У меня сообщение стабильно передается дважды.
Почему пока не разобрался.

А случайно обратной задачей: получением popup сообщения ты не занимался?

Hawkie (2005-04-09 00:18:00) [5]
У меня сообщение стабильно передается дважды.
Почему пока не разобрался.

А случайно обратной задачей: получением popup сообщения ты не занимался?

Наверх

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