Показать сообщение отдельно
  #6  
Старый 25.05.2009, 20:28
Nyctos Kasignete Nyctos Kasignete вне форума
Активный
 
Регистрация: 29.03.2009
Сообщения: 300
Репутация: 94
По умолчанию

У формы как потомка TComponent есть метод FindComponent.
Код:
var
  EditName: string;
  EditFound: TComponent;
begin
  EditName := 'Edit1';
  EditFound := FindComponent(EditName);
  if EditFound <> nil then
    (EditFound as TEdit).Text := 'blah-blah';
end;
Ответить с цитированием