Друзья помогите!
Имею следующий код:

procedure TfrmMain.btnCalcClick(Sender: TObject);
var
 I: integer;
begin
 for I := 0 to ControlCount-1 do
 if (Controls[I] is TEdit) then
 begin
  Memo1.Lines.Add(TEdit(Controls[I]).Text);
 end;
end;

Не могу получить доступ к published свойствам в коде. В данном случае это свойство "Text".
Как решить проблему?