Указатель. Pointer

[AHTuKiLLeR]

Вопрос такой.
Для простоты понимания пример такого типа.
На форме расположены Edit, Label, Panel и Button.
При нажатии на кнопку необходимо чтобы переменая из Эдита прописалась в label.Caption и Panel.Caption, но не напрямую а через массив указателей, который предварительно инициализируется.
Вопрос заключается как раз как его инициализировать?
Чтобы при записи в элементы массива происходила замена названия у лэйбла и панели. Что-то вроде этого

PointerArray[0]:=Edit1.Text; //изменяем название лэйбла
PointerArray[1]:=Edit1.Text; //изменяем название панели

Ну или подскажите как удобно присвоить значение различным элементам(Label.Caption, Panel.Caption). Чтобы непострочно, а через массив.

[Пепел Феникса]

обьясните что вы хотите
а то по коду написано одно а по комментам должно быть иное
кстати если там указатели то надо так писать:

PointerArray[0]:=@Edit1.Text;

[AHTuKiLLeR]

Я хочу создать массив, в которых буду храниться указатели к компонентам, чтобы присваивая стринговую переменную(текст) этот текст присваивался компонентам.
Тоесть будет массив PointerArray. При присвоении элементам этого массива значения 'New text' на форме компоненты Label или Panel стали отображать эту строку.

[Пепел Феникса]

со свойствами так работать нельзя
а почему бы не написать просто Edit1.Text:='New Text'?

[AHTuKiLLeR]

Сообщение от Пепел Феникса

а почему бы не написать просто Edit1.Text:='New Text'?

Так это мне не надо. Мне надо текст из эдита записать в названия лэйблом(TLabel) и панелей(TPanel) через указатель. Это осуществимо?
Или всетаки придется работать построчно. Вроде такого

Label1.Caption:=Edit1.Text;
Label2.Caption:=Edit1.Text;
Panel1.Caption:=Edit1.Text;

[Пепел Феникса]

поймите Edit1.Text это свойство, а не переменная
указатель указывает или на функцию или на переменную

[Izhic]

Дак это свойство же ссылается на строку в итоге? Или нет...
--------Разве нельзя сместить указатель или они идут подряд в памяти?
(нат попробовать)*Ушёл пробовать*
-------------------------------------

После слова read указывается поле или метод, к которому происходит
обращение при чтении значения свойства, а после слова write – поле или
метод, к которому происходит обращение при записи свойства. Атрибуты read
и write называют спецификаторами доступа. Если один из них опущен, то
свойство можно только читать (задан read) или только записывать (задан
write). Метод чтения поля – это всегда функция, возвращающая значение того
же типа, что и свойство. Метод записи свойства – это всегда процедура,
принимающая параметр того же типа, что и тип свойства. Один и тот же метод
может использоваться для получения (установки) значений нескольких свойств
одного типа. В этом случае каждому свойству назначается целочисленный
индекс, который передаётся в метод первым параметром.
При работе с объектом свойства выглядят как поля: они принимают
значения и участвуют в выражениях. Но в отличие от полей, свойства не
занимают места в памяти, а операции их чтения и записи ассоциируются с
обычными полями и методами. Так как свойства не имеют адреса в памяти, к
ним нельзя применить операцию @ и их нельзя передавать в качестве
параметров-переменных (Var) процедур и функций.
Технология ООП в Delphi предписывает избегать прямого обращения к
полям, создавая вместо этого свойства.
Источник

Из вопроса я понял что вы не столько хотите сэконмить память, как мне хочется
[Я то хотел что бы Все строки брались из одной памяти]
Поэтому Вам достаточно ИМХО указателей на объекты, а не на их свойства.

PointerArray[0]:=@Edit1;

Или хотя вспомнил, вот Как (указатель на память с началом Вашего текста, только надо сначала подогнать размер перед изменением):

P:=@Edit1.Text[1];