3
我使用帶有多個選項卡的TTabSet
組件。現在我想爲每個選項卡分配一個圖像,爲此我將Images
屬性的值設置爲圖像列表,然後選項卡隨圖像一起顯示。問題是如何爲TTabSet組件的選項卡設置imageindex?如何設置TTabSet組件的選項卡的圖像索引
我使用帶有多個選項卡的TTabSet
組件。現在我想爲每個選項卡分配一個圖像,爲此我將Images
屬性的值設置爲圖像列表,然後選項卡隨圖像一起顯示。問題是如何爲TTabSet組件的選項卡設置imageindex?如何設置TTabSet組件的選項卡的圖像索引
您必須使用TTabSet.OnGetImageIndex
事件來將特定圖像索引分配給選項卡。
檢查該樣本
procedure TForm1.TabSet1GetImageIndex(Sender: TObject; TabIndex: Integer;
var ImageIndex: Integer);
begin
Case TabIndex of
0: ImageIndex:=1;
1: ImageIndex:=7;
2 ImageIndex:=0;
3: ImageIndex:=9;
end;
end;
爲什麼沒有提到XE2錯誤的? –
@DavidHeffernan XE2 [Bug](http://theroadtodelphi.wordpress.com/2011/11/28/fixing-a-vcl-style-bug-in-the-tpagecontrol-and-ttabcontrol-components/)doesn'不影響TTabSet組件,OP也使用Delphi XE。 – RRUZ