- 博客(35)
- 收藏
- 关注
RSS订阅修改delphi7中生成的exe文件的图标
修改delphi7中生成的exe文件的图标 在DELPHI中，照以下做即可： PROJECT ->OPTIONS->APPLICATION->LOAD ICON即可.
2009-10-31 15:27:00
1831
钱学森科学思想研究 待下
摘自：http://news.qq.com/a/20091031/001115.htm 《钱学森科学思想研究》一书全面而又深入浅出地介绍了钱学森的学术思想，包括他的科学观、方法论、“大成智慧学”，以及钱学森论开放的复杂巨系统、论地理系统、论建筑科学、论科学与艺术等等。作者钱学敏是中国人民大学教授，长期研究钱学森科学思想，并有自己的创新见解。她与钱学森先生是堂兄妹，有很多交往和通讯。有...
2009-10-31 14:01:36
93
Delphi中IntToStr函数的汇编代码
摘自：Delphi的SysUtils单元 function IntToStr(Value: Integer): string;// FmtStr(Result, '%d', [Value]);asm PUSH ESI MOV ESI, ESP SUB ESP, 16 XOR EC...
2009-10-30 11:50:25
538
CXGrid控件整行变颜色
CXGrid控件整行变颜色当某行符合条件的时候，给它变色： if not VarIsNull(AViewInfo.GridRecord.Values[TcxGridDBTableView(Sender).GetColumnByFieldName('Status').Index]) then if AViewInfo.GridRecord.Values[...
2009-10-30 10:22:13
311
原创 摘自一位网友的代码--树
未经验证 unit uCGoodsClass;interface uses Windows,Messages,SysUtils,Variants,Classes,ComCtrls,DBClient,DB,UnDBSCKT; type TuCGoodsClass=class(TObject) private public function...
2009-10-29 17:28:25
103
关于数据集
TClientDataSet是一个数据集，DataSource.DataSet也是一个数据集； 如果TClientDataSet DataSource.DataSet这两个进行了赋值，则可以视为一样，可进行代替使用；...
2009-10-28 11:57:25
86
CxGrid控件的多选
CxGrid控件的多选{--将主单号插入到包信息里 cyj 2009-10-28 --}procedure TFGSCYEditForm.Insert_ZDH;var I,J: Integer; //Bk:Tbookmark; ASQLStr : String;begin with cxGridDBTableView3.DataController, cxGridDBTab...
2009-10-28 11:22:34
237
局域网里，Sql Server 2005可与同局域网的另一个Sql server 2005相连
局域网里，Sql Server 2005可与同局域网的另一个Sql server 2005相连 使用IP可以连上
2009-10-28 10:10:25
120
AstaClientDataset控件的设置
这是从.dfm文件拷出来的，可参考如下进行设置 object cdsFGSCYYD: TAstaClientDataSet StreamOptions = [ssIndexes, ssAggregates] Indexes = <> Aggregates = <> Constraints = <> OnNew...
2009-10-27 15:05:02
194
两表之间拷数据
格式：insert into hzjc.dbo.b_gjb( username)select usernamefrom ff.dbo.gjb insert into hzjc.dbo.b_gjb(InnerID,hzjc.dbo.b_gjb.Number,hzjc.dbo.b_gjb.Name,hzjc.dbo.b_gjb.zwmc,hzjc.dbo.b_gjb.y...
2009-10-26 20:10:10
59
截获异常，并在运行时不报错
待验证 procedure TMainForm.MyException(Sender: TObject; E: Exception);begin //ShowMessage('aaaaa'); //弹出异常信息end;procedure TMainForm.FormCreate(Sender: TObject);begin Application.OnExceptio...
2009-10-26 17:18:25
102
获取屏幕的坐标--GetCursorpos
GetCursorpos--是个WinAPI来的 procedure TMainForm.Timer1Timer(Sender: TObject);var p1,p2:Tpoint;begin GetCursorpos(p1);//获取屏幕坐标 Label1.Caption := ' 屏幕坐标：X ' + IntToStr(P1.X) + ' Y ' + Inttostr...
2009-10-26 17:16:16
1300
将内存FFFF:0--FFFF:b单元中的数据复制到0:200--0:20b单元中
该程序的功能： 将内存FFFF:0--FFFF:b单元中的数据复制到0:200--0:20b单元中 assume cs:code code segment mov ax,0ffffH mov ds,ax mov ax,0020H mov es,ax mov bx,0 s: mov dl, ds:[bx...
2009-10-25 21:13:38
858
标志寄存器
方便记忆 OF 溢出(是/否) OV OVerflow NV Not oVerflow DF 方向(减量/增量) DN DowN UP UP IF 中断(允许/关闭) EI Enable Interrupt DI Disable Interrupt ...
2009-10-25 18:46:56
86
安全的一段内存空间 0：2000~0:02FF
看到120页了 我们要向内存里写东西，就用 0：2000~0:02FF，这段，使用前最好用debug查看一下别的程序有没有使用，如果都是0，则可以放心使用该段内存；...
2009-10-25 18:20:52
220
显示红心的汇编代码
assume cs:code code segment mov ax,0b800h mov ds,ax ;指向传说中的显存 mov bx,ax sub bx,bx ;BX清零 mov cx,2000 ;循环2000次就够了 因为调试环境下一个屏是80*25 s: mov [b...
2009-10-25 18:05:36
492
debug时 遇到loop 指令
debug时 遇到loop 指令 用 p指令，可以直接执行到CX=0, 并到下一句； g 0016 ；0016是偏移地址，这样也是直接执行到该条语句处
2009-10-25 17:35:23
773
Loop的使用
看到107页了王爽汇编第五章 Loop的使用 （1） mov cx, 2 -- 对CX初始化 （2） S: add ax, ax -- 标号： 指令（3） Loop S -- Loop 标号 Loop 语句：(1) 先将CX减一；(2) 判...
2009-10-23 21:06:27
249
delphi上传文件
已有的信息：FTP的ip地址，用户名和密码做一个上传文件的功能，1. GJM字段存放文件；文件与文件之间以/分隔开2. 可上传多个文件；实现： 1. 需要一个文本框控件：记录待上传文件的路径；2. 一个上传附件按钮：能打开，选择要上传的文件；3. 一个OpenDialog控件，能打开硬盘；4. 一个ListBox控件，记录多个待上传文件的文件名；5. 一个TidFtp...
2009-10-23 17:25:12
311
shellApi--ShellExecute
ShellExecute 的包为： shellApi ShellExecute(0, 'open', PChar(TFilePath), nil, nil, SW_SHOWNORMAL);
2009-10-23 11:35:31
107
xpmenu控件的安装
E:\小吴\delphi\控件1\xpmenu路径下的 xpmenu控件的安装 1. 直接打开XPMenu.pas文件，2. 在Component==>Install Component 在unit file name 里，填入路径E:\小吴\delphi\控件1\xpmenu\XPMenu.pas 3.再将E:\小吴\delphi\控件1\...
2009-10-21 14:20:24
493
王爽汇编的第四章的一个小例子--待验证
第四章的一些总结： 1. DOS系统是单任务操作系统，使用Windows XP系统的Debug.exe调入一个16位的可执行程序时，例如：Debug test.exe是由Dos下的Command命令调用Debug,然后Debug将test.exe载入内存，执行完后，test.exe程序将返回debug，然后再返回command 2. Dos调用时，有段PSP程...
2009-10-20 21:02:30
62
在窗体里设置 可回车跳到下一个文本框
步骤：1. 将该窗体的KeyPreview属性设置为true; 2. 在窗体的OnKeyDown事件里写如下代码： if key=13 then begin SelectNext(TWinControl(Sender),true,true); //ShowMessage('得不到值'); Key:=0; end; 3. 设置好各个文本框的TabO...
2009-10-19 10:59:38
220
1原创 javascript适应不同分辨率的导航栏
转自：http://cache.baidu.com/c?m=9d78d513d9d430dc4f9d94697c17c0161f4381132ba7d7020fa58438e0732b37506793ac56200774d9d27c1616de3a4b9b832104361453b38cc9f85daccb855c249f5135676a845613a30edfce5153c...
2009-10-10 10:22:16
189
原创 http 500错误的处理方法
转自：http://baike.baidu.com/view/965448.htm转自：http://hi.baidu.com/happyzhyq1984/blog/item/c0fd99a9df5c94f51f17a259.html 步骤：1. 先从IE里读出具体错误信息(IE里设置一下)；2. 然后详细找原因；(找到错误根源后，按以下横线结束处的步骤即可解决) Mi...
2009-10-09 16:11:32
800
fastreport 添空行
Page段：有如下几个BAND masterDatadetailData1(真正的明细)detailData2 (放空值)SubdetailData1(要添的空行)ColumnFooter(栏尾) 栏尾会紧靠上面添加的空行 代码段Code var J: integer; procedure SubdetailData1OnBefo...
2009-10-09 10:06:34
316
读--卖桔者言
张五常--卖桔者言 发问之前该进行分类准备的： 第一、问题可分三类——A、“是甚么”（What），B、“怎样办”（How?），C、“为甚么”（why）。学生要先断定问题是那一类。A类问的是事实：B类问的是方法：C类问的是理论。...
2009-10-07 22:19:27
73
读--《谁动了我的奶酪》
读--《谁动了我的奶酪》 书很短，就是讲了个故事，然后讨论、总结； 人总是害怕变化，拒绝变化； 我们的奶酪总是被人拿走； 抄记如下： 1. 变化总是在发生 --他们总是不断地拿走你的奶酪； 2. 预见变化 --随时做好奶酪被拿走的准备； 3. 追踪变化 --经常闻一闻你的奶酪，以便知道他们什么时候开始变质； ...
2009-10-07 22:01:00
170
原创 PQ分区魔术师调整硬盘分区大小
今天使用PQ8对硬盘的一个200G分区进行再划分，划成了2个100G的分区； ---------------------------------------------------------------------------------PQ分区魔术师调整硬盘分区大小“分区”对于许多人来说都是一件复杂而且危险的操作，时不时的还让人想...
2009-10-03 10:45:42
1377
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人