上一页 1 ··· 28 29 30 31 32
摘要: 自己从来没有做过Flash,看看下面这点代码,可是我费了好久长做出来的,发现ActionScript 3.0与平时其他语言开发工具有很大差别。 MCXY是一些切割好的图片小格,在Firerwork中用web切片工具生成。(为了图像质量问题,费了好多脑细胞,最后发现原来很简单!). 很简单,能改进的还有好多… //记录缺省的空格var CurCol=1;var CurRow=3; ... 阅读全文
posted @ 2009-03-20 07:49 garfieldtom 阅读(318) 评论(0) 推荐(0)
摘要: 首先从TidMessage中获得邮件的头信息: strHeader:=aIdMessage.Headers.text; 然后,用正则表达式取出Received: vReceiveIP:=GetNeedStrByPerlReg(strHeader,'(Received:)(.+)(])'); 再取出X-Originating-IP: vOriIP:=GetNeedStrByPerlReg(strHe... 阅读全文
posted @ 2009-03-16 15:39 garfieldtom 阅读(268) 评论(0) 推荐(0)
摘要: ;参考了许多脚本例子,这个脚本包含了大部分可能用到设置。我的这个安装程序中用到了安装数据库、写INI、定制安装等 ; 脚本用 Inno Setup 脚本向导生成。; 查阅文档获取创建 INNO SETUP 脚本文件详细资料! [Setup]AppName=天翔纤维检验管理系统AppVerName=天翔纤维检验管理系统 V2008AppPublisher=青岛天翔软件有限公司AppPublish... 阅读全文
posted @ 2009-03-13 19:51 garfieldtom 阅读(1339) 评论(0) 推荐(0)
摘要: unit FfrmMain; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Buttons, ExtCtrls,FileCtrl, ComCtrls; type TfrmMain = class(TForm) edtSrcDir... 阅读全文
posted @ 2009-03-11 17:35 garfieldtom 阅读(973) 评论(0) 推荐(0)
上一页 1 ··· 28 29 30 31 32