龙人在线
about me

Arron

抛砖只为引玉(QQ长期隐身在线)
不能富贵难成大器皆因懒,
胸无大志庸庸碌碌只为闲。

这里是我平时收集的和写的一些东西,希望和大家一起共同进步!

无聊看看电影 边听音乐边看 有空多交流
Google_search
Google
hot
latest
photos
还你真实的开幕式!震撼美图[转]【连载】 央行今日发行600万张面额10元奥运纪念钞(组图) 巧遇日本妹妹海滩拍片片 诱不可挡超级丰胸大美人
links

VC和Delphi程序只运行一个实例的方法

程序只运行一个实例,笔者自己作程序也有这样的情况,于是自已探究一番。忙活一阵后,总算小有收获,不敢独享,在天极发表出来,供大家参考。  既然是从根本上解决问题,对于W..
Tags: Delphi 方法 windows   发布时间:10-09-15 10:53:05

delphi反跟踪

按F8跟踪会显示完对话框就会退出.其他情况显示完对话框后正常执行.procedure KillMe();beginApplication.Terminate();end;procedure Test();varMsg : String;beginmsg := 你好啊..
Tags: Delphi MM   发布时间:10-09-15 10:26:10

Delphi程序增加破解难度

我们有必要给API增加一点分析难度,先转一圈再去调用这个API,调用完后在转一圈才回去,顺便加点小花,增加分析难度一、THookClass(网上有源代码)写一个API HOOK的程序 钩住AP..
Tags: Delphi   发布时间:10-09-15 10:24:27

Delph 分割字符 方法!

方法1:var ASource: PChar; AStr: String; ACount,i: Integer; AStrings: TStringList;begin ASource := ABC|... DEF|#### GHI|不会被分开|# www.jx19.com; AStrings := TStrin..
Tags: 方法   发布时间:10-07-08 18:23:44

A星(A-Star)寻路算法

uses Classes,SysUtils;type pAStarPathNode=^tAStarPathNode; tAStarPathNode=record x,y:word; F:word; G:word; H:word; father:pAStarPathNode; //地图方格的父方格 prev :pA..
Tags: WORD 算法   发布时间:10-07-08 10:11:56

Delphi ListView基本用法大全

//增加项或列(字段)ListView1.Clear;ListView1.Columns.Clear;ListView1.Columns.Add;ListView1.Columns.Add;ListView1.Columns.Add;ListView1.Columns.Items[0].Caption:=apos;..
Tags: Delphi ListView   发布时间:10-07-04 17:01:18

Delphi实现的简单加解密

var: key:string;//加解密关键字 percent1:Double;//加解密转换百分比,与关键字一同构成一个加密解密算法 //移位解密函数 functionTfrmCryptograph.DeCode(aCryptograph,..
Tags: Delphi 算法   发布时间:10-05-11 14:14:52

Delphi加断点调试DLL文件

可以看到一些经常需要调用的dll,如windows的user32.dll等; 右上角显示了dll函数的entrypoint,是每个dll文件export的过程或函数名,供调用; 这里需要注意的是左上角的path,..
Tags: Delphi windows XP 软件   发布时间:10-05-11 14:11:54

截取程序的网络封包(Delphi Hook API)

拦截网络数据封包的方法有三种,一是将网卡设为混杂模式,这次就可以监视到局域网上所有的数据包,二是HOOK目标进程的发送和接收的API函数,第三种方法是自己实现一个代理的DLL.在这..
Tags: Delphi 网络 进程 方法   发布时间:10-04-21 20:54:18

用hook实现dll注入详解

流程:caller.exeprocedure TestHook;var pwnd,hChild, hwndInject hwnd;msgtmsg;begin通过窗口标题用FindWindow找到要注入的程序的主窗口句柄pwndpwnd = findwindow(Progman,ni..
Tags: 用hook实现dll注入详解   发布时间:10-04-19 19:40:10

Delphi编程获取系统当前进程、窗口句柄、文件属性以及程序运行状态.

uses TLHelp32,PsAPI;(1)显示进程列表:procedure TForm1.Button2Click(Sender: TObject);var lppe: TProcessEntry32;found : boolean;Hand : THandle;P:DWORD;s:string;beginLi..
Tags: Delphi WORD 进程   发布时间:10-04-19 18:15:30

Delphi防止程序重复运行

myMutex,FindHid:HWND;MoudleName:string;function EnumWndProc(hwnd:Thandle;param:Cardinal):bool;stdcall;varClassName,WinMoudleName:string;WinInstance:THandle;begin res..
Tags: Delphi   发布时间:10-04-19 18:14:07

41‹‹1234››
Class Navigation
search
站内
advertise
Copyright © www.jx19.Com All rights reserved.