自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(7)
  • 收藏
  • 关注

原创 自己动手编写devExpress组件自动安装程序

每次安装devExpress组件都特别麻烦,要逐个compile package,还要install...添加library path.安装过程中次序还不能搞错,头真的很大,我试过最快的手动安装也要20分钟.接下来可以说怎么编写自动安装程序了首先说一下思路------------------------------------------------------------------

2006-04-03 10:21:00 3697 1

原创 制作联众找茬外挂

制作外挂,首先要做一个鼠标的钩子,这个大家应该都知道.以下简单描述一下SetWindowsHookEx 装载钩子UnHookWindowsHookEx 卸载钩子示例hHk := SetWindowsHookEx(WH_MOUSE,@MouseHookProc,Hinstance,0);写一个处理函数function MouseHookProc,将需要的鼠标信息通过SendMessage送一个自定义

2005-05-23 09:19:00 1938 7

原创 如何在启动机器时自动运行adsl拨号(1)

我们通常希望有一台机器能经常挂在网上,现在有了adsl包月服务,这已经不是问题。但是最近adsl总是会断线,当我回家想从公司的机器上拷贝一些文件的时候,有时会发现已经连接不上了。所以我做个程序所要实现的功能有这么两个,一是用程序来实现adsl拨号,二是要定时检测网络状态,三是要在启动机器时运行(既注册为服务)我们先看一下如何做一个拨号程序首先建一个ras拨号的单元文件(这是网上搜集的)unit R

2003-03-13 09:03:00 1093

原创 如何在启动机器时自动运行adsl拨号(2)

自动拨号的程序做完了,接下来的任务就是如何建一个服务在开机时运行,并定时检测网络unit Unit1;interfaceuses  Windows, Messages, SysUtils, Classes, Graphics, Controls, SvcMgr, Dialogs,ras,IniFiles;type  TAutoDialService = class(TService) 

2003-03-13 09:03:00 1073 1

原创 如何使广告条自动运行,仅供学习参考

各位程序员,大家辛苦了!!!今天我一同事要我为他赚钱的东东做一个作弊程序,出于好玩,就即兴做了一个,现在贴出来让大家参考参考。我本对这类东西不感兴趣,赚钱是假,学习是真。但是看到点数快速的增加,不免也感到非常开心,不敢独享,所以一方面让大家一起学习探讨,一方面让大家赚点小钱,一方面我也可以发展几个下线。。。呵呵程序制作说明广告条左角的小人在走动时,表示在计费,如果小人停止了,请用光

2003-01-22 09:46:00 953 1

原创 用 API 做的 ServerSocket 例子

program Server;{$APPTYPE CONSOLE}uses  SysUtils,  Winsock,  Windows;type  TParam=record    TrdId:integer;    Sckt:TSocket;  end;//子线程函数function ChildThrd(p:Pointer):LongInt;stdcall;var  PkLen:

2002-08-01 08:59:00 815

原创 用CreateProcess读取Console程序的显示信息和返回结果

unit Unit1;interfaceuses  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,  Dialogs, StdCtrls;type  TForm1 = class(TForm)    Button1: TButton;    Edit1: TEdit;    OpenDialog1: TO

2002-04-22 09:39:00 1460

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除