procedure imgListMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); private procedure WMNCHITTEST(var Msg: TWMNCHITTEST); message WM_NCHITTEST; procedure TfrmStartHit.WMNCHITTEST(var Msg: TWMNCHITTEST); const cOffset…

procedure imgListMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); private procedure WMNCHITTEST(var Msg: TWMNCHITTEST); message WM_NCHITTEST; procedure TfrmStartHit.WMNCHITTEST(var Msg: TWMNCHITTEST); const cOffset…

一.程序界面 二.程序代码 (一).主界面代码 //============================================================================== // 主窗口 //============================================================================== unit Unit1; interface uses Windows, Messages, SysUtils, V…

VC无窗口控制台程序 #pragma comment(linker,"/subsystem:\"Windows\" /entry:\"mainCRTStartup\"") 如果使用Unicode字符集,mian可以修改为wmain: 以上代码加入你的头文件stdafx.h或其他头文件中就不会有控制台窗口了.原理:VC 控制台应用程序入口点为cmd窗口后才进入main函数.而上面的指令是告诉编译器程序的入口点为main函数. 大家都知道,当编写一个…

关于Delphi中的字符串的详细分析   只是浅浅的解析下,让大家可以快速的理解字符串. 其中的所有代码均在Delphi7下测试通过. Delphi 4,5,6,7中有字符串类型包括了: 短字符串(Short String) 长字符串(Long String) 宽字符串(Wide String) 零结尾字符串(Null-Terminated String).PChar和字符数组 1.短字符串(Short String) 固 定长度,最大字符数个数为255,短字符串也成为长度字节(Length-b…

注:本文适用.net2.0+的winform程序 一个winform程序,我希望它不能多开(但是如何防多开不是本文要讲的),那么在用户启动第二个实例的时候,作为第二个实例来说,大概可以有这么几种做法: 弹个窗告知用户[程序已运行]之类,用户点击弹窗后,退出自身 什么都不做,默默退出自身 让已运行的第一个实例把它的窗体显示出来,完了退出自身 显然第3种做法更地道,实现该效果的核心问题其实是:如何显示指定进程的窗口? 首先想到的是调用ShowWindow.SetForegroundWindow等AP…

今天犯了一个粗心的错误,在无窗口线程中,SetTimer中设置计时器ID,而WM_TIMER消息响应函数中得到的计时器ID却不是之前设置的计时器ID. 对应计时器ID的输出的是一个随机数字. 原来在msdn中 nIDEvent [in] Specifies a nonzero timer identifier. If the hWnd parameter is NULL, and the nIDEvent does not match an existing timer then it is i…

 1:问题 集成第三方的ocx控件,用来做pdf显示和签名.如果用窗口化插件做,很简单,加载ocx到窗口中,再显示到网页即可.但这样有个缺点.就是这个窗口会浮动在网页元素的上面,导致遮挡住网页元素.比如网页弹出层,下拉框等. 2:解决问题思路 Npapi无窗口(windowless)插件的句柄只是一个HDC,只能把需要展示的东西画在这个HDC上输出.那么就想到如下方式: 1:创建一个窗口,窗口加载ocx控件,隐藏此窗口,在插件的HandleEvent(windowless)中的事件处理中,刷新消…

最近公司需要把官方CPC电子申请移植到项目中,在移植完成后,撰写文档总是出现“无法获取“AxforApplication”控件的窗口句柄.不支持无窗口的 ActiveX 控件”,另楼主头疼很久,网上寥寥无几的解决方法都尝试了,如关闭DEP,重启电脑,重装CPC等等,都没有解决楼主的问题,在楼主各种尝试之后终于得以解决. 环境: 编译环境:VS2012(C#),Windows 7,无窗口的OCX控件 解决方法: 1.卸载本地的office和CPC 2.先安装Office(Office2003或者2…

[源码]Delphi 5KB无输入表下载者源码 PROGRAM Fun; type DWORD = LongWord; THandle = LongWord; BOOL = LongBool; LPCSTR = PAnsiChar; HINTERNET = Pointer; FARPROC = Pointer; PShortString = ^ShortString; PLongint = ^Longint; HRESULT = type Longint; { from WTYPES.H } P…