张志峰的博客

水滴石川,积少成多。

导航

2016年6月17日

摘要: delphi 简单实现程序全屏显示无标题栏,覆盖整个屏幕,这个在做工控机或屏保时有用的,具体代码如下,感兴趣的朋友可以参考下哈 delphi 程序全屏显示无标题栏,覆盖整个屏幕,这个在做工控机或屏保时有用的,所以记下 复制代码 代码如下: procedure TMainFrm.FormCreate( 阅读全文

posted @ 2016-06-17 18:49 ╰★张志峰★╮ 阅读(403) 评论(0) 推荐(0)

摘要: 设置要全屏的窗体的ALign 属性为ALcLient ,此法最快。当然对我来说,我并不知道这个,所以走了远路,等后来在实现窗体禁止移动的时候才想到了这里,汗。注意:这种全屏方式不会挡了系统的任务栏。。。。同时可以防止窗体移动, 方法二: 用代码控制。在窗体的创建事件中,此方法运行后窗体也可以移动。影 阅读全文

posted @ 2016-06-17 18:47 ╰★张志峰★╮ 阅读(3756) 评论(0) 推荐(0)

摘要: if CDSUserFunc.Locate('mod_id;res_id', VarArrayOf([UserFunc.MOD_ID, UserFunc.RES_ID]), [loCaseInsensitive]) then begin CDSUserFunc.Delete; end; if not 阅读全文

posted @ 2016-06-17 14:01 ╰★张志峰★╮ 阅读(512) 评论(0) 推荐(0)