Скачать: CL | DM;

Как создать указатель не на сам TEdit, а на его свойство Text?   Найти похожие ветки 

← →
BThorn   (2002-11-28 09:48) [0]

Есть несколько объектов Edit1 .. Edit6 класса TEdit.
Хочу работь со свойством Text этих обьектов черех указатель,
но не могу сообразить как это сделать. :-(

Пытаюсь, дает ошибку:
---------------
var ..
MyText:^String; {или MyText:^TCaption;}

begin
..
MyText:=@Edit1.Text;
..
MyText:=@Edit6.Text;
..
MyText^:="Hi";
..
end;
--------------------

Сейчас работает так (но хотелось бы непосредственно через Text):
--------------------
var ..
MyEdit:^TEdit;

begin
..
MyEdit:=@Edit1;
..
MyEdit:=@Edit6;
..
MyEdit^.Text:="Hi";
..
end;
---------------------

---

← →
Игорь Шевченко ©   (2002-11-28 10:04) [1]

Никак. TEdit.Text - это вызов методов TEdit.GetText и TEdit.SetText. Не стоит желать странного.

---

← →
McSimm ©   (2002-11-28 11:17) [2]

> Сейчас работает так (но хотелось бы непосредственно через
> Text):

Лучше так. Меньше путаницы, да и привыкать надо.
var ..
MyEdit: TEdit;
begin
..
MyEdit:=Edit1;
..
MyEdit:=Edit6;
..
MyEdit.Text:="Hi";
..
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.014 c