PageControl 清除tabsheet

bruceoffice 2013-06-12 03:40:20
RzPageControl 我现在用数据库动态创建了tabsheet,但是原有tabsheet我想清除,如何清格,
RzPageControl.clear不行的
...全文
87 2 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
s11ss 2013-06-12
  • 打赏
  • 举报
 回复
var I: Integer; begin with RzPageControl1 do for I:=0 to Pred(PageCount) do Pages[0].Free; end;
sololie 2013-06-12
  • 打赏
  • 举报
 回复
RzPageControl1.Pages[ i ].Free; // 移除第 i 个tabsheet
UniGUI集合说明
为了每个在线用户分配一套变量，并在用户断开连接后自动清除，可以通过以下方法实现： - **利用Session**：使用UniGUI的Session机制来存储每个用户的变量。 - **Session销毁**：通过监听Session的结束事件，在用户...
UniGUI集合说明--追月无名.pdf
- **添加到TabSheet**：将创建的对象添加到`TabSheet`中。 #### 26. UniGUI中如果获得 Session情况 在UniGUI中获取Session情况的方法： - **使用Session对象**：通过`Session`对象访问Session数据。 - **监听...
清空panel的edit控件文字
unit Unit2;interfaceuses SysUtils,Forms,ExtCtrls,StdCtrls;procedure ClearEdit(pl:TPanel);implementationprocedure ClearEdit(pl:TPanel);var i:integer;begin for i := 0 to pl.ControlCount -1 ...
PageControl分组框学习。
照着书超的一些代码，留着以后看看。   procedure TForm1.FormCreate(Sender: TObject);... pagecontrol2.MultiLine:=not PageControl2.MultiLine;//很漂亮的一个属性，个折叠未显示的表头 end; end.  
考勤管理系统
本页在TabSheet4上添加3个GroupBox组件，3个BitBtn组件，3个DBGrid组件，3个Query组件，3个DataSouree组件，4个UpDown组件和7个Label组件。接下来，在“系统信息”按钮的OnClick事件中添加如下的代码，用于显示...
Delphi

5,929

社区成员

262,934

社区内容

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章