摘要: http://ce.sysu.edu.cn/hope2008/worklist/ShowArticle.asp?ArticleID=8631(转)仅以我有限的项目经验总结Delphi学习中需要注意到问题。由于我有C#基础,故此会涉及C#和Pascal语法不同之处,通用的程序套路就不多说了。该文章涉及内容深度较浅,适合初学者阅读。如有错漏请包涵。需要注意Delphi是一个IDE,它不是一个语言,它的性质和Visual Studio、Eclipse是一样的,是用来做开发的。Delphi是用Pascal做为开发语言,确切说是Object Pascal--支持面向对象的Pascal语言,当然Delph 阅读全文
posted @ 2012-12-07 21:07 尼姑哪里跑 阅读(615) 评论(0) 推荐(0) 编辑
摘要: 二维数组unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, DBCtrls;type queue = array[1..4, 1..20] of real; TForm1 = class(TForm) lbl1: TLabel; lbl2: TLabel; lbl3: TLabel; lbl4: TLabel; lbl5: TLabel; btn1: TButton;... 阅读全文
posted @ 2012-12-07 12:05 尼姑哪里跑 阅读(366) 评论(0) 推荐(0) 编辑
摘要: Maopao排序unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, DBCtrls;type queue = array[1..200] of integer; TForm1 = class(TForm) btn1: TButton; lbl1: TLabel; edt1: TEdit; btn2: TButton; btn3: TButton; dblst1: TD... 阅读全文
posted @ 2012-12-07 11:12 尼姑哪里跑 阅读(501) 评论(0) 推荐(0) 编辑
摘要: 数值参数:实参的值赋给对应形参,形参的改变不影响实参unit first;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) btn1: TButton; edt1: TEdit; edt2: TEdit; procedure btn1Click(Sender: TObject); private function formalparam... 阅读全文
posted @ 2012-12-07 09:04 尼姑哪里跑 阅读(583) 评论(0) 推荐(0) 编辑
摘要: 今天在FDS建模程序编写时自定义了一组鼠标响应事件,结果总是提示“Unsatisfied forward or external declaration”错误,最终发现是如下原因造成的:类声明部分定义的procedure PanelClick(Sender:Tobjcet),在实现部分需要有类名的全称!1 type2 TForm1 =class(TForm)3 ...4 procedure PanelClick(Sender:Tobjcet); //过程声明5 6 private7 { Private declarations }8 public9 { Public declaration.. 阅读全文
posted @ 2012-12-06 18:22 尼姑哪里跑 阅读(234) 评论(0) 推荐(0) 编辑
摘要: 今天下午在做程序的时候,在调试了,可是提示框中出现了我最不擅长的错误,应该不是不擅长吧,而是在调试的时候发现错误,你又不知道错误怎么解决,这就难办了。今儿就是的遇见了个错误,还解决了,蛮好的。错误如下:运行程序以后出现如下的提示:[Fatal Error] *.pas(7): File not found: '*.dcu'解决方法:在Delphi工具栏中打开 Tools->Environment Options: (工具——>环境选项)然后在Library选项卡中的Library Path中加入该控件的路径,也就是含有这个文件(*.dcu)的路径,就可以了。 阅读全文
posted @ 2012-12-06 17:14 尼姑哪里跑 阅读(89) 评论(0) 推荐(0) 编辑
摘要: http://www.makepic.net/anniu/13075.html### 阅读全文
posted @ 2012-12-03 18:41 尼姑哪里跑 阅读(145) 评论(0) 推荐(0) 编辑
摘要: 代码如下/*Made by Anby * 2012-11-28 * 实现软件从iis服务器更新版本 * 自动检测当前版本号,从服务器下载 * * * //IIS服务器 增加MIME类型 * .* * application/octet-stream * * * xml文件格式如下: <?xml version="1.0" encoding="utf-8" ?><UpDateInfo> <Version key="20121125" /> <FileInfo> <FileCount 阅读全文
posted @ 2012-11-29 16:36 尼姑哪里跑 阅读(869) 评论(0) 推荐(0) 编辑
摘要: BiteArrayusing System;using System.Collections.Generic;using System.Text;using System.Collections;namespace BitArray类{ class Program { static void Main(string[] args) { } /* * 埃拉托斯尼筛选法 * 求素数 */ public void GenPrimes(int[] arr... 阅读全文
posted @ 2012-11-27 10:13 尼姑哪里跑 阅读(131) 评论(0) 推荐(0) 编辑
摘要: View Code using System;using System.Collections.Generic;using System.Text;using System.Collections;using System.Text.RegularExpressions;using System.IO;namespace 栈和队列{ class Program { static void Main(string[] args) { } #region 栈 // 栈和队列是两种面向表的数据结构 // ... 阅读全文
posted @ 2012-11-21 14:23 尼姑哪里跑 阅读(175) 评论(0) 推荐(0) 编辑