DDEClientItem 的 ddeItem属性的问题。 ( 积分: 50 )

DDEClientItem 的 ddeItem属性是个string的变量。

为什么不能被赋值呢？

DDEClientItem.ddeItem:='hello';

edit1.text:=DDEClientItem.ddeItem;

edit1.text仍然为空为什么？

不能赋值的话，DDEClientItem.ddeItem的onchang怎么用呢？

DDEClientItem 的 ddeItem属性是个string的变量。

为什么不能被赋值呢？

DDEClientItem.ddeItem:='hello';

edit1.text:=DDEClientItem.ddeItem;

edit1.text仍然为空为什么？

不能赋值的话，DDEClientItem.ddeItem的onchang怎么用呢？

程序如下：

procedure TForm1.Button2Click(Sender: TObject);//建立连接
begin

if not DDEClient. setLink('progman','progman') then
raise Exception.Create ('Could not link to DDE server.');

ddeclientitem1.DdeItem:='腾讯TT';

edit2.Text:=ddeclientitem1.DdeItem;
edit1.Text:= ddeclient.RequestData(ddeclientitem1.DdeItem);
ddeclient.OpenLink;
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
DDEClient.CloseLink;{断开连接}

end;

procedure TForm1.Button1Click(Sender: TObject);//读出数据
begin

showmessage(ddeclientitem1.DdeItem);//显示为空
edit1.Text:= ddeclient.RequestData(ddeclientitem1.DdeItem);
edit1.Text:= ddeclient.RequestData('腾讯TT');//这句可以读出

end;
问：为什么ddeclientitem1.DdeItem的值会为空呢？

我顶。

问题解决了，顶者有分。