如何得到TEdit.text的地址？因为有指针要指向它。

Question

var
a:pchar
a:=pchar(edit1.text);

Answer 1

这样写：var edit1p,edit2p:^String;beginedit1p^:=edit1.text;
edit2p^:=edit2.text;
end;end.

Answer 2

TEdit.Text是一个属性，不是用来存储东西的地方，你用字符串指针指向它干吗？

Answer 3

string是delphi自己管理的东东，不推荐使用他的指针操作。
最好使用pchar这种理论性的研究也比较少见。;)

Answer 4

pchar(edit1.text);  就变成指针形式的了

Answer 5

只知道赋予字符串可以这样SendMessage(Edit1.Handle, EM_REPLACESEL, 0, LongInt(PChar('xy')));

Answer 6

Edit.Text是动态得到的，哪来的地址啊！
直接指向edit不就可以访问它的Text了，何必硬要指到它的Edit呢？！！！

Answer 7

你得不到它有效的指针。
这个问题，我几年前曾经也试图得到，想在别的函数里面通过指针赋值。
一支不行，后来看了TEdit的源代码才知道为什么不行。看help能知道这个Text属性继承与TControl.
真正的Text 是 private FText，我们访问不到。
我们平时使用 Text:= xxx;
xxx:= Edit.Text 这都是通过方法操作的，所以单单从 Edit.Text 上面的不到任何有效的指针。