So sieht der Code aus
Delphi-Quellcode:
var
MainForm: TMainForm;
MyDDEServerConv: TDDEServerConv;
MyDDEServerItem : TDDEServerItem;
implementation
{$R *.dfm}
procedure TMainForm.FormCreate(Sender: TObject);
begin
MyDDEServerConv := TDDEServerConv.Create(nil);
MyDDEServerItem := TDDEServerItem.Create(MyDdeServerConv);
MyDDEServerItem.ServerConv := MyDdeServerConv;
end;
procedure TMainForm.btn_startClick(Sender: TObject);
begin
MyDDEServerItem.Text := 'Hallo';
end;
Wenn ich nun Excel als einfachen
DDE-Empfänger nutze muß ich ja wie folgt eingeben "=DATA|MyDdeServerConv!MyDDEServerItem" wobei DATA der Name meines
DDE-Senders(data.exe) ist. Meine Fremdanwendung möchte nun aber "=DATA|MyDdeServerConv!MyDDEServerItem 10" haben. Wie soll man das programmieren ? "var MyDDEServerItem 10 : TDDEServerItem;" geht ja nicht.