Daten zwischen 2 Prozessen austauschen?? Wie?

[thomasdrewermann]

Hi,
ich möchte zwei programme programmieren, die untereinander daten austausen können, wenn beide laufen. (NICHT ÜBERS NETZWERK!!!!)

MFG
Thomas

[d3g]

Hi thomas,

schau mal im PSDK/MSDN unter dem Stichwort WM_COPYDATA, das sollte das richtige für dich sein.

MfG,
d3g

[Daniel]

Alternativ schau' im PSDK nach den Stichworten "Shared Memory" oder "Pipe".


Grüße,
Daniel

[Christian Seehase]

Moin Thomas,

welches Volumen können die Daten denn haben, und von welchem Typ sind diese?

So auf Anhieb fallen mir vier Möglichkeiten ein:

1. Verwendung von WM_COPYDATA
2. Registieren einer eigenen Message via RegisterWindowMessage
3. Nutzung der Atom Table
4. DDE (auch wenn ich keine Ahnung von der Umsetzung habe ;-)

EDIT: 19:37, 19:38, 19:39 :mrgreen: /EDIT

[thomasdrewermann]

Das mit der Window-Message hört sich gut an auch für Strings???
Kann mir jemand n Code-Schnipsel posten?

[d3g]

Hi Thomas,

Sender:

Code:

procedure TForm1.FormCreate(Sender: TObject);
var
  aCopyData: TCopyDataStruct;
  p: PChar;
begin
  p := 'Hallo!';

  with aCopyData do begin
    dwData := 0;
    cbData := StrLen(p) + 1;
    lpData := p;
  end;

  SendMessage(FindWindow('TFormRecv', nil), WM_COPYDATA, Longint(Handle),
              Longint(@aCopyData));

  Application.Terminate;
end;

Receiver:

Code:

type
  TFormRecv = class(TForm)
  private
    procedure WMCopyData(var Msg: TWMCopyData); message WM_COPYDATA;
  end;

// ...

procedure TFormRecv.WMCopyData(var Msg: TWMCopyData);
begin
  ShowMessage(String(Msg.CopyDataStruct.lpData));
end;

MfG,
d3g

[thomasdrewermann]

Hat super geklappt, danke für den Source CODE!!!!


MFG
THOMAS

[thomasdrewermann]

Irgendwie ist das jetzt unzuverlässig :-(

Hat jemand noch ne Idee warum???
Da kommt nie ne Messagebox, obwohl die namen Stimmen :-(

[Luckie]

Messagebox? Die müßtest du dan aber gemacht haben oder?

Sollte eigentlich funktioniern. Überprüf mal, ob das Fensterhandle gültig ist. Sprich, ob der Sender die Daten auch an das richtige Fenster schickt.

[thomasdrewermann]

Kann das sein, dass das nur mit sichtbaren Fenstern geht?