Ich habe folgenden Code in der Mainform:
Delphi-Quellcode:
private
procedure wmcopydata ( var msg: twmcopydata ) ; message WM_COPYDATA;
...
procedure TTestForm1.wmcopydata(var msg: twmcopydata);
begin
try
if msg.msg = wm_copydata then
with pcopydatastruct( msg.copydatastruct )^ do
begin
// verarbeitung
end;
end;
Eine C++ Anwendung schickt Nachrichten an die Delphi App mit dem Code:
Delphi-Quellcode:
HWND
handle = FindWindow("TTestForm1", NULL);
if ( IsWindow(
handle ) == TRUE )
{ SendMessage( handle , WM_COPYDATA , 0 , LPARAM(&x) ); }
Funktioniert so weit gut.
Wird die Form jedoch minimiert, kommen keine Nachrichten mehr an.
Was kann ich dagegen tun?