已阅读5页,还剩3页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
软件技术国家教学资源库建设项目软件开发素材之C源代码一、名称制作QQ式停靠自动隐藏窗体二、创建或搜集相关信息搜集单位重庆电子工程职业学院搜集时间20120805来源互联网三、适用对象学生、教师、C及ASPNET项目开发人员、相关技术人员等。四、功能简介QQ式停靠自动隐藏窗体的制作。五、程序代码程序名称PROGRAMCSUSINGSYSTEMUSINGSYSTEMCOLLECTIONSGENERICUSINGSYSTEMLINQUSINGSYSTEMWINDOWSFORMSNAMESPACEHIDETOOLBARSTATICCLASSPROGRAM/应用程序的主入口点。/STATHREADSTATICVOIDMAINAPPLICATIONENABLEVISUALSTYLESAPPLICATIONSETCOMPATIBLETEXTRENDERINGDEFAULTFALSEAPPLICATIONRUNNEWMAINFORM程序名称MAINFORMCSUSINGSYSTEMUSINGSYSTEMCOLLECTIONSGENERICUSINGSYSTEMCOMPONENTMODELUSINGSYSTEMDATAUSINGSYSTEMDRAWINGUSINGSYSTEMTEXTUSINGSYSTEMWINDOWSFORMSUSINGSYSTEMRUNTIMEINTEROPSERVICESNAMESPACEHIDETOOLBARPUBLICPARTIALCLASSMAINFORMFORMREGION声明本程序中用到的API函数/获取当前鼠标下可视化控件的函数DLLIMPORT“USER32DLL“PUBLICSTATICEXTERNINTWINDOWFROMPOINTINTXPOINT,INTYPOINT/获取指定句柄的父级函数DLLIMPORT“USER32DLL“,EXACTSPELLINGTRUE,CHARSETCHARSETAUTOPUBLICSTATICEXTERNINTPTRGETPARENTINTPTRHWND/获取屏幕的大小DLLIMPORT“USER32DLL“,ENTRYPOINT“GETSYSTEMMETRICS“PRIVATESTATICEXTERNINTGETSYSTEMMETRICSINTMVALENDREGIONPUBLICMAINFORMINITIALIZECOMPONENTREGION运行本程序需要声明的变量PRIVATEINTPTRCURRENTHANDLE/记录鼠标当前状态下控件的句柄PRIVATEINTWINDOWFLAG/标记是否对窗体进行拉伸操作PRIVATEINTINTORIHEIGHTENDREGIONPRIVATEVOIDFORM1_LOADOBJECTSENDER,EVENTARGSEINTORIHEIGHTTHISHEIGHTTHISDESKTOPLOCATIONNEWPOINT794,0/为当前窗体定位JUDGEWINMOUPOSITIONENABLEDTRUE/计时器JUDGEWINMOUPOSITION开始工作LISTVIEW1CLEARLISTVIEW1LARGEIMAGELISTIMAGELIST1LISTVIEW1ITEMSADD“小猪“,“小猪“,0LISTVIEW1ITEMSADD“小狗“,“小狗“,1LISTVIEW1ITEMSADD“小猫“,“小猫“,2PUBLICINTORIHEIGHTGETRETURNINTORIHEIGHTPRIVATEVOIDBUTTON1_CLICKOBJECTSENDER,EVENTARGSELISTVIEW1DOCKDOCKSTYLENONEBUTTON1DOCKDOCKSTYLETOPBUTTON2DOCKDOCKSTYLEBOTTOMBUTTON3DOCKDOCKSTYLEBOTTOMBUTTON3SENDTOBACKLISTVIEW1BRINGTOFRONTLISTVIEW1DOCKDOCKSTYLEBOTTOMLISTVIEW1CLEARLISTVIEW1ITEMSADD“小猪“,“小猪“,0LISTVIEW1ITEMSADD“小狗“,“小狗“,1LISTVIEW1ITEMSADD“小猫“,“小猫“,2PRIVATEVOIDBUTTON2_CLICKOBJECTSENDER,EVENTARGSELISTVIEW1DOCKDOCKSTYLENONEBUTTON2DOCKDOCKSTYLETOPBUTTON1DOCKDOCKSTYLETOPBUTTON1SENDTOBACKBUTTON3DOCKDOCKSTYLEBOTTOMLISTVIEW1DOCKDOCKSTYLEBOTTOMLISTVIEW1CLEARLISTVIEW1ITEMSADD“北风“,“北风“,3PRIVATEVOIDBUTTON3_CLICKOBJECTSENDER,EVENTARGSELISTVIEW1DOCKDOCKSTYLENONEBUTTON3DOCKDOCKSTYLETOP/设置BUTTON3按钮绑定到窗体的上边缘BUTTON2DOCKDOCKSTYLETOP/设置BUTTON2按钮绑定到窗体的上边缘BUTTON2SENDTOBACK/保证BUTTON2在BUTTON3的后面BUTTON1DOCKDOCKSTYLETOPBUTTON1SENDTOBACK/保证BUTTON1在BUTTON2的后面LISTVIEW1DOCKDOCKSTYLEBOTTOMLISTVIEW1CLEARLISTVIEW1ITEMSADD“冰雨“,“冰雨“,5PRIVATEVOIDJUDGEWINMOUPOSITION_TICKOBJECTSENDER,EVENTARGSEIFTHISTOPGETSYSTEMMETRICS03|THISTOPTHISHEIGHTSCREENALLSCREENS0BOUNDSHEIGHT3IFTHISLEFTGETSYSTEMMETRICS03/当窗体处于屏幕的最右侧时IFTHISHANDLEMOUSENOWPOSITIONCURSORPOSITIONX,CURSORPOSITIONY/当鼠标处于窗体上时THISHEIGHTSCREENALLSCREENS0BOUNDSHEIGHT40THISTOP3WINDOWFLAG3/设定当前的窗体状态HIDEWINDOWENABLEDFALSE/设定计时器HIDEWINDOW为不可用状态THISLEFTGETSYSTEMMETRICS0THISWIDTH/设定该窗体与容器工作区左边缘之间的距离ELSE/当鼠标离开窗体时WINDOWFLAG3/设定当前的窗体状态HIDEWINDOWENABLEDTRUE/设定计时器HIDEWINDOW为可用状态/当窗体距屏幕最下端的距离小于3PX时IFTHISTOPTHISHEIGHTSCREENALLSCREENS0BOUNDSHEIGHT3IFTHISHANDLEMOUSENOWPOSITIONCURSORPOSITIONX,CURSORPOSITIONY/当鼠标在该窗体上时WINDOWFLAG4/设定当前的窗体状态HIDEWINDOWENABLEDFALSE/设定计时器HIDEWINDOW为不可用状态THISTOPSCREENALLSCREENS0BOUNDSHEIGHTTHISHEIGHT/设定该窗体与容器工作区上边缘之间的距离ELSEIFTHISLEFTTHISWIDTH3/设定当前的窗体状态HIDEWINDOWENABLEDTRUE/设定计时器HIDEWINDOW为可用状态PRIVATEVOIDHIDEWINDOW_TICKOBJECTSENDER,EVENTARGSESWITCHCONVERTTOINT32WINDOWFLAGTOSTRING/判断当前窗体处于那个状态CASE1/当窗体处于最上端时IFTHISTOPGETSYSTEMMETRICS03/当窗体与容器工作区的右边缘的距离小于5PX时THISLEFTGETSYSTEMMETRICS02/设定当前窗体距容器工作区左边缘的值BREAKCASE4/当窗体处于最低端时IFTHISBOTTOMSCREENALLSCREENS0BOUNDSHEIGHT3/当窗体与容器工作区的下边缘的距离小于5PX时THISTOPSCREENALLSCREENS0BOUNDSHEIGHT5/设定当前窗体距容器工作区上边缘之间的距离BREAKREGION获取鼠标当前状态下控件的句柄/获取鼠标当前状态下控件的句柄/当前鼠标的X坐标/当前鼠标的Y坐标/PUBLICINTPTRMOUSENOWPOSITIONINTX,INTYINTPTRORIGINALHANDLE/声明保存原始句柄的变量ORIGINALHANDLEINTPTRWINDOWFROMPOINTX,Y/获取包含鼠标原始位置的窗口的句柄CURRENTHANDLEORIGINALHANDLE/设置当前句柄WHILEORIGINALHANDLEINTPTR0/循环判断鼠标是否移动CURRENTHANDLEORIGINALHANDLE/记录当前的句柄ORIGINALHANDLEGETPARENTCURRENTHANDLE/更新原始句柄RETURNCURRENTHANDLE/返回当前的句柄EN
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2026年江苏省连云港市社区工作者招聘考试参考试题及答案详解
- 2026年新乡市红旗区网格员招聘笔试备考题库及答案详解
- 企业员工工作获得感对离职意愿的抑制机制研究报告
- 企业体检数据隐私保护检测报告
- 2026年新疆维吾尔自治区事业编单位人员招聘考试模拟试题及答案详解
- 2026年日照市岚山区事业编单位人员招聘考试参考试题及答案详解
- 2026年云南省昭通市事业编单位人员招聘考试模拟试题及答案详解
- 2026年洛阳市涧西区事业编单位人员招聘笔试备考试题及答案详解
- 2026年沈阳市沈河区社区工作者招聘考试参考题库及答案详解
- 2026年黑龙江省七台河市事业编单位人员招聘笔试参考试题及答案详解
- 福建泉州市2025-2026学年下学期期末高二数学参考试题答案
- 2026广东广州花都汽车城集团有限公司第一次招聘6人参考题库【综合卷】附答案详解
- 2026年冀教版(三起)小学英语五年级下册期末学情自测卷及答案
- 太原市2026届小学六年级小升初英语模拟试卷2
- 人教部编版六升七语文暑假衔接作业完整版(可直接打印)
- 2025水利工程施工监理规范SL288-2025
- 2026年省级行业企业职业技能竞赛(家畜(猪)繁殖员)经典试题及答案
- 四级公路养护与管理方案
- 2024年湖北高中学业水平合格性考试物理试卷真题(含答案详解)
- 2024-2025学年北京二十中高三第一次阶段性过关考试英语试题含解析
- CJ/T 111-2018 卡套式铜制管接头
评论
0/150
提交评论