摘要： 网上有很多的关于模拟按键的例子，经过实验，我选如下一组函数procedure SendShift(H: HWnd; Down: Boolean);var vKey, ScanCode: Word; lParam: longint;begin vKey:= $10; ScanCode:= MapVirtualKey(vKey, 0); lParam:= longint(ScanCode) shl 16 or 1; if not(Down) then lParam:= lParam or $C0000000; SendMessage(H,WM_KEYDOWN, vKey, lParam);end; 阅读全文

摘要： 以下的抓图，来源于网上。function dlGetDesktopRect(nLeft,nTop,nWidth,nHeight:integer;pixel:TPixelFormat):TBitmap;var dcDesk:hdc; bmp:TBitmap;begin bmp:=TBitmap.Create; bmp.PixelFormat := pixel; bmp.Width:=nWidth; bmp.Height:=nHeigth; dcDesk:=GetDC(GetDesktopWindow); BitBlt(bmp.Canvas.Handle,0,0,nWidth,nHeigth,dc 阅读全文

摘要： 现在有些蛋疼坑爹的游戏，会检测显卡的名称，如果其中有“Vmware”这类的字眼，就会提示程序在虚拟机中运行而拒绝执行（太不科学了嘛，我要是把我的实机驱动名称也改成VMware GTX560的话，也运行不了）大家可以上X宝找找，这些虚拟机还要卖8-30元一个，我日，太坑爹了……在我自己找到方法之后，我后来又在网上找到个改显卡名称的教程，而且的确有用。虽然原理上是一样的，不过过程不一样，我下面就分享一下我的做法吧首先：安装好VMware Tools工具（这个就不多说了，包括怎么安装虚拟机系统）然后装个驱动精灵--点击显卡备份将压缩文件里的 VMware SVGA II 文件夹解压出去，然后打开Oe 阅读全文

摘要： 《森林（全景）》（Forests Panoramic）是微软为 Windows 8/Windows RT 发布的专用主题，安装该主题后，系统的窗口颜色将随着壁纸的颜色进行自动调整。 《森林》包含 8 张桌面壁纸，分辨率为 3840x1200。这款主题提供的壁纸均为全景视图，双屏显示器可以获得完美的无缝视觉效果。 （注：微软之前为 Windows 7 发布的官方主题在 Windows 8 中同样可以使用，但是 Windows 8 专用主题 Windows 7 无法使用，微软今后还将发布 Windows 7/Windows 8 通用主题） 官方下载： http://download.mic... 阅读全文

摘要： 在《强大的DELPHI RTTI--兼谈需要了解多种开发语言》一文中，我说了一下我用DELPHI的RTTI实现了数据集的简单对象化。本文将详细介绍一下我的实现方法。首先从一个简单的例子说起：假设有一个ADODataSet控件，连接罗斯文数据库，SQL为：select * from Employee现在要把它的内容中EmployeeID, FirstName, LastName，BirthDate四个字段显示到ListView里。传统的代码如下：//先要设置AdoDataSet的CommandText属性With ADODataSet1 DoBeginOpen;While Not Eof DoB 阅读全文

摘要： ⊙RTTI简介⊙类(class)和VMT的关系⊙类(class)、类的类(classofclass)、类变量(classvariable)的关系⊙TObject.ClassType和TObject.ClassInfo⊙is和as运算符的原理⊙TTypeInfo–RTTI信息的结构⊙获取类(class)的属性(property)信息⊙获取方法(method)的类型信息⊙获取有序类型(ordinal)、集合(set)类型的RTTI信息⊙获取其它数据类型的RTTI信息=================================================================== 阅读全文

摘要： unit WindowsSysVersion;interfaceuses windows ;{$IFDEF CONDITIONALEXPRESSIONS}{$IF Defined(TOSVersionInfoEx)}{$DEFINE TOSVERSIONINFOEX_DEFINED}{$IFEND}{$ENDIF}{$IFNDEF TOSVERSIONINFOEX_DEFINED}type POSVersionInfoEx = ^TOSVersionInfoEx; TOSVersionInfoEx = packed record dwOSVersionInfoSize: DWORD; dwMa 阅读全文

摘要： delayed是Delphi2010中一种新的声明方式，使用它将可以在不适当的环境下绕过不存在的API函数，并且对该API的调用进行“跳过”的处理来看以下例子：function GetTouchInputInfo(hTouchInput: THandle; cInputs: UINT;pInputs: PTouchInput; cbSize: Integer): BOOL; stdcall;external user32 name 'GetTouchInputInfo' delayed;这是定义于keyboard单元内的API函数，用于实现Windows 7下触摸屏的消息获取， 阅读全文

摘要： 对于迅雷专用链接不用我去解释相信大家都明白（别告诉我你不懂~汗），现在就链接的编码原理及转换详细说明一下，明白以后就可以用迅雷下载快车、旋风专用地址的软件啦。首先要明白Base64编码是怎么一回事，不懂的先去百度一下再回来。 Base64编码是一种加密算法，Email的原始信息就是由Base64编码构成的。 而这些专用链接都是通过Base64编码加工转换而成的。迅雷专用地址例子：thunder://QUFodHRwOi8vZG93bi5pcHZ2LmNuL3diLmV4ZVpa 真实文件下载链接：http://down.ipvv.cn/wb.exe附转换工具下载：http://ifu25.cn 阅读全文

摘要： 开始看Orchard的文档，文档中提到当以管理员身份登陆后，应该是在每个部分都会出现Edit的链接，点击就能跳转到编辑这个部分的页面。但是实际部署却发现没有。其实，只需要在后台Module上Eanble这2个Modules就可以了：Content Control WrapperWidget Control WrapperOrchard在1.4之后，就改变了，默认没有开启这个功能 阅读全文

摘要： 今天帮别人解决一个关于 Base64 编解码的问题，竟然发现 Delphi 自带了 Base64 编解码的单元，叫 EncdDecd，这名字很拗口而且不直观，估计这是一直很少人关注和知道的原因。这个单元提供两套四个公开函数：对流的编解码：procedure EncodeStream(Input, Output: TStream); // 编码procedure DecodeStream(Input, Output: TStream); // 解码// 对字符串的编解码：function EncodeString(const Input: string): string; // 编码functi 阅读全文

摘要： 什么是管道？参考《WIN32汇编编程》是这样描述的 Windows 引入了多进程和多线程机制。同时也提供了多个进程之间的通信手段，包括剪贴板、DDE、OLE、管道等，和其他通信手段相比，管道有它自己的限制和特点，管道实际上是一段共享内存区，进程把共享消息放在那里。并通过一些 API 提供信息交换。管道是两个头的东西，每个头各连接一个进程或者同一个进程的不同代码，按照管道的类别分有两种管道，匿名的和命名的；按照管道的传输方向分也可以分成两种，单向的双向的。根据管道的特点，命名管道通常用在网络环境下不同计算机上运行的进程之间的通信（当然也可以用在同一台机的不同进程中）它可以是单向或双向的；而... 阅读全文

摘要： Windows的IPC（进程间通信）机制主要是异步管道和命名管道。（至于其他的IPC方式，例如内存映射、邮槽等这里就不介绍了）管道（pipe）是用于进程间通信的共享内存区域。创建管道的进程称为管道服务器，而连接到这个管道的进程称为管道客户端。一个进程向管道写入信息，而另外一个进程从管道读取信息。异步管道是基于字符和半双工的（即单向），一般用于程序输入输出的重定向；命名管道则强大地多，它们是面向消息和全双工的，同时还允许网络通信，用于创建客户端/服务器系统。一、异步管道(实现比较简单，直接通过实例来讲解)实验目标：当前有sample.cpp,sample.exe,sample.in这三个文件，s 阅读全文

摘要： procedure pinghost(ip:string;var info:string);ip:目标IP地址；info:ping了以后产生的信息(1)或(2)；(1)成功信息 ip 发送测试的字符数 返回时间(2)出错信息 Can not find host!使用uses ping;procedure TForm1.Button1Click(Sender: TObject);varstr:string;ping:Tping;beginping:=Tping.create ;//一定要初试化哦ping.pinghost('127.0.0.1',str);memo1.Lines. 阅读全文

摘要： // 自己写的，绝对可用unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TShowMethod = procedure(str: string) of object; TForm1 = class(TForm) Button1: TButton; Memo1: TMemo; Edit1: TEdit; procedure Button1Click(Sender: TO... 阅读全文

摘要： 这个功能好难找。在 dxSkinController 控件的事件中设置。procedure TMainForm.dxSkinController1SkinForm(Sender: TObject; AForm: TCustomForm; var ASkinName: string; var UseSkin: Boolean); begin UseSkin := false; end; 阅读全文

摘要： Locate('Company;Contact;Phone', VarArrayOf(['Sight Diver', 'P']),[loPartialKey]); 阅读全文

摘要： VarArrayOf的主要功能是构造一个Variant数组，通过VarArrayCreate实现：[delphi]view plaincopyfunctionVarArrayOf(constValues:arrayofVariant):Variant;varI:Integer;beginResult:=VarArrayCreate([0,High(Values)],varVariant);forI:=0toHigh(Values)doResult[I]:=Values[I];end;下面是一个使用实例：[c-sharp]view plaincopytypeTStrArr=arrayofstri 阅读全文

摘要： 一、ffmpeg命令详解ffmpeg非常强大，轻松几条命令就可以完成你的工作。把darkdoor.[001-100].jpg序列帧和001.mp3音频文件利用mpeg4编码方式合成视频文件darkdoor.avi：$ ffmpeg -i 001.mp3 -i darkdoor.%3d.jpg -s 1024x768 -author skypp -vcodec mpeg4 darkdoor.aviffmpeg还支持mov格式：$ ffmpeg-i darkdoor.%3d.jpg darkdoor.mov要查看你的ffmpeg支持哪些格式，可以用如下命令：$ ffmpeg -formats | 阅读全文

摘要： 一般的windows 复杂的界面需要使用多层窗口而且要用贴图来美化，所以不可避免在窗口移动或者改变大小的时候出现闪烁。先来谈谈闪烁产生的原因原因一：如果熟悉显卡原理的话，调用GDI函数向屏幕输出的时候并不是立刻就显示在屏幕上只是写到了显存里，而显卡每隔一段时间把显存的内容输出到屏幕上，这就是刷新周期。一般显卡的刷新周期是 1/80秒左右，具体数字可以自己设置的。这样问题就来了，一般画图都是先画背景色，然后再把内容画上去，如果这两次操作不在同一个刷新周期内完成，那么给人的视觉感受就是，先看到只有背景色的图像，然后看到画上内容的图像，这样就会感觉闪烁了。解决方法：尽量快的输出图像，使输出在一个刷新 阅读全文

摘要： 1. 在C 盘无法创建文件，或无法安装文件时：解决办法： 用管理员运行cmd 输入icacls c:/ /setintegritylevel MIcacls 是一种命令行工具，它显示或修改指定文件上的随机访问控制列表 (DACL)，并将存储的 DACL 应用于指定目录中的文件。Icacls.exe 替换了 Cacls.exe 工具用于查看和编辑 DACL。ICACLS 是 Windows Server 2003 SP2 中 CACLS 工具的升级版本，可用于从恢复控制台重设文件中的帐户控制列表 (ACL) 以及备份 ACL。与 CACLS 不同的是，ICACLS 可以正确地传送对继承的 A.. 阅读全文

摘要： 第一步：用MoveFileEx(Source, Dest, MOVEFILE_REPLACE_EXISTING)将文件移到一个临时目录下。（原来正在使用的Dll是可以被移动的 :) ） 第二步：用MoveFileEx(Source, nil, MOVEFILE_DELAY_UNTIL_REBOOT)在下一次开机时删除临时目录下的Dll 第三步：拷贝新的Dll到指定位置。 阅读全文

