上一页 1 ··· 16 17 18 19 20 21 22 23 24 ··· 36 下一页
摘要: Delphi2007之后,编辑器内含了Dunit,要使用它,应该按下面的步骤:1.首先准备“被测试工程”2.再建立“测试工程”和“项目组工程”。3.给“测试工程”添加“测试单元文件”。(选择好“被测单元”后,“测试单元”是自动建立基本测试类的,只需要添加测试代码)测试代码中,测试方法是一些以“Check”开头的过程。比如:“被测单元”如下:unituXXXMath;interfaceusesSysUtils;typeTXXXMath=classpublicfunctiongetSum(consta,b:Integer):Integer;//求和函数end;implementation{TXXX 阅读全文
posted @ 2011-11-09 21:05 怒杀神 阅读(295) 评论(0) 推荐(0) 编辑
摘要: 根据“杯具橙子&自言自语”(http://hi.baidu.com/rarnu/blog/item/8d8e74cf8cce543af8dc61a0.html)中描述,他是这样解决的。今天装上了Delphi2009Update4,发生了一件比较麻烦的事启动时提示“值不能为空,参数:key”。原本以为是序列号的问题,但是我把光盘放到另一台电脑上安装,完全正常换言之,这个“key”并非是指LicenseKey可能的出错范围一下子被放大了,只好硬着头皮去看D2009那复杂的StackTrace发现Stack的最上层是dotnetcoreide120.bpl抛出的异常,初步怀疑是这个bpl没有 阅读全文
posted @ 2011-11-09 20:57 怒杀神 阅读(603) 评论(0) 推荐(0) 编辑
摘要: 从delphi2005起,delphi才支持"for...in"语法 阅读全文
posted @ 2011-11-02 13:58 怒杀神 阅读(161) 评论(0) 推荐(0) 编辑
摘要: 出错的是"class function TSuperAvlEntry.Hash(const k: SOString): Cardinal;"内的循环部分.解决办法是修改函数体内的编译指令.首先去掉函数体内的编译指令.再函数外增加编译指令函数头:{$UNDEF SaveQ} {$IFOPT Q+} {$Q-} {$DEFINE SaveQ} {$ENDIF}函数尾:{$IFDEF SaveQ} {$Q+} {$UNDEF SaveQ} {$ENDIF} 阅读全文
posted @ 2011-11-02 11:54 怒杀神 阅读(356) 评论(0) 推荐(0) 编辑
摘要: http://bbs.zhiqi.com.cn/?fromuid=99838智器粉丝团 阅读全文
posted @ 2011-06-09 10:41 怒杀神 阅读(108) 评论(0) 推荐(0) 编辑
摘要: 1#require"spreadsheet"2require"jcode"3$KCODE='gbk'45#处理excel6require"win32ole"7excel=WIN32OLE.new('excel.Application')8book=excel.Workbooks.open("E:\\与大奖有约\\22选5_0325.xls")9sheet=book.Worksheets(1)10sheet.select11#excel.visible=true1213#读取数据14p 阅读全文
posted @ 2011-05-02 18:51 怒杀神 阅读(897) 评论(0) 推荐(0) 编辑
摘要: 1、将.rb文件保存成utf-8编码格式。2、在.rb文件开头,加入以下两行代码。require"jcode"$KCODE='utf8'那么现在就可以享受中文处理的快乐了!require"jcode"$KCODE='utf8'"xyz".scan(/./)do|letter|putsletterend"这是一个测试字符串".scan(/./){|x|putsx.to_s}"这是一个测试字符串".scan(/\w\w/){|x|putsx} 阅读全文
posted @ 2011-04-29 08:45 怒杀神 阅读(3241) 评论(0) 推荐(0) 编辑
摘要: 阅读全文
posted @ 2011-02-20 16:09 怒杀神 阅读(675) 评论(0) 推荐(0) 编辑
摘要: 问题:按F1后msdn 会“帮助更新正在进行”,这个对话框长时间不结束????用下法可解:(此为vs2008+msdn2008)1.注册表HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\VisualStudio\9.0\Help\0×0804(在目录树中找), 对0x0804夹中Collection项值进行修改.2.修改内容0x0804夹展开(点击加号图标), 还有两个子夹,其中第二个子夹"{8DA395B4-EF74-4F2E-9890-0D04C7DA8819}", 其下的Filename值应为"ms-help://MS.MSDNQTR.v90.chs".那么, 阅读全文
posted @ 2010-12-22 11:23 怒杀神 阅读(607) 评论(0) 推荐(0) 编辑
摘要: 添加命名区域Names集合对象用来管理工作簿中的命名区域.其Add方法可以用来添加名称.注:集合对象都这样使用命名区域,可以这样Range("myRange").Select还可以这样选定区域Application.Goto Refernce:="Book1.xls!myRange"也可以这样遍历命名区域中的单元格For Each c In Range("myRange") c.Interior.... 阅读全文
posted @ 2010-11-12 19:45 怒杀神 阅读(249) 评论(0) 推荐(0) 编辑
上一页 1 ··· 16 17 18 19 20 21 22 23 24 ··· 36 下一页