Einzelnen Beitrag anzeigen

Delphianer

Registriert seit: 19. Feb 2003
Ort: Rossau
149 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#5

Re: zwei Instanzen, die voneinander wissen...

  Alt 3. Nov 2009, 20:15
Hallo,

Messages zwischen zwei Instanzen zu verschicken ist nicht das Problem, aber Daten.

Da ich das auch benötigt habe, bin ich auf WM_COPYDATA gestoßen, das genau das macht.

Delphi-Quellcode:
  
var
  FileName: string;
  CopyDataStruct: TCopyDataStruct;
  ReceiverHandle: THandle;
begin
  ...
  CopyDataStruct.dwData := 0;
  CopyDataStruct.cbData := 1 + Length(FileName) * SizeOf(Char);
  CopyDataStruct.lpData := PChar(FileName);

  ReceiverHandle := FindWindow(PChar('TReceiverForm'), PChar('ReceiverForm'));
  if ReceiverHandle > 0 then
  begin
    SendMessage(ReceiverHandle, WM_COPYDATA, 0, Integer(@CopyDataStruct));
  end;
  ...
end;
Bei ReceiverForm musst Du natürlich Dein Zielfenster eintragen.

Ich hoffe, das hilft Dir.

Lutz
  Mit Zitat antworten Zitat