如何动态增加删除pagecontrol页,并且保存当前状态(100分)

  • 主题发起人 主题发起人 yuleii
  • 开始时间 开始时间
Y

yuleii

Unregistered / Unconfirmed
GUEST, unregistred user!
我想在程序内设按钮,增加,删除pagecontrol页,并且在退出时保存最后的情况。
 
动态增删 TPageControl 的页,实际上就是动态创建 TTabSheet.

做几个你需要用的 TTabSheet 子类,然后添加到 TPageControl
 
这样就可以:
增加
tabpage:=ttabsheet.Create(self);
with tabpage do
begin
pagecontrol:=pagecontrol1;
caption:=listview1.Selected.caption;
align:=alclient;
end;
删除
找到当前active的也直接destory
 
如何保存?
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
484
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部