TClient = class(TPersistent)
private
FFirstName: string;
public
FirstName: string read FFirstName write FFirstName;
end;
Связать контрол и поле класса
Привет народ! С Наступившим Вас!
У меня вопрос: как связать визуальные Контролы на форме с некоторыми полями класса?
Имеется некий класс:
Далее я создаю какую-нибудь форму и бросаю на неё обычный Edit.
Надо сделать так, чтобы значение Edit1.Text и FClient.FirstName всегда были одни и теже. Т.е. меняю в одном - сразу меняется в другом. Как будто они указывают на одну и ту же область памяти.
Как это вообще делается в Delphi ?
У меня вопрос: как связать визуальные Контролы на форме с некоторыми полями класса?
Имеется некий класс:
Код:
Далее я создаю какую-нибудь форму и бросаю на неё обычный Edit.
Код:
TForm1 = class(TForm)
Edit1: TEdit;
private
FClient: TClient;
public
property Client: TClient read FClient write FClient;
end;
Edit1: TEdit;
private
FClient: TClient;
public
property Client: TClient read FClient write FClient;
end;
Надо сделать так, чтобы значение Edit1.Text и FClient.FirstName всегда были одни и теже. Т.е. меняю в одном - сразу меняется в другом. Как будто они указывают на одну и ту же область памяти.
Как это вообще делается в Delphi ?
Сделай обработчитк события Edit onChange.
+свои функции вместо FFirstName в "read FFirstName write FFirstName;" =оптимальный вариант
Text - такой же property, его значение в привате, на него ссылку будет сложно получить. разве что компонент переписать
Text - такой же property, его значение в привате, на него ссылку будет сложно получить. разве что компонент переписать
Почему не сделать св-во TClient.AssociatedEdit и по TClient.GetFirstName() делать Result := AssociatedEdit.Text; (соотв-но и для Set...())