Some time ago I reported a problem with sending WM_COPYDATA-Messages
under windows:
http://bugs.freepascal.org/view.php?id=9210
As far as I could find the function WindowProc in win32callback.inc eats
up the message so it never reaches the MessageHandler defined in the app.
So I changed LCL\interfaces\win32\win32callback.inc
This is the diff-File:
Index: win32callback.inc
===================================================================
--- win32callback.inc (revision 13779)
+++ win32callback.inc (working copy)
@@ -1141,6 +1141,13 @@
Assert(False, Format('Trace:WindowProc - Window Value: $%S-%d; Msg
Value: %S; WParam: $%S; LParam: $%S', [IntToHex(Window, 4), Window,
WM_To_String(Msg), IntToHex(WParam, sizeof(WParam)*4), IntToHex(LParam,
sizeof(LParam)*4)]));
case Msg of
+ WM_COPYDATA: // passthrough of WM_COPYDATA-Messages
+ begin
+ LMessage.Msg := Msg;
+ LMessage.WParam := WParam;
+ LMessage.LParam := LParam;
+ WinProcess := false;
+ end;
WM_ACTIVATE:
begin
case LOWORD(WParam) Of
regards
Lukas
--
----------------------------
software security networks
Lukas Gradl <lazarus#ssn.at>
Eduard-Bodem-Gasse 9
A - 6020 Innsbruck
Tel: +43-720-300168-0
Fax: +43-512-341033-19
----------------------------
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
