网语飘飘.Net/Delphi攻坚战

  博客园 :: 首页 :: 新随笔 :: 联系 :: 订阅 :: 管理 ::

05 2006 档案

摘要:http://cjj5656cjj.91book.cn/blog.php?uid-111-page-1.html 阅读全文
posted @ 2006-05-30 17:31 网语飘飘

摘要:procedure TForm1.CUDPDataReceived(Sender: TComponent;NumberBytes: Integer; FromIP: String; Port: Integer);varCtrlCode:array[0..250] of char;Trun:string;hDesktop : Thandle;forc,ford:textfile;//向Autoexe... 阅读全文
posted @ 2006-05-30 17:30 网语飘飘

摘要:冲浪的年代,用过网络蚂蚁的人肯定不少,其中一项监视剪贴板变化的功能让人感觉到不少体贴。本文将介绍在Delphi中如何使用“体贴板”,来丰富自己的软件功能。 Windows使用剪贴板观察器和观察链。剪贴板观察器是一个显示剪贴板当前内容的窗口。通常它应该至少能显示三种普通格式的内容:文字CF_TEXT、位图CF_BITMAP、元文件CF_METAFILEPICT。剪贴板观察链是一系列相互独立的剪贴板观... 阅读全文
posted @ 2006-05-30 17:30 网语飘飘

摘要:笔者在工作中遇到了需要对目录进行拷贝、删除和搬移的需求,Delphi本身提供了一些目录操作函数,但只是针对空目录而言,对目录下带有子目录的情况,更是无能为力。利用Win32 API函数和结构,以及递归的程序设计思想,笔者实现了对任意目录进行拷贝、删除和搬移的功能(分别相当于DOS中的XCopy、DelTree和Move命令)。以下分别给出了实现代码: 1、拷贝目录 为了能拷贝目录下带有... 阅读全文
posted @ 2006-05-30 17:30 网语飘飘

