当一个窗体上有PageControl 控件时，是先执行 FormShow呢，还是先执行PageControl 的 TabSheet2Show呢
摘要：答案是 先执行TabSheet2Show ,总算知道了，顺便推理Onshow事件的执行顺序是 从内到外，先执行容器内的控件的事件，再执行 窗体的事件
阅读全文
posted @
2014-08-03 17:45
del88
阅读(160)
推荐(0) 编辑
delphi如何更改pagecontrol标签颜色
摘要：(1)先把 PageControl1 的 OwnerDraw 属性设为 true(2)程序代码修改如下:procedure TForm1.PageControl1DrawTab(Control: TCustomTabControl; TabIndex: Integer; const Rect: TR
阅读全文
posted @
2013-04-22 00:15
del88
阅读(45)
推荐(0) 编辑
pagecontrol获取选中选项卡的值
摘要：if PrintTab_pc.ActivePage.Caption = '已付款未打印 (打印订单)' then begin MyTopTradeApi := TTopTradeApi.Create; try {把原来勾选的取消} MyTopTradeApi.UnXuanzhongAllTid; {
阅读全文
posted @
2012-05-22 23:32
del88
阅读(4)
推荐(0) 编辑
隐藏PageControl控件的选项卡
摘要：在Delphi中隐藏PageControl的选项卡！ 隐藏的代码如下！ var i:integer;begin for i:=0 to page.PageCount -1 do begin page.Pages[i].TabVisible := false; end; 这就可以将此控件的选项卡全部隐
阅读全文
posted @
2011-12-19 19:17
del88
阅读(51)
推荐(0) 编辑
TPageControl隐藏tab页.和傲游那样双击空白处便可以新增一个空白页
摘要：PageControl1.Pages[0].TabVisible := true;PageControl1.Pages[1].TabVisible := false;注意到这里是 tabvisible而不是visible 我就是想实现像傲游那样，双击空白处便可以新增一个空白页，双击已经存在的SHEE
阅读全文
posted @
2011-12-19 19:15
del88
阅读(12)
推荐(0) 编辑
TCategoryPanel,TPageControl,TTreeView结合做导航
摘要：先上图： 左侧treeview的onchange事件的代码为： for I := 0 to PageControl1.PageCount-1 do begin if PageControl1.Pages[I].Caption = BasicSetup_tv.Selected.Text then//这
阅读全文
posted @
2011-12-19 17:39
del88
阅读(15)
推荐(0) 编辑
关于PageControl的一些属性
摘要：73）问：PageControl组件好像比TabControl组件功能更强大，它是怎样使用的？ 答：与TabControl相比，PageControl组件的功能确实更加强大，但是却并不复杂。PageControl中的每一个页都是一 个TTabSheet组件，这个组件实际上是一个容器，你可以在上面放置
阅读全文
posted @
2011-12-19 16:59
del88
阅读(26)
推荐(0) 编辑
了解属性
摘要：PageControl组件位于组件板的Win32页中，该组件用于实现窗体上多页面技术，每个页面上均能添加若干控件。程序运行时，单击页面标签就可以在多页之间切换。 1．建立多页 用鼠标右键单击PageControl组件，在弹出式菜单中选择New Page子菜单可添加新页，用Delete子菜单可删除当前
阅读全文
posted @
2011-12-19 16:51
del88
阅读(9)
推荐(0) 编辑
