delphi初学者关于pagecontrol和tabsheet的问题，请多多指教。

Question

试着解答：
1）这是Delphi本身的一种管理控件的方法，可以不必深究，知道就行。
2）在With语句可以加入对其他控件的操作。
3) for i:=0 to PageControl1.PageCount-1 do 
   a[i]:=PageControl1.Pages[i].Caption;

Answer 1

TPageControl中的Pages数组是动态的吗？我想作的是在TPageControl内部增加一个像Pages数组一样的数组(和Pages数组交换数据)，是不是要修改TPageControl的源代码？如果是的话，源代码在哪里呢？

Answer 2

在With语句可以加入对其他控件的操作。
 for i:=0 to PageControl1.PageCount-1 do 
  a[i]:=PageControl1.Pages[i].Caption; 

Answer 3

动态数组怎么用？怎么加到TPageControl中去？

Answer 4

varwith pagecontrol1 do
  for i:= 1 to 9 do
  with TTabSheet.Create(Self) do
    begin
        PageControl := pagecontrol1;
        Pages[i].Caption:='fadsf';
        ...
    end;

Answer 5

var
  a:array of String;
  max: integere;
begin
  max:=9;
  setlength(a,max);
with pagecontrol1 do
  for i:= 1 to max do
  with TTabSheet.Create(Self) do
    begin
        PageControl := pagecontrol1;
        a[i]:='Page['+IntToStr(i)+']';
        Pages[i].Caption:=a[i];
        ...
    end;
end;

Answer 6

要是delphi编译器连这点都搞不清楚地话，我们还会用它吗