Question

Delphi 有一个TEDIT控件，我将它设为只读，我定义了一个string变量 str，可以通过按钮改变TEDIT中的内容

假设TEDIT中内容是txt，我想将它放到str中去，然后无论怎么通过按钮改变TEDIT中的内容，str始终是txt，请问怎么实现，谢谢大家了~~~~~

Answer 1

TEdit.Text是一个变量 Str也是一个变量 两个变量分别有不同的存贮空间
Str:= TEdit.Text是一个赋值操作
这里把Str换成一个指针并指向TEdit.Text即可通过改变Str指向的值来同步改变TEdit.Text
在这里，我建议直接操作TEdit.Text，TEdit控件的只读是针对用户而言的，代码操作不受限制。

追问

谢谢您，我是想将TEdit中的text放入str后TEdit中text即使改变了str中的内容也不会改变

追答

在相关代码前加入Str:= TEdit.Text;一句就够了……
我觉得您最好还是把您的具体需求说出来更好些。

Answer 2

下面这估代码可不可以满足你的要求:
窗体里声明私有变量Str:WideString;
双击按钮,在弹出窗口里输入以下代码 :
Str:=TEdit1.Text;
self.Enabled:=false; //使Button不可用,防止Str内容被再次修改;
这样,Edit1无论你怎么修改,Str内容不会再次修改了.

Answer 3

你按钮怎么改变TEdit里面内容的？
贴代码出来，帮你改