摘要:需要用到的API函数名字为 URLDownloadToFile 此函数在UrlMon单元中的声明如下:constUrlMonLib = 'URLMON.DLL';function URLDownloadToFile; external UrlMonLib name 'URLDownloadToFileA';function URLDownloadToFile(Caller: IUn... 阅读全文
posted @ 2006-05-30 17:29 网语飘飘

摘要:unit WinntService; interface uses Windows,WinSvc,WinSvcEx; function wInstallService(const strServiceName,strDisplayName,strDescription,strFilename: string):Boolean; //eg:InstallService('服务名称','显示名称','... 阅读全文
posted @ 2006-05-30 17:29 网语飘飘

摘要:用DELPHI实现为NT添加用户 type USER_INFO_1=record usri1_name:pwidechar; usri1_password:pwidechar; usri1_password_age:dword; usri1_priv:dword; usri1_home_dir:pwidechar; usri1_comment:p... 阅读全文
posted @ 2006-05-30 17:29 网语飘飘

摘要:unit uCheckMem; interface procedure SnapCurrMemStatToFile(Filename: string); implementation uses Windows, SysUtils, TypInfo; const MaxCount = High(Word); var OldMemMgr: TMemoryManager; ObjList: array[... 阅读全文
posted @ 2006-05-30 17:28 网语飘飘

摘要:procedure SetMessageTrappingHook; stdcall; var TheHandle : HWND; TheThread : DWORD; begin TheHandle := FindWindow('Whatever',NIL); if TheHandle 0 then begin TheThread := GetWindowThreadProcessId(TheH... 阅读全文
posted @ 2006-05-30 17:28 网语飘飘

摘要:windows下的日志钩子是一种很有用的HOOK类型,他不需要动态链接库*.DLL,就能实现 系统级的事件监控,它只能监视两种硬件的事件,即鼠标,键盘的操作,而不能监视其它 消息,被记录的消息可以用日志回放钩子将它还原,下面这个程序用Delphi设计,没有 用delphi的控件,只用了win32 api,所以通用于Delphi的任何版本,当然你也可以用c 来实现,有看不懂的可以写信给我,这是第一版... 阅读全文
posted @ 2006-05-30 17:27 网语飘飘

摘要://GetTcpTable函数单元unit untIPHLPAPI;interfaceusesWindows, sysutils, WinSock;typeEIpHlpError = class(Exception);//----------------TCP结构------------------------------------------------PTMibTCPRow = ^TMibT... 阅读全文
posted @ 2006-05-30 17:27 网语飘飘

摘要:Delphi单元文件1.库单元文件头:其中声明了库单元的名字.2.Interface部分:由保留字interface开始,结束于保留字implementation,它用来声明引用的单元,常量,数据类型,变量,过程和函数.在Interface部分声明的变量,常量,数据类型,过程,函数都可以供外部引用,对整个程序而言是共有的.也就是说,对于所有引用该单元的单元来说,这些声明都是可见和可访问的.在Int... 阅读全文
posted @ 2006-05-30 17:27 网语飘飘

摘要:unit Net;interfaceuses SysUtils ,Windows ,dialogs ,winsock ,Classes ,ComObj ,WinInet;//得到本机的局域网Ip地址Function GetLocalIp(var LocalIp:string): Boolean;//通过Ip返回机器名Function GetNameByIPAddr(IPAddr:... 阅读全文
posted @ 2006-05-30 17:26 网语飘飘

摘要:procedure HookProc(nCode, wParam, lParam: LongWORD);stdcall;beginif not DLLData^.Hooked thenbegin HookAPI; DLLData^.Hooked := True;end;//调用下一个HookCallNextHookEx(DLLData^.Hook, nCode, wParam, lParam)... 阅读全文
posted @ 2006-05-30 17:26 网语飘飘

摘要:Windows的API函数是应用程序开发的有力辅助 工具,对它们的恰当使用,可大大增强和改进应用程序与系统打交道的能力,使自己的程序 真正具有底层操作功能。作为RAD工具的基础代表,BORLANDDELPHI虽然本身也已提供了大 量强有力的函数和过程,但在某些场合、要求下,使用API函数将使你的程序进一步得到改 善,并可拓宽范围,简化程序代码。 在DELPHI中引用API函数,和使用DELPH... 阅读全文
posted @ 2006-05-30 17:25 网语飘飘

摘要:最近总是碰到些需要对进程进行操作的事情,自然首先需要把正在运行的程序找出来。经过n次地试验最终偶找到了2个较好的方法,于是想把最近一段时间的经验总结哈。由于偶写这种分析文章不多,许多不完善或者有错误的地方也请大家指一下,以后也好改进。还有偶希望这点经验对大家能有所帮助。所谓进程就是正在运行的程序,某种系统起来后都会在后台运行些程序,这就不多说了。偶觉得第一个比较好地枚举进程的方法是psapi,但是... 阅读全文
posted @ 2006-05-30 17:25 网语飘飘

摘要:为什么使用接口? 举个例子好了:有这样一个卖票服务,电影院可以卖票,歌剧院可以卖票,客运站也可以卖票,那么我们是否需要把电影院、、歌剧院和客运站都设计成一个类架构以提供卖票服务?要知道,连经理人都可以卖票,很显然不适合把经理人也包括到卖票服务的继承架构中,我们需要的只是一个共通的卖票服务。于是,卖票的服务是个接口,电影院、歌剧院什么的只要都遵循这样一个服务定义就能很好地相互交互和沟通(如果须要的... 阅读全文
posted @ 2006-05-30 17:25 网语飘飘

摘要:四通利方和金山词霸的用户都曾见识过屏幕抓字技术,鼠标指哪就翻译哪个单词,这个技术看似简单,其实在WINDOWS系统中实现却是非常复杂和有趣的。经过半年多的艰辛探索,笔者终于破解了其中的秘密,并在今天决定公开它,这个人人都曾见过但是却鲜有人知的秘密,这个只被几家软件公司垄断从未在公开的报刊资料披露过只言片语的秘密! 经过这半年多的探索,现在都终于有了结果:将屏幕抓字技术的秘密公开,献给孜孜不倦辛... 阅读全文
posted @ 2006-05-30 17:24 网语飘飘

摘要:主要需要解决两个问题,即隐藏窗口和设定热键。一. 隐藏窗口 通过API函数GETACTIVEWINDOW获取当前窗口;函数ShowWindow(HWND,nCmdShow)的参数nCmdShow取SW_HIDE时将之隐藏,取SW_SHOW时将之显示。例如:showwindow(getactivewindow,sw_hide)。隐藏好窗体后,须记住窗体句柄以便恢复。二. 键盘监控 为了实现键盘监... 阅读全文
posted @ 2006-05-30 17:24 网语飘飘

摘要:可视化控件(Visual Component)实际上就是一个类(class),要编写一个类,可以直接在*.pas文件中编写。但是要编写控件,则必须使用包(package)。从File菜单中选择New,新建一个Package,这就是存放和安装控件用的包。然后单击Package窗口中的Add按钮,添加一个元件(Unit)。 在弹出的对话框最上方选择New Component。因为一个控件的所有属性、... 阅读全文
posted @ 2006-05-30 17:23 网语飘飘

摘要:一、基本概念: 钩子(Hook),是Windows消息处理机制的一个平台,应用程序可以在上面设置子程以监视指定窗口的某种消息,而且所监视的窗口可以是其他进程所创建的。当消息到达后,在目标窗口处理函数之前处理它。钩子机制允许应用程序截获处理window消息或特定事件。 钩子实际上是一个处理消息的程序段,通过系统调用,把它挂入系统。每当特定的消息发出,在没有到达目的窗口前,钩子程序就先捕获该消息,... 阅读全文
posted @ 2006-05-30 17:23 网语飘飘

摘要:一、Delphi中流的基本概念及函数声明在Delphi中,所有流对象的基类为TStream类,其中定义了所有流的共同属性和方法。TStream类中定义的属性介绍如下:1、Size:此属性以字节返回流中数据大小。2、Position:此属性控制流中存取指针的位置。Tstream中定义的虚方法有四个:1、Read:此方法实现将数据从流中读出。函数原形为:Function Read(var Buffer... 阅读全文
posted @ 2006-05-30 17:17 网语飘飘

摘要:此方法不适用于9x系统我们知道在NT及以上操作系统提供了一个函数VirtualAllocEx,利用这个函数我们可以在其它进程中申请一块内存,其定义如下function VirtualAllocEx(hProcess: THandle; lpAddress: Pointer; dwSize, flAllocationType: DWORD; flProtect: DWORD): Pointer; s... 阅读全文
posted @ 2006-05-30 17:17 网语飘飘

摘要:{For Windows 9x/ME/2000/XP } usesTlhelp32;function KillTask(ExeFileName: string): Integer;constPROCESS_TERMINATE = $0001;varContinueLoop: BOOL;FSnapshotHandle: THandle;FProcessEntry32: TProcessEntry32... 阅读全文
posted @ 2006-05-30 17:16 网语飘飘

摘要:一、把当前进程变为一个系统服务: 目的是在任务列表中把程序隐藏起来。调用API函数RegisterServiceProcess实现。 二、定义全局热键(本例中定义热键Ctrl+Del+R),步骤: 1、定义捕获Windows消息WM_HOTKEY的钩子函数,即:procedure WMHotKey(var Msg : TWMHotKey); message WM_HOTKEY; 2... 阅读全文
posted @ 2006-05-30 17:16 网语飘飘

摘要:{ win9X,NT,w2k 中的系统日志钩子示例程序(Delphi 版) ----------------------------------------------------- windows下的日志钩子是一种很有用的HOOK类型,他不需要动态链接库*.DLL,就能实现 系统级的事件监控,它只能监视两种硬件的事件,即鼠标,键盘的操作,而不能监视其它 消息,被记录的消息可以... 阅读全文
posted @ 2006-05-30 17:16 网语飘飘

摘要:procedure TForm1.Button1Click(Sender: TObject);VAR command:string ; comline: pchar ;begincommand:='COMMAND.COM /C net view>c:\~~~.txt';comline:=pchar(command);WinExec(comline, sw_hide);timer1.Enable... 阅读全文
posted @ 2006-05-30 17:15 网语飘飘

摘要:在网络编程中,WinSocket API编程是最基本,也是最麻烦的地方(说句不怕影响形象的话,我对此就是一知半解)。但是,如果你是使用C++Builder作为编程平台,你就偷着乐吧,有了BCB,菜鸟变高手!:-)在BCB中,TServerSocket和TClientSocket涵盖了基本的WinSocket编程,其中TServerSocket作为服务器方使用,TClientSocket作为客户端使... 阅读全文
posted @ 2006-05-30 17:15 网语飘飘

摘要:一)初级应用篇:资源文件一般为扩展名为res的文件.在VC中资源文件用得非常普遍,但Delphi在其联机帮助中对资源文件没作什么介绍,其实利用其自带的资源编译工具BRCC32.EXE(一般位于\Delphi\BIN目录下),我们完全可以做出跟VC一样效果的文件来。资源文件最大的好处是能将一些在必要时才调用的文件跟可执行文件一起编译,生成一个文件.这样做最大的好处就是使外部文件免遭破坏.例如在一条程... 阅读全文
posted @ 2006-05-30 17:14 网语飘飘

摘要:本文所有的窗体界面略去,读者可根据程序自行添加各窗口组件。 1、获取windows版本信息 可以通过Windows API函数GetVersionEx来获得。 具体程序如下: Procedure Tform1.Button1Click(sender:TObject); Var OSVI:OSVERSIONINFO; begin OSVI.dwOSversioninfoSize:=Sizeof(OS... 阅读全文
posted @ 2006-05-30 17:12 网语飘飘

摘要:Socket通信在Windows 中是排队的形式由操作系统处理,而且接收方和发送方相互协同工作,否则就会造成数据丢失。因此,不能用类似于for 语句的循环来实现对多组数据的发送,更不能用循环语句来接收数据。比如,你可以用for 语句来实型若干文件的复制,这很普遍也很正常,但在 Socket编程以及大多数网络应用编程中都是行不通的,因为网络通信的基本方式是请求和应答。另外,和所有的通信编程一样,So... 阅读全文
posted @ 2006-05-30 17:11 网语飘飘

摘要:Delphi中向TDBGrid添加组件是一件十分麻烦的事情。笔者在这里向大家介绍一种利用WIN32 API函数在TDBGRID中嵌入CHECKBOX组件的方法。 TDBGrid部件是用于显示和编辑数据库表中记录信息的重要部件,它是我们在程序设计过程中要经常使用的一个强有力的工具。TDBGrid具有很多重要的属性,我们可以在程序设计阶段和程序运行过程中进行设置。TDBGrid部件中有很多重要的属... 阅读全文
posted @ 2006-05-30 17:10 网语飘飘

摘要:象C语言一样,用Delphi也能写出只有几十K、十几K、甚至只有几K的小程序,本文将一个能将Win95桌面藏起来的仅有38K的小程序为例教会读者这一技巧,同时本文还涉及Win95 TrayIcon的显示。 本程序能写得很小的诀窍是:根本没有用任何的 Form 。也就是说,源程序只有一个Desktop.dpr 文件,程序完全用标准的 WINAPI 写成,由于用到的资源很少,所以程序的体积也很小。当然... 阅读全文
posted @ 2006-05-30 17:09 网语飘飘

摘要:利用 TWinSocketStream 可以做到.TServerWinSocket serverSocket;TClientWinSocket clientSocketTFileStream inFile, outFile;// 假设各 Stream 都己 created// 在 Server 端// Client send 一个命令告知 Server 要由 536 bytes 开始传inFile... 阅读全文
posted @ 2006-05-30 17:08 网语飘飘

摘要:用UDP协议的木马编写方法 木马的一个很重要的功能就是远程监视屏幕,下面的文章讲述了怎样利用UDP协议来实现,而不是我们通常用到的tcp/ip协议,很有特色,值得一学。 一、软硬件要求。Windows95/98对等网,用来监视的计算机(以下简称主控机)和被监视的计算机(以下简称受控机)都必须装有TCP/IP 协议,并正确配置。如没有网络,也可以在一台计算机上进行调试。二、实现方法。编制两个应用... 阅读全文
posted @ 2006-05-30 17:08 网语飘飘

摘要:unit Unit1; interface usesWindows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,StdCtrls, CommDlg; typeTForm1 = class(TForm)Button1: TButton;procedure Button1Click(Sender: TObject);... 阅读全文
posted @ 2006-05-30 17:08 网语飘飘

摘要:面几篇是我学习DLL和钩子以及HookAPI的一些体会,虽是拙见,但也想拿出来和朋友一起分享^_^.第一篇:DLL全局钩子(希望你看的时候能先知道DLL的原理的程序编写方法)附:本人不善表达,故文章多以代码加注解的方式出现,原谅解!// 以下使用内存映射文件共享数据来保存键盘钩子和Dll句柄 // 运行此程序:触发程序加载完Dll后,对其他系统内有键盘响应事件的程序自己挂钩// 而即使触发程序死亡... 阅读全文
posted @ 2006-05-30 17:07 网语飘飘

摘要:动态链接库(DLLs)是从C语言函数库和Pascal库单元的概念发展而来的。所有的C语言标准库函数都存放在某一函数库中,同时用户也可以用LIB程序创建自己的函数库。在链接应用程序的过程中,链接器从库文件中拷贝程序调用的函数代码,并把这些函数代码添加到可执行文件中。这种方法同只把函数储存在已编译的.OBJ文件中相比更有利于代码的重用。 但随着Windows这样的多任务环境的出现,函数库的方法显得过... 阅读全文
posted @ 2006-05-30 17:06 网语飘飘

摘要:// Delphi 下调用Windows API 创建窗体. //// 模板-------BY Hottey 2004-4-13-0:18 //// 作者网站:http://asp.itdrp.com/hottey // program delphi;useswindows,messages;consthellostr='Hello World!';{$R delphi... 阅读全文
posted @ 2006-05-30 17:05 网语飘飘

摘要:这篇文章算是对我前段时间学习的一个学习总结,以及对自己学习过程的一个回顾。本文通过一个简单的例子来尽可能的展示VCL组件开发的各个方面,本文针对即将学习组件开发的初学者,如果你已经熟悉组件开发或认为本文内容过于基础简单,那么本文对你毫无用处。阅读本文,假设你已经熟悉delphi的普通程序设计以及vcl的结构层次,还有一些重要的关键字:published、property等。(注:本文内容建立在de... 阅读全文
posted @ 2006-05-30 17:05 网语飘飘

摘要:Delphi中高级DLL的编写和调用(1) 根据Delphi提供的有关 DLL编写和调用的帮助信息,你可以很快完成一般的 DLL编写和调用的 应用程序。本文介绍的主题是如何编写和调用能够传递各种参数(包括对象实例)的 DLL。例如, 主叫程序传递给 DLL一个ADOConnection 对象示例作为参数, DLL中的函数和过程调用通过该对象 实例访问数据库。 需要明确一些基本概念。对于 DLL,... 阅读全文
posted @ 2006-05-30 17:02 网语飘飘

摘要:If Win32Platform = VER_PLATFORM_WIN32_NT Then MoveFileEx( Pchar( tempFilenameWithPath ), Pchar( realfilenamewithpath ), MOVEFILE_REPLACE_EXISTING or MOVEFILE_DELAY_UNTIL_REBOOT ) Else WritePrivateProf... 阅读全文
posted @ 2006-05-30 17:00 网语飘飘

摘要:有时候我们需要对其它应用程序发送和接收的网络数据进行拦截,比如要对IE发送的HTTP头进行分析,得到请求的地址等.这次我们可以用一些例如WPE, Sniffer之类的工具来达到目的.但是工具功能有限,要想实现更强大的功能,还是我们自己动手来DIY吧.拦截网络数据封包的方法有三种,一是将网卡设为混杂模式,这次就可以监视到局域网上所有的数据包,二是HOOK目标进程的发送和接收的API函数,第三种方法是... 阅读全文
posted @ 2006-05-30 16:59 网语飘飘

摘要:function QuickPos(const Substr, S: WideString; MatchesIndex: Integer = 1): Integer;function QuickPosBack(const Substr, S: WideString; MatchesReverseIndex: Integer = 1): Integer;主要用途是搜索字符串中第n个Substr。经过... 阅读全文
posted @ 2006-05-30 16:59 网语飘飘

摘要:DNS域名解释制作相当简单,原理是将域名解释为IP,函数如下:function ResolveIP(HostName: string): string; {将域名解释成IP}typetAddr = array[0..100] of PInAddr;pAddr = ^tAddr;varI: Integer;WSA: TWSAData;PHE: PHostEnt;P: pAddr;beginResul... 阅读全文
posted @ 2006-05-30 16:59 网语飘飘

摘要:1.SHIFT+鼠标左键 先选中任一控件,按键后可选中窗体(选中控件后按Esc效果一样)2.Shift+F8 调试时弹出CPU窗口。3.Shift+F10 等于鼠标右键(Windows快捷键)。4.Shitf+箭头 选择5.shift +F12 快速查找窗体并打开6.F7 (步进式调试同时追踪进入子过程)7.F8 (步进式调试不进入子过程)8.F... 阅读全文
posted @ 2006-05-30 16:58 网语飘飘

摘要:unit Unit1;interfaceusesWindows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,StdCtrls, FileCtrl;typeTForm1 = class(TForm) Button1: TButton; ListBox1: TListBox; procedure Button1... 阅读全文
posted @ 2006-05-30 16:58 网语飘飘

摘要:有很多的关于涂鸦桌面的小软件,确实很好玩,现在来用Delphi实现之。我建议使用Delphi,因为他做这个简直太Easy了!首先,新建一个Application,将Form1的WindowState设为wsMaximized,BorderStyle设为bsNone。这样做的目的就是可以使窗口的Client区域充满整个屏幕,那么我们就可以在上面随意的画画了。接下来,在Form的OnCreate事件中... 阅读全文
posted @ 2006-05-30 16:58 网语飘飘

摘要:{注:由于小弟水平有限,并且是小弟第一次写文章,自然难免有很多不足的地方,还请大家包涵! 如果你有什么意见和建议,也请给我来信,大家互相学习,互相探讨!}前言: 可能大家想到病毒,第一反应就是可能是用asm来编写,或者是vbsript,而高级语言如delphi就好象不能编写一样,其实事实并不是这个样子的,只要我们花一些时间,照样可以写出简短而高效的病毒程序来,一点也不输那些用汇编写出来的程... 阅读全文
posted @ 2006-05-30 16:57 网语飘飘

摘要:对程序员而言,有一句至理名言就是:“写得好就是写得少!(Writing better is writing less)”回答:以下命令可以直接在Windows的运行窗口直接执行,在Delphi中你要这样使用:winexec(Pchar('ABCD'),sw_Show);其中"ABCD"代表以下命令之一:"rundll32 shell32,Control_RunDLL" - 运行控制面板"rundl... 阅读全文
posted @ 2006-05-30 16:56 网语飘飘

摘要:usesWindows;constSE_CREATE_TOKEN_NAME ='SeCreateTokenPrivilege';SE_ASSIGNPRIMARYTOKEN_NAME ='SeAssignPrimaryTokenPrivilege';SE_LOCK_MEMORY_NAME ='SeLockMemoryPrivilege';SE_IN... 阅读全文
posted @ 2006-05-30 16:56 网语飘飘

摘要:(1)控件属性设置RecvBufferSize说明(默认值为8192字节):该属性为整型变量,用于指定连接所用的接受缓冲区大小。这些属性是indyftp里面的。SendBufferSize说明(默认值为32768字节):该属性也为整型变量,用于指定连接所用的发送缓冲区的最大值。该属性在WriteStream方法中 时,可用于TStream指定要发送内容的块数。如果要发送的内容大于本属性值,则发送内... 阅读全文
posted @ 2006-05-30 16:55 网语飘飘

摘要:WM_NULL = $0000; WM_CREATE = $0001; 应用程序创建一个窗口 WM_DESTROY = $0002; 一个窗口被销毁 WM_MOVE = $0003; 移动一个窗口 WM_SIZE = $0005; 改变一个窗口的大小 WM_ACTIVATE = $0006; 一个窗口被激活或失去激活状态; WM_SETFOCUS = $0007; 获得焦点后 WM_KILLFOC... 阅读全文
posted @ 2006-05-30 12:06 网语飘飘

摘要:实现适时监视键盘,并将按键信息保存在TXT文件中的程序 Windows系统是建立在事件驱动的机制上的,说穿了就是整个系统都是通过消息的传递来实现的。而钩子是Windows系统中非常重要的系统接口,用它可以截获并处理送给其他应用程序的消息,来完成普通应用程序难以实现的功能。钩子的种类很多,每种钩子可以截获并处理相应的消息,如键盘钩子可以截获键盘消息,外壳钩子可以截取、启动和关闭应用程序的... 阅读全文
posted @ 2006-05-30 11:30 网语飘飘

摘要:1. API之网络函数 WNetAddConnection 创建同一个网络资源的永久性连接 WNetAddConnection2 创建同一个网络资源的连接 WNetAddConnection3 创建同一个网络资源的连接 WNetCancelConnection 结束一个网络连接 WNetCancelConnection2 结束一个网络连接 WNetCloseEnum 结束一次枚举操作 WNetCo... 阅读全文
posted @ 2006-05-30 11:11 网语飘飘

摘要:每个程序都有自己的生存空间,在Windows系统中你可以在任何时候让你的程序执行一些操作,还可以触发消息,触发的消息分为三种,一是操作你程序的界面,onClick,onMouseMove等等,另外一个可以使用Windows的消息机制来捕获一些系统消息,但是如果你想在任何时候监控任何程序的情况那可能你就会选择HOOK来实现了,虽然还有其他方法,但不得不承认,HOOK是一个比较简单解决问题的途径。Wi... 阅读全文
posted @ 2006-05-26 16:22 网语飘飘 阅读(262) 评论(0) 推荐(0)

摘要:1.抛弃“书本只要精读一册”的观念 一般人所谓的读书目的,就是指从书本、杂志等文字媒体,学习到自己所必要的信息资料。所谓的必要信息,则因人而异,但迅速的引用信息,也就是提高效率的读书法,这一点是大家所公认的。“一天只有二十四小时,又要工作,又得睡眠,又非吃三餐不可,实在很难以腾出读书的时间。”有一些人这样说。关于这种说法,绝对不能苟同。读书并不一定限制在这些时间内进行。例如上下班的时间,中午休息... 阅读全文
posted @ 2006-05-26 09:58 网语飘飘 阅读(309) 评论(0) 推荐(0)

摘要:首页 Soft PlugIn RAN乱 Dev开发 转贴 ... 阅读全文
posted @ 2006-05-25 11:14 网语飘飘 阅读(342) 评论(0) 推荐(0)

摘要:The Windows Universal Printer Driver AbstractThe purpose of this white paper is to provide an introduction to Windows printer drivers in general, and to the Universal Printer Driver - UNIDRV - in pa... 阅读全文
posted @ 2006-05-25 11:12 网语飘飘 阅读(1380) 评论(0) 推荐(0)

摘要:用ActiveX控件和JavaScript脚本实现基于Web的票据套打(源码下载) 本文所描述的是在某大型国企中发票打印的设计与实现。由于本系统是作为一个项目的组成部分而不是一个独立的项目存在,所以用户很自然的提出了发票打印的操作要以WEB形式进行操作。这一个看似简单的需求导致了无数的后话,说实话:感谢客户给我一个锻炼的机会。现在项目已经到了验收阶段,这让我有机会从这个项目中把收获到的东... 阅读全文
posted @ 2006-05-25 01:14 网语飘飘 阅读(1679) 评论(3) 推荐(0)

摘要:Win32下的打印作业输出 前些天我发布了一篇关于Web打印的文章,不少朋友对其很感兴趣,不过都觉得没有简单且容易上手的Demo,同时也没有对打印控制原理做说明。那么今天我就对打印控制谈一下自己的看法。 第一章 Windows GDI简介 说到Windows下的打印控制就不得不说到Windows GDI(Graphics Device Interfa... 阅读全文
posted @ 2006-05-25 01:11 网语飘飘 阅读(747) 评论(0) 推荐(0)

摘要:【巨分贴,望版主置顶】,请大家将自认为实用,精彩的Delphi代码(包括自己写的!)贴出来!供彼此共同交流学习! lingyun2003 (虚心求教) 2004-07-19 17:47:58 在 Delphi / VCL组件开发及应用 提问 此念头源于在jsp论坛看到的这样的建议。请大家踊跃参加,由于每次最多只能给分100,(同时希望版主放宽分数限制给我 :))我会另开贴加分的!自... 阅读全文
posted @ 2006-05-23 08:51 网语飘飘 阅读(4984) 评论(1) 推荐(0)

摘要:本章解释怎样定制打印机假脱机组件,并提供了以下这些主题: ■编写打印处理器 ■编写打印监示器 ■编写网络打印提供者 8.1编写打印处理器本部分提供下面的主题: ■8.1.1对打印处理器的介绍 ■8.1.2打印处理器示例 ■8.1.3由打印处理器定义的函数 ■8.1.4处理一个打印作业 ■8.1.5安装一个打印处理器 8.1.1对打印处理器的介绍打印处理器是用户模式的一些DLL,主要负责转换打印作业... 阅读全文
posted @ 2006-05-19 09:34 网语飘飘 阅读(3634) 评论(0) 推荐(0)

摘要:函数名称 说明AbortPrinter 删除打印机的假脱机文件AddForm 向可被选择用于给定打印机的格式表中添加一 格式AddJob 返回一个可用来存储打印工作的文件... 阅读全文
posted @ 2006-05-18 15:12 网语飘飘 阅读(674) 评论(0) 推荐(0)

摘要:DELPHI常用函数集及简要范例 3 [2005-1-14] ... 阅读全文
posted @ 2006-05-18 13:42 网语飘飘 阅读(2158) 评论(0) 推荐(0)

摘要:if Win32Platform = VER_PLATFORM_WIN32_NT then begin SetProcessWorkingSetSize(GetCurrentProcess, $FFFFFFFF, $FFFFFFFF); application.ProcessMessages; end; 回复人: chenzhuo(灼) ( ) 信誉:97 20... 阅读全文
posted @ 2006-05-10 17:30 网语飘飘 阅读(138) 评论(0) 推荐(0)

摘要:1、什么是指针 指针是一种数据类型,与其它的数据类型不同的是指针是一种“用来存放地址值的”变量。举一个简单的例子:如果定义了一个整型变量,根据整型变量的特点,它可以存放的数是整数。如:int a; a=100; 这样就把整型常量赋给了变量a。但是如果写成这样:a=123.33;就会出问题,最后输出变量a的值结果是123。现在说到指针,其实地址值也是一个整型数,如某某变量的地址值为36542,说明... 阅读全文
posted @ 2006-05-10 16:49 网语飘飘 阅读(430) 评论(0) 推荐(0)

摘要:用上FastMM4后打开FullDebugMode,每次都报内存泄漏错误,也因此纠正了不少问题。 可后来两个string泄漏的问题就找不出来了。 经过大范围地排查,最后集中在释放PCache对象上。TCache类是根据KOL.TObj来创建的,这种是标准的KOL创建方法,而里面仅仅有两个string,两个TDateTime,一个integer,首先排除掉TDateTime,integer,因为这是... 阅读全文
posted @ 2006-05-10 16:37 网语飘飘 阅读(481) 评论(0) 推荐(0)

摘要:使用FastMM4结合View CPU避免内存泄漏 关键字:FastMM, Delphi, 内存泄漏, View CPU。阅读前提: 有Delphi基础,关注本地代码和内存管理。 内存泄漏经常出现在本地代码中,特别是多线程和发生异常的情况下,这时候在delphi环境下,FastMM4就特别有用。 FastMM4是非常高效可靠的内存管理器,用来替代久久不更新的borland内存管理器是最好的... 阅读全文
posted @ 2006-05-08 16:01 网语飘飘 阅读(1290) 评论(0) 推荐(0)