Parameter SCHNELL an Hauptprog weiterleiten

[Nogge]

es hat zwar nichts damit zu tun, aber ok...hier mein source code fürs empfangen (so wird diese Thread wenigstens in der übersicht wieder nach oben geschoben^^):

Delphi-Quellcode:

procedure TForm1.WMCopyData(var Msg: TWMCopyData);
var sText: Array of Char; Item: String; ForegroundThreadID,ThisThreadID:Cardinal;
begin
case Msg.CopyDataStruct.dwData of
  MY_SENTPARAM: begin                        
    SetLength(sText,Msg.CopyDataStruct.cbData);
    StrLCopy(PChar(sText),Msg.CopyDataStruct.lpData,Msg.CopyDataStruct.cbData);
    Item:=PChar(sText);
    Listbox1.Items.Add(Item);
  MY_SHOWAPP: begin
    ForegroundThreadID:=GetWindowThreadProcessID(GetForegroundWindow);
    ThisThreadID:=GetWindowThreadProcessId(Handle);
    if AttachThreadInput(ThisThreadID,ForegroundThreadID,True) then begin
    BringWindowToTop(Handle);
    SetForegroundWindow(Handle);
    AttachThreadInput(ThisThreadID,ForegroundThreadID,False);
    end; end;
end;

ist mein problem wirklich so schwer zu lösen oder möchte mir hier einfach niemand ne lösung schreiben?^^