Показать сообщение отдельно
  #24  
Старый 09.10.2010, 18:36
Аватар для Sky.NET
Sky.NET Sky.NET вне форума
Прохожий
 
Регистрация: 22.09.2010
Сообщения: 49
Версия Delphi: XE
Репутация: 12
По умолчанию

Ты не правильно делаешь. Нужно так:
Код:
if chr(Key) = TEdit(form12.FindComponent('Edit' + IntToStr(i))).Text then
        script.Lines.Add(TLabeledEdit(form12.FindComponent('LabeledEdit' + IntToStr(i))).Text);
И всё прекрасно хватается из другой формы.
__________________
IDE := Embarcadero.RADStudio.XE.Architect
// Успешность метода научного тыка обратно пропорциональна извилистости головного мозга на кривизну рук ©
Ответить с цитированием