//判断字符是否是汉字 function IsHZ(ch: WideChar): boolean; var i:integer; begin i:=ord(ch); if( i40869) then result:=false else result:=true; ...
本文主要跟大家介绍Delphi中获取其它进程的窗口句柄,在Delphi中获取其它进程的窗口句柄,绝大部分人首先想到的会使用:FindWindow或者用GetWindow来遍历查找,如: handle := FindWindow(nil,PChar('窗口的标题')); 或者: pr...
1.设备句柄可以用API函数CreateFile获得。它的原型为HANDLE CreateFile( LPCTSTR lpFileName, // 文件名/设备路径 DWORD dwDesiredAccess, // 访问方式 DWORD dwShareMode, // 共享方式 LPSECURIT...
以下示例操作:若为C:计算机\知库同步盘,则关闭// gAppIsWindowsVistaOrHigher()自己写的判断函数,可参考VC分类下的获取当前系统全文if (gAppIsWindowsVistaOrHigher()){ HWND hwndAddressBandRoot= 0; ...
原理分析: 这需要用到 ShellAPI 单元的两个函数: DragAcceptFiles、DragQueryFile; 用 DragAcceptFiles(窗口句柄, True); 以让窗口能够接受拖放; 然后就等待 WM_DROPFILES 消息, 并用 DragQueryFi...
{*******************************************************} { } { Delphi公用函数单元 ...
WinAPI: GetClassName - 获取指定窗口的类名 //声明: GetClassName( hWnd: HWND; {指定窗口句柄} lpClassName: PChar; {缓冲区} nMaxCount: Integer {缓冲区大小} ):...
当用户在window下操作时,钩子函数可以根据你的设置勾取window的操作消息1.定义钩子函数HWINEVENTHOOK hook = SetWinEventHook( _eventMin, _eventMax, NULL, WinEv...
在开发某些软件的时候,为了保护程序自身,就需要用到隐藏程序进程。以下通过实例来讲解隐藏程序进程的方法: 1、创建一个新的项目 Project1 选择File,New Application。在表单Form1上放一Memo组件,一个OK按钮组件,改变OK按钮组件的Cation属性为 ...
Xp:PostMessage(hwnd, WM_COMMAND, 41504, NULL);Win7:SHChangeNotify(SHCNE_UPDATEDIR , SHCNF_PATH | SHCNF_FLUSHNOWAIT, folderPath.utf16(), NULL);
一、文件文本文件是以行为单位进行读、写操作的。文本文件只能单独为读或写而打开,在一个打开的文本文件上同时进行读、写操作是不允许的。二、定义FileStream: TFileStream;三、打开文件Filestream:= TFileStream.Create(AFileName: string; ...
interface function MyHideProcess: Boolean; implementation uses Windows, Classes, AclAPI, accCtrl; type NTSTATUS = LongInt; const //...
首先有两个自定的转换函数: function myStrToHex(s:string):string; //字串转16进制 var TmpStr:string; i:integer; begin TmpStr:=''; for i:=1 t...
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, AppEvnt...
//判断是否是数字 function IsNumeric(sDestStr: string): Boolean; //简写多余汉字 function SimplifyWord(sWord: string; iMaxLen: Integer): string; //读写取注册表中的字符串值 ...
IP地址的隐藏 一、前言 本文主要介绍如何在程序中实现IP地址的隐藏。其实这篇东西不算我写的。其中《IP头结构》部分我懒得打字,故复制、粘贴了孤独剑客的文章,先说声谢谢!代码部分参考了外国程序xes写的一个程序。所以这只是学习过程中的一个副产品。既然程序已经做好了,就顺便放上来跟大家一起...
http://www.zabbix.com/downloads/2.2.0/zabbix_agents_2.2.0.win.zip c:\zabbix_agents_2.2.0.win\conf\zabbix_agentd.win.conf.You can simply copy it. 复制配置文...