20.05.2010, 16:17
|
|
Участник форума
Регистрация: 20.12.2008
Сообщений: 277
С нами:
9152955
Репутация:
84
|
|
Это немного не то. Например я таким образом создал 5 полей, как мне изменить свойство Text в 4-ом поле?! Ведь имя я указывал только одно - "х".
Создавая поле, присваивай ему уникальное имя Name и обращайся к нему по имени 
procedure TForm1.Button2Click(Sender: TObject);
var x : TEdit;
begin
x := TEdit.Create(self);
x.Name := 'Edit1';
x.Parent := self;
end;
procedure TForm1.Button3Click(Sender: TObject);
begin
TEdit(FindComponent('Edit1')).Text := 'I''ve found you!';
end;
Еще раз повторяю: х - название переменной, а не компонента
|
|
|