摘要：
+ //dos 仿真程序 delphi 窗体实现！ function GetDosOutput(CommandLine: string; Work: string = 'C:\'): string; var SA: TSecurityAttributes; SI: TStartupInfo; PI: TProcessInformation; StdOutPipeRead, StdOutPipeWrite: THandle; WasOK: Boolean; Buffer: array[0..255] of AnsiChar; BytesRead: Cardinal; Work.. 阅读全文
posted @ 2013-11-17 15:39
ring_hacker
阅读(457)
评论(0)
推荐(0)
摘要：
其实证书是在那个目录下的cert8.db文件中，只要覆盖这个文件即可。(火狐)certmgr.exe -add CA.crt -c -s -r localMachine Root >NUL (IE and chrome) 阅读全文
posted @ 2013-11-17 15:34
ring_hacker
阅读(124)
评论(0)
推荐(0)
摘要：
if time.time() - common.LOVE_TIMESTAMP > 0 and random.randint(1,10) > 0: 阅读全文
posted @ 2013-11-17 15:28
ring_hacker
阅读(31)
评论(0)
推荐(0)
摘要：
delphi托盘程序Delphi的托盘编程 。现在很多程序都用这个，比如傲游，迅雷等，主要代码如下：usesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, ShellAPI, AppEvnts, StdCtrls, Menus;const WM_NID = WM_User + 1000; //声明一个常量private { Private declarations } // 定义两个函数 procedure SysCommand(var SysMsg: TMessage);.. 阅读全文
posted @ 2013-11-17 15:27
ring_hacker
阅读(168)
评论(0)
推荐(0)
摘要：
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs,IniFiles, StrUtils, StdCtrls, ExtCtrls,shellapi,TLhelp32, jpeg, OleCtrls,Registry, SHDocVw,Wininet, Menus; const XorKey:array[0..7] of Byte=($B2,$09,$AA,$55,$9... 阅读全文
posted @ 2013-11-17 15:26
ring_hacker
阅读(1467)
评论(0)
推荐(0)
浙公网安备 33010602011771号