請問:要如何將檔案開在動態新增的pagecontrol的memo上呢? (就是選擇開啟檔案後，檔案的內容出現在每按一次按鈕pagecontrol就會新增一個TabSheet及memo的memo上) ，以下是我寫的程式: 這是mainmenu的openpage功能鈕程式碼 procedure TForm1.OpenPage1Click(Sender: TObject); var tab: TTabSheet;    mem: TMemo; begin           tab := TTabSheet.Create(self);       tab.PageControl := PageControl1;          mem := TMemo.Create(Self);       mem.Parent := tab;       mem.Align:=alclient;       tab.Caption:='Page'+inttostr(tab.pageindex+1);//fileopen1.Dialog.FileName;       mem.PopupMenu:=popupmenu1;       mem.Name := 'Memo'+inttostr(tab.PageIndex+1); // 指定 TMemo 的 Name 屬性 end;    這是在ActionList上負責開啟檔案的程式 procedure TForm1.FileOpen1Accept(Sender: TObject);  var tab: TTabSheet;       mem: TMemo; begin    mem := FindComponent('Memo'+inttostr(mem.Action.ComponentCount))as TMemo  ;      mem.Lines.LoadFromFile(fileopen1.Dialog.FileName); end; 結果是只能開啟檔案到TabSheet1的memo1中，如果現在點選到的是Tabsheet2的memo2，則開 啟的檔案還是只在memo1中開啟，請幫忙，謝謝!!