IntraWeb 學習日記：【TIWTabControl】

為了要實作像 Win32 Form MDI 那樣的程式，我們可以借用 IntraWeb 的 TIWTabControl 來實現多支程式的執行。

實務操作起來也不是很難，雛形大概會長成這樣：

實作程式碼如下：

var
  LIWTabPage: TIWTabPage;
  LMyFrame: TIWFrame2;
begin
  LIWTabPage := IWTabControl1.CreateNewPage('TEST' +IntToStr(Random(10000)));
  LMyFrame := TIWFrame2.Create(LIWTabPage);

  LMyFrame.Align := alClient;
  LMyFrame.Name := 'TEST' +IntToStr(Random(10000));
  LMyFrame.Parent := LIWTabPage;
  IWTabControl1.ActivePage := IWTabControl1.Pages.Count-1;
end;

真是意外的簡單！