Опять же сообщения

← →
S@shka (2003-12-04 12:36) [0]

Народ висят два приложения (vm1 и vm2).
vm1 принимает данные и должно информировать об успешном приеме vm2 приложение.
Понимаю, что делать это надо, например, через SendMessage
Не разобрался пока как?
(определять дескрипторы и т.п.)
В приложение vm2 вероятно должна быть кака то функция
procedure RecvDats (var msg:TMessage); messages WM_???
Которая делает то что надо в ответ на поступление сообщения.
Прав или нет?
Если можно не надо общих слов.

← →
DVM (2003-12-04 13:02) [1]

Если из первого приложения послать сообщение так:
Result := SendMessage();
то во втором приложении переменной Result можно присвоить значение во время обработки этого сообщения, его SendMessage вернет первому приложению.

← →
BiN (2003-12-04 13:51) [2]

>>DVM
ага - какой Result в процедуре?!

методу передается 4*4 байта = SizeOf(TMessage)

TMessage = packed record
Msg: Cardinal;
case Integer of
0: (
WParam: Longint;
LParam: Longint;
Result: Longint);
1: (
WParamLo: Word;
WParamHi: Word;
LParamLo: Word;
LParamHi: Word;
ResultLo: Word;
ResultHi: Word);
end;

нужно:
Message.Result:={твое значение}

← →
DVM (2003-12-04 18:17) [3]

> BiN © (04.12.03 13:51) [2]
> >>DVM
> ага - какой Result в процедуре?!

Я имел ввиду что сообщение будет обработано оконной функцией принимающего окна и если в оконной функции написать примерно так:

WM_MYMESSAGE: Result:=10;

то функция Sendmessage вернет число 10 отправителю.
Это я имел ввиду.

← →
DVM (2003-12-04 18:19) [4]

> методу передается 4*4 байта = SizeOf(TMessage)

Какие методы? Речь о WinApi или нет? Все что я говорил, не относилось напрямую к VCL.

← →
BiN (2003-12-04 20:32) [5]

>Какие методы? Речь о WinApi или нет?
Да полностью согласен насчет обработчика сообщений и WinAPI, но вопрос, кажется, был об объектной обработке сообщений, как это делает к примеру TForm (см. procedure RecvDats (var msg:TMessage); messages WM_???).
А если человек задает вопрос подобным образом, то ему надо сначала объяснить, как организоывать в цикле обработку оконных сообщений - или же объяснить, как это сделать с помощью дельфовской директивы message

Опять же сообщения Найти похожие ветки