【ﾘｿｰｽ】かちゅ～しゃをカスタマイズする【ﾊｯｶｰ】

[35]なな～しゃさん：2003/08/01 08:13 ID:/lWFMz2U
254行に object TabControl: TDblClickTabControl1 ていうのがあるとので Style = xxx という行を挿入してください。 xxx には tsTabs tsButtons tsFlatButtons のどれかが使えます。ちなみに tsTabs がデフォ。

[36]なな～しゃさん：2003/08/01 08:14 ID:/lWFMz2U
ほかにも object TabControlPanel: TPanel に BevelInner = bvRaised を加え object TabButtonBar: TToolBar の EdgeBorders = [] 　　↓ EdgeBorders = [ebLeft, ebBottom] Height = 22 　　↓ Height = 23 にしています。雰囲気変わるよ。

前次新