請問一個問題在TabSheep這個元件裡 ,要如何將上面的TabSheet1...2...等拉開在整個TabSheep上呢? 目前只能在一直從左上新增 發表人 - Gemi0305 於 2003/11/11 09:18:20

引言: 請問一個問題在TabSheep這個元件裡 ,要如何將上面的TabSheet1...2...等拉開在整個TabSheep上呢? 目前只能在一直從左上新增

aamihcom 你好: 試試加入以下的程式碼，看是否符合你的需求 < class="code"> __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { PageControl1->TabWidth=PageControl1->Width/PageControl1->PageCount; } -- Enjoy Researching & Developing --

好像不行,元件屬性不太一樣....^^

小弟用的是delphi沒有tabsheep 但也有一個tabcontrol 或許對你有用是抄RaynorPao大大的文章 procedure TForm1.FormActivate(Sender: TObject); begin tabControl1.TabWidth:=(tabControl1.Width div tabControl1.Tabs.Count); end; 「堅持」從洗馬桶做起 Aric

RaynorPao您好~…請問 我使用你的方式…但上面的TabSheet的右方卻會多出UpDown… 如圖： 如何不要多出UpDown.. 我是使用 PageControl1->TabWidth=PageControl1->Width*0.99/PageControl1->PageCount; 的方式就可以不多出UpDown... 但有更smart的方式嗎？！