PageControl 驱除tabsheet

PageControl 清除tabsheet
RzPageControl 我现在用数据库动态创建了tabsheet,但是原有tabsheet我想清除,如何清格,
RzPageControl.clear不行的
[解决办法]
RzPageControl1.Pages[ i ].Free; // 移除第 i 个tabsheet
[解决办法]
var
  I: Integer;
begin
  with RzPageControl1 do
    for I:=0 to Pred(PageCount) do
      Pages[0].Free;
end;