TIWLabel? ? // TIWLink? ? ? //內(nèi)部鏈接 TIWURL? ? ? //外部鏈接 TIWURLWindow //頁(yè)內(nèi)框架, 就是 <iframe></iframe>

---

TIWLabel?所在單元及繼承鏈:
IWCompLabel.TIWLabel < TIWCustomLabel < TIWCustomControl < TIWBaseHTMLControl < TIWBaseControl < TIWVCLBaseControl < TControl < TComponent < TPersistent < TObject

主要成員:

---

property AutoSize: Boolean? ? ? //自動(dòng)大小 property Caption: TCaption? ? ? //使用 Text 也行 property RawText: Boolean? ? ? ? //= True 時(shí), 會(huì)把 Caption 當(dāng)做 Html 源代碼 property ConvertSpaces: Boolean? //是否轉(zhuǎn)換空格; 如果 False, 連續(xù)的空格只能被識(shí)別為一個(gè) property NoWrap: Boolean? ? ? ? // = False 且 ConvertSpaces = False 且 AutoSize = False 時(shí), 可換行 property ForControl: TIWCustomControl? //指定它是哪個(gè)控件的標(biāo)簽; 指定后, 點(diǎn)擊該 Label 會(huì)激活指定的控件

---

RawText 屬性測(cè)試:

---

procedure TIWForm1.IWAppFormCreate(Sender: TObject); begin ? IWLabel1.RawText := True; ? IWLabel1.Caption := '<a href="http://del.cnblogs.com">萬(wàn)一的 Delphi 博客</a>'; end;

---

TIWLink?所在單元及繼承鏈:
IWHTMLControls.TIWLink < TIWLinkBase < TIWCustomControl < TIWBaseHTMLControl < TIWBaseControl < TIWVCLBaseControl < TControl < TComponent < TPersistent < TObject

主要成員:

---

property Confirmation: string? // property DoSubmitValidation: Boolean? // property RawText: Boolean? // property Caption: TCaption? // property RawText: Boolean? // property OnClick: TNotifyEvent? //

---

TIWLink 示例:

---

uses Unit2; procedure TIWForm1.IWLink1Click(Sender: TObject); begin ? TIWForm2.Create(WebApplication).Show; end;

---

TIWURL?所在單元及繼承鏈:
IWHTMLControls.TIWURL < TIWLinkBase < TIWCustomControl < TIWBaseHTMLControl < TIWBaseControl < TIWVCLBaseControl < TControl < TComponent < TPersistent < TObject

主要成員:

---

property TargetOptions: TIWURLTarget //目標(biāo)窗口選項(xiàng) property TerminateApp: Boolean //跳轉(zhuǎn)時(shí), 是否同時(shí)終止應(yīng)用 property URL: string? ? ? ? //跳轉(zhuǎn)地址 property UseTarget: Boolean? //是否使用目標(biāo)窗口 property RawText: Boolean? ? // property Caption: TCaption? // ? TIWURLTarget 類(lèi)的成員: ? property Left: Integer ? property Top: Integer ? property Width: Integer ? property Height: Integer ? property WindowName: string ? property AddressBar: Boolean ? property Menu: Boolean ? property Resizable: Boolean ? property Scrollbars: Boolean ? property Toolbar: Boolean ? property Mode: TIWURLTargetMode //TIWURLTargetMode = (tmBlank, tmNewWindow, tmParent, tmSelf, tmTop) ? function GetModeString(AMode: IWHTMLControls.TIWURLTargetMode): string

---

TIWURL 示例:

---

{在新標(biāo)簽頁(yè)打開(kāi)} procedure TIWForm1.IWAppFormCreate(Sender: TObject); begin ? IWURL1.URL := 'http://www.cnblogs.com/del'; end; {在新窗口打開(kāi)} procedure TIWForm1.IWAppFormCreate(Sender: TObject); begin ? IWURL1.URL := 'http://www.cnblogs.com/del'; ? IWURL1.UseTarget := True; ? IWURL1.TargetOptions.Top := 0; ? IWURL1.TargetOptions.Left := 0; end; {在當(dāng)前頁(yè)打開(kāi)} procedure TIWForm1.IWAppFormCreate(Sender: TObject); begin ? IWURL1.URL := 'http://www.cnblogs.com/del'; ? IWURL1.UseTarget := True; ? IWURL1.TargetOptions.Mode := tmSelf; end;

---

TIWURLWindow?所在單元及繼承鏈:
IWHTMLControls.TIWURLWindow < TIWCustomControl < TIWBaseHTMLControl < TIWBaseControl < TIWVCLBaseControl < TControl < TComponent < TPersistent < TObject

主要成員:

---

property URI: string? //地址 property Border: Boolean? //使用要邊框 property Scrolling: TIWURLWindowScrolling //是否顯示滾動(dòng)條: usYes、usNo、usAuto

---

TIWLink 示例:

---

procedure TIWForm1.IWAppFormCreate(Sender: TObject); begin ? IWURLWindow1.URI := 'http://del.cnblogs.com'; ? IWURLWindow1.Border := True; ? IWURLWindow1.Align := alLeft; end;

---

?

轉(zhuǎn)載于:https://www.cnblogs.com/martian6125/p/9630982.html

總結(jié)

以上是生活随笔為你收集整理的使用 IntraWeb (13) - 基本控件之 TIWLabel、TIWLink、TIWURL、TIWURLWindow的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問(wèn)題。

如果覺(jué)得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。