摘要： 需求：返回用分钟表示的主计算机上的时间和全球标准时间 (UTC) 之间的时间差,如:2010-01-10 09:07:54,与UTC之间的时间差应为:1263085674.调用方法： getTimezoneOffset(StrToDateTime('2010-01-10 09:07:54'));实现代码：//功能:获取本机时间区function getTimeZone:integer; var m_timezone:TIME_ZONE_INFORMATION; i:integer; dTimezone:double; iTimezone:integer; begin GetTi 阅读全文

摘要： There are a number of warnings available in Delphi XE2 that are not very well documented. While you can control them in the Project options dialog, and you can turn them on using {$WARN} directives or in command line compiler options, the documentation for the warning identifiers is currently pret.. 阅读全文

摘要： 首先去7z官网下载代码 7z的源代码或者lzma都可以，但是推荐下7z的源代码，里面东西比较全7z.dll 通过 COM 接口工作。但是它并没有使用标准的 COM 接口 。如果有com基础的话 看他的代码会比较容易。比较简单的例子是 /cpp/7zip/ui/client7z 里面有简单的 压缩 解压缩 和查看压缩包文件。 7z.dll的源代码在 bundles/7zformatf 里面其中 clinet7z和 file manager的代码看起来比较好理解，可以自己一步一步跟着走。 // 晚上再更新7z.dll采用com接口工作，但是它并没有使用标准的COM接口。对文件的解压主要靠下面两个回 阅读全文

摘要： ffmpeg -i "待转换的APE或FLAC" -acodec alac "输出的Apple无损.m4a" 阅读全文

摘要： 1.开启R.E管理器，进入根目录的 /system/usr/keylayout/，找到qwerty.kl文件，开启可读写权限，为了安全起见，可以先将这个文件复制到SD卡上备份。修改搜索键设置：长按qwerty.kl文件，选择用文本编辑器打开，看key127 和 key217是不是已经修改如下了（如果不是请手动修改）key 127 ENDCALLWAKE_DROPPEDkey 217 ENDCALL WAKE_DROPPED长按bravo-keypad.kl 选择用文本编辑器打开，看key127 和 key217是不是已经修改如下了（如果不是请手动修改）key 127 ENDCALL WAKE_ 阅读全文

摘要： 方法的类型对象的方法能定义成静态(static)、虚拟(virtual)、动态(dynamic)或消息处理(message)。请看下面的例子：TFoo = classprocedure IAmAStatic;procedure IAmAVirtual; virtual;procedure IAmADynamic; dynamic;procedure IAmAMessage(var M:TMessage); message wm_SomeMessage;end;1. 静态方法IAmAStatic 是一个静态方法，静态方法是方法的缺省类型，对它就像对通常的过程和函数那样调用。编译器知道这些方法的地 阅读全文

摘要： RTF文件格式研究报告（代开版辞）摘要：本文对RTF文件格式进行分析研究，对RTF文件结构及特性进行了阐述，并分别列举了几个实用性的例子进行详细分析，最终通过VB程序代码实现了一个RTF书写器（不具有所见即所得特性）。本文对软件开发人员及RTF文件格式感兴趣的人员具有参考价值。关键字：RTF、Rich Text Format、Office、文件格式。一、引言富文本格式(RTF)规范是为了便于在应用程序之间轻松转储格式化文本和图形的一种编码方法。现在，用户可以利用特定转换软件，在不同系统如MS-DOS、Windows、OS/2、Macintosh和Power Macintosh的应用程序之间转移 阅读全文

摘要： 项目主页：http://sourceforge.net/projects/synedit/ 阅读全文

摘要： 在ＸＭＬ中,有一些符号作为XML 的标记符号，一些特定情况下，属性值必须带有这些特殊符号。　下面主要是讲解一些常用的特殊符号的处理例一：　双引号的使用。双引号作为XML 属性值的开始结束符号，因此无法在值中直接使用"".　处理方式可以分为两种。 a: 属性值中没有'(单引号) ，那么可以用单引号'' 作为属性值的开始结束符号<addkey="IPhone"value="apple"/> ...属性值为　("apple"). 解决： <addkey="IPhone& 阅读全文

摘要： 笔者正在用C#开发一个名为XWriter的文本编辑器，其中需要提供对RTF文档的支持，以前从没有搞过RTF文档，因此临时突击研究了一下，经过几天的学习研究和实践，对C#操作RTF文档有所了解，因此才可以写出此文给予说明，希望能对其他人学习RTF文档格式有所帮助。 RTF文档格式是微软提出的一种用于描述带格式文本的文档格式，上个世纪就提出来了，一直用到现在，而且很多程序都支持这种格式，微软的Office软件家族，Windows写字板软件等等都支持，而且Windows操作系统的剪切板和OLE拖拽操作也支持RTF文档，这样就允许不同的软件通过RTF格式相互交流带格式文本。比如我用的VS.NET20. 阅读全文

摘要： 下载：http://www.ctdisk.com/file/9941471 阅读全文

摘要： function UTCToLocalTime( UTCTime : TDateTime; iTimeZoneBias:integer ): TDateTime;var LocalSTime, UTCSTime : TSystemTime; TZInfo : TTimeZoneInformation; PTZInfo : PTimeZoneInformation; CalcResult : LongBool; LastError : LongInt;begin GetTimeZoneInformation( TzInfo ); Tzinfo.bias := Tzinfo.bias + iTim 阅读全文

摘要： Delphi/Pascal view sourceprint?1 function TimeZoneBias: Integer;var TZI: Windows.TTimeZoneInformation; // info about time zonebegin if Windows.GetTimeZoneInformation(TZI) = Windows.TIME_ZONE_ID_INVALID then SysUtils.RaiseLastOSError; Result := TZI.Biasend; 阅读全文

摘要： eg. var tm : string; dt : tdatetime;tm := '2009-08-21T09:11:21Z'; dt := ?procedure setISOtoDateTime(strDT:string);var // Delphi settings save vars ShortDF,ShortTF:string; TS, DS :char; // conversion vars dd, tt, ddtt:TDateTime;begin // example datetime test string in ISO format strDT :=' 阅读全文

摘要： 每个地区都有自己的本地时间，在网上以及无线电通信中时间转换的问题就显得格外突出。我自己就经常混淆于此，特地研究了一下，记录在此以备忘。 整个地球分为二十四时区，每个时区都有自己的本地时间。在国际无线电通信场合，为了统一起见，使用一个统一的时间，称为通用协调时(UTC, Universal Time Coordinated)。UTC与格林尼治平均时(GMT, Greenwich Mean Time)一样，都与英国伦敦的本地时相同。在本文中，UTC与GMT含义完全相同。 北京时区是东八区，领先UTC八个小时，在电子邮件信头的Date域记为+0800。如果在电子邮件的信头中有这么一行： Date: 阅读全文

摘要： 在SOA环境中，经常遇到时间，日期错乱的情况明明在A端发的日期是2012-05-11，B端却收到2012-05-10, 什么情况？原因在于.net的反序列化会自动把DateTime类型的字段，转为本地时间e.g. 如果B所在的服务器，本地时区设置为太平洋时间 -7区:"2012-10-21" 转化为 "2012-10-21 12:00:00 AM" "2012-10-21-07:00" 转化为"2012-10-21 12:00:00 AM" "2012-10-21+00:00" 转化为" 阅读全文

摘要： 下载：http://www.ctdisk.com/file/9651161 阅读全文

摘要： 下载：http://www.ctdisk.com/file/9597076 阅读全文