2016/07/05

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;

真是意外的簡單!

沒有留言:

張貼留言

How to use URLEncode in Delphi

URL編碼,也稱【百分號編碼(Percent-encoding)】 由於 URL 不能直接接受 UTF8 文字,所以要先轉成百分號編碼後,如此網址才能順利送給 HTTP Server 從 Indy 加入 Delphi 後,就可以用 IdURI.TIdURI 單元進行編碼 ...