[Electronic_Arts]

Столкнулся с такой проблемой -

Код:

 TabSheet:= TTabSheet.Create(self);
 TabSheet.PageControl:= PageControl1;
 Tabsheet.Caption:= t;
 Memo := TAdvMemo.Create(TabSheet);
 TControl(Memo).Parent:= Tabsheet;

Создали в новую закладку добавили туда МЕМО - теперь вопрос - как узнать номер или же как обращаться к Мемо которая находиться в активной странице PageControl что бы загрузить в него текст...

[M.A.D.M.A.N.]

ActivePage.

[Electronic_Arts]

А если подробно? я уже все перепробовал - просто по яснее напиши как?

[Vocabulary]

На самом деле, коллеги, этот мемо не грех и поискать:

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
  I : Integer;
  T : TTabSheet;
begin
  T := PageControl1.ActivePage;
  for I := 0 to T.ControlCount-1 do
    if T.Controls[i] is TMemo then
      TMemo(T.Controls[i]).Lines.LoadFromFile();
end;

[Electronic_Arts]

Vocabulary спасибо огромное!.....