怎么样利用pagecontrol开发像腾讯TT多页签显示窗体？
Description of your first forum.
9 篇帖子 & 分页：1 / 1
由 hjp0214 & 星期三, 日 17:10
怎么样利用pagecontrol开发像腾讯TT多页签显示窗体？
由 地质灾害 & 星期三, 日 19:41
Form.Parent:=PageControl.Pages[0];Form.Align:=alC
由 hjp0214 & 星期四, 日 08:42
如果关闭，页签也要释放。打开窗体，先自动创建一个页签。一个窗体对应一个页签。
由 tgbdlwm & 星期四, 日 11:00
我用的方法与1楼有异曲同工之处，请参考：1、用 ManualDock 例：NewForm.ManualDock(page1);& & & & & & & & & & &NewForm.Visible:=T2、记得在NewForm的OnClose事件中加入 Action:=caF详细的方法，我记得写过一个过程，直接调用一下就行了，不过要找找，需要的话再联系。
由 luoyanqing119 & 星期四, 日 13:25
这么简单的问题,连地质灾害都过来涮分了.点下边的慢慢看.http://mail.hcvs.kh.edu.tw/hc3331/CBuilder/ch12.ppt
由 elsss & 星期五, 日 07:01
我给你我的做法吧，不正确请大家指正，本人是老菜鸟，不过幸好用过这个。procedure Tmain.OpenForm(cap:FormClass: TFormC fm:T PageC:TRZPageControl);var& NewPage: TRZTabS& i & & &:& isop & :& www & &:TRbegin& application.CreateForm(FormClass,fm); 创建窗体& NewPage := TRZTabSheet.Create(PageC);创建TabSheet& NewPage.PageControl := PageC;& NewPage.Caption :=& fm.Caption:=& PageC.ActivePage := NewP& www:=NewPage.BoundsR& fm.Dock(NewPage,www);& fm.Parent:=NewP& fm.Align:=& fm.end调用执行openform(fcaption,Tygxx_frm,ygxx_frm,PageControl1);fcaption：新打开窗口的captionygxx_frm：新打开窗口的namePageControl1:这个知道吧，放一个PageControl1，（我用的是RzPageControl1）下面双击关闭窗口procedure TMAIN.PageControl1MouseDown(Sender: TO& Button: TMouseB Shift: TShiftS X, Y: Integer);var i:begin & // &双击删除当前页面if (Button = mbLeft) and (ssDouble in Shift) thenbegin& &for i:=0 to screen.FormCount -1 do& & begin& & if screen.Forms[i].Caption=PageControl1.ActivePage.Caption then& & screen.Forms[i].C& &&(Sender as TRZPageControl).ActivePage.F
由 hjp0214 & 星期五, 日 08:58
TO:elsss,& 如果窗体已经打开了，还会重新创建另外窗体。应该是打开的窗体，如果再打开的话，只是重新显示
由 delhpi & 星期五, 日 10:41
直接用谷歌开源的好了
由 elsss & 星期五, 日 19:28
如果是打开的窗体可以用循环判断，让他显示，如果没打开就打开代码：&for i:=0 to PageC.PageCount-1 do& begin& &if PageC.Pages[i].Caption=cap then& &begin& &PageC.Pages[i].S& &&///因为前面我给的代码实现上是生成的页面caption和pagecontrol的caption一样所以用这个判断窗口是否已经打开。
9 篇帖子 & 分页：1 / 1二次元同好交流新大陆
扫码下载App
汇聚2000万达人的兴趣社区下载即送20张免费照片冲印
扫码下载App
温馨提示！由于新浪微博认证机制调整，您的新浪微博帐号绑定已过期，请重新绑定！&&|&&
计算机科学与技术专业,SAP 技术方向7 年
LOFTER精选
网易考拉推荐
用微信&&“扫一扫”
将文章分享到朋友圈。
用易信&&“扫一扫”
将文章分享到朋友圈。
SELECTION-SCREEN BEGIN OF SCREEN 102 AS SUBSCREEN.PARAMETER: p_field2 TYPE i.SELECTION-SCREEN END OF SCREEN 102.
SELECTION-SCREEN BEGIN OF SCREEN 103 AS SUBSCREEN.PARAMETER: p_field3 TYPE i.SELECTION-SCREEN END OF SCREEN 103.
多个标签叶怎么确定执行的哪一页的选择条件：
AT&SELECTION-SCREEN&OUTPUT.&&CLEAR:&LV_101,&LV_102 , LV_103, LV_104.&&IF&SY-DYNNR&=&101&.&&&&LOOP&AT&SCREEN&.&&&&&&IF&SCREEN-NAME&=&'P_BELNR1'.&&&&&&&&SCREEN-INPUT&=&'0'&.&&&&&&ENDIF.&&&&&&MODIFY&SCREEN.&&&&ENDLOOP.&&&&LV_101&=&'X'&.&&ELSEIF&SY-DYNNR&=&102&.&&&&LV_102&=&'X'&.&&ELSEIF&SY-DYNNR&=&103&.&&&&LV_103&=&'X'&.&&ELSEIF&SY-DYNNR&=&104&.&&&&LV_104&=&'X'&.&&ENDIF.
阅读(408)|
用微信&&“扫一扫”
将文章分享到朋友圈。
用易信&&“扫一扫”
将文章分享到朋友圈。
历史上的今天
loftPermalink:'',
id:'fks_',
blogTitle:'多页签的选择屏幕',
blogAbstract:'
SELECTION-SCREEN TAB (10) text-002 USER-COMMAND ucomm2&DEFAULT SCREEN 102.SELECTION-SCREEN TAB (10) text-003 USER-COMMAND ucomm3&DEFAULT SCREEN 103.SELECTION-SCREEN END OF BLOCK tabb1.
blogTag:'',
blogUrl:'blog/static/',
isPublished:1,
istop:false,
modifyTime:7,
publishTime:9,
permalink:'blog/static/',
commentCount:0,
mainCommentCount:0,
recommendCount:0,
bsrk:-100,
publisherId:0,
recomBlogHome:false,
currentRecomBlog:false,
attachmentsFileIds:[],
groupInfo:{},
friendstatus:'none',
followstatus:'unFollow',
pubSucc:'',
visitorProvince:'',
visitorCity:'',
visitorNewUser:false,
postAddInfo:{},
mset:'000',
remindgoodnightblog:false,
isBlackVisitor:false,
isShowYodaoAd:false,
hostIntro:'计算机科学与技术专业,SAP 技术方向7 年',
hmcon:'1',
selfRecomBlogCount:'0',
lofter_single:''
{list a as x}
{if x.moveFrom=='wap'}
{elseif x.moveFrom=='iphone'}
{elseif x.moveFrom=='android'}
{elseif x.moveFrom=='mobile'}
${a.selfIntro|escape}{if great260}${suplement}{/if}
{list a as x}
推荐过这篇日志的人：
{list a as x}
{if !!b&&b.length>0}
他们还推荐了：
{list b as y}
转载记录：
{list d as x}
{list a as x}
{list a as x}
{list a as x}
{list a as x}
{if x_index>4}{break}{/if}
${fn2(x.publishTime,'yyyy-MM-dd HH:mm:ss')}
{list a as x}
{if !!(blogDetail.preBlogPermalink)}
{if !!(blogDetail.nextBlogPermalink)}
{list a as x}
{if defined('newslist')&&newslist.length>0}
{list newslist as x}
{if x_index>7}{break}{/if}
{list a as x}
{var first_option =}
{list x.voteDetailList as voteToOption}
{if voteToOption==1}
{if first_option==false},{/if}&&“${b[voteToOption_index]}”&&
{if (x.role!="-1") },“我是${c[x.role]}”&&{/if}
&&&&&&&&${fn1(x.voteTime)}
{if x.userName==''}{/if}
网易公司版权所有&&
{list x.l as y}
{if defined('wl')}
{list wl as x}{/list}The page is temporarily unavailable
nginx error!
The page you are looking for is temporarily unavailable.
Please try again later.
Website Administrator
Something has triggered an error on your
This is the default error page for
nginx that is distributed with
It is located
/usr/share/nginx/html/50x.html
You should customize this error page for your own
site or edit the error_page directive in
the nginx configuration file
/etc/nginx/nginx.conf.&&&&asp.net多页签页面切换
&asp.net多页签页面切换
页面实现多页签切换效果。即多个页面显示或隐藏于同一个页面中，页面通过选项卡切换。
若举报审核通过，可奖励20下载分
被举报人：
举报的资源分：
请选择类型
资源无法下载
资源无法使用
标题与实际内容不符
含有危害国家安全内容
含有反动色情等内容
含广告内容
版权问题，侵犯个人或公司的版权
*详细原因：
VIP下载&&免积分60元/年（1200次）
您可能还需要
Q.为什么我点的下载下不了，但积分却被扣了
A. 由于下载人数众多，下载服务器做了并发的限制。若发现下载不了，请稍后再试，多次下载是不会重复扣分的。
Q.我的积分不多了，如何获取积分？
A. 获得积分，详细见。
完成任务获取积分。
论坛可用分兑换下载积分。
第一次绑定手机，将获得5个C币，C币可。
关注并绑定CSDNID，送10个下载分
下载资源意味着您已经同意遵守以下协议
资源的所有权益归上传用户所有
未经权益所有人同意，不得将资源中的内容挪作商业或盈利用途
CSDN下载频道仅提供交流平台，并不能对任何下载资源负责
下载资源中如有侵权或不适当内容，
本站不保证本站提供的资源的准确性，安全性和完整性，同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
开发技术下载排行
您当前C币：0&&&可兑换 0 下载积分
兑换下载分:&
消耗C币:0&
立即兑换&&
兑换成功你当前的下载分为 。前去下载资源
你下载资源过于频繁，请输入验证码
如何快速获得积分？
你已经下载过该资源，再次下载不需要扣除积分
asp.net多页签页面切换
所需积分：1
剩余积分：0
扫描微信二维码精彩活动、课程更新抢先知
VIP会员，免积分下载
会员到期时间：日
剩余下载次数：1000
asp.net多页签页面切换
剩余次数：&&&&有效期截止到：
你还不是VIP会员VIP会员享免积分 . 专属通道极速下载
VIP下载次数已满VIP会员享免积分 . 专属通道极速下载，请继续开通VIP会员
你的VIP会员已过期VIP会员享免积分 . 专属通道极速下载，请继续开通VIP会员同一页面实现多页签效果如何实现
[问题点数：20分]
同一页面实现多页签效果如何实现
[问题点数：20分]
不显示删除回复
显示所有回复
显示星级回复
显示得分回复
只显示楼主
本帖子已过去太久远了，不再提供回复功能。