最近在使用Delphi开发一种应用系统的集成开发环境。其中需要实现一个字符串拆分功能，方法基本原型应该是：
procedure
SplitString(src: string
; ch: Char; var
stringList: TStringList);
目的是使用字符ch拆分src字符串，把拆分的结果放入stringList中。例如：src:='abc|def|ghi'; ch='|'的时候，返回的stringList应该是{abc, def, ghi}。
开始的时候，我是使用获取ch在src中出现的位置，然后使用StrUtils单元提供的RightStr方法来分割字符串，并将结果保存在stringList中的。程序如下：
procedure
SplitString(src: string
; ch: Char; var
stringList: TStringList);
var
p: Integer;
s: string
;
begin
try
stringList.Clear;
s := src;
repeat
p := Pos(ch, s);
if
p = 0 then
begin
stringList ......
一般我们在Delphi中进行图像处理时采用Pixels像素点赋值的方法，Delphi代码如下：
var
x,y:Integer;
cColor:TColor;
begin
for y:=0 to Image1.Height-1 do
for x:=0 to Image1.Width-1 do
cColor:=Image1.Canvas.Pixels[i,j];
end;
但是这种方法有个缺点，处理速度很慢，小图像还可以，对于大点的图像来说就太慢了。
Delphi提供了一种扫描线ScanLine方法是对图像的一行进行扫描，获取本行中各像素的内存地址。众所周知，内存操作肯定会比常规的像素点赋值速度快很多，所以将大大提高图像的处理速度。
Delphi代码如下：
var
P:array[0..100] of PByteArray;//像素数组
y:Integer;
begin
for y:=0 to Bmp.Height-1 do
begin
P[y]:=Bmp.ScanLine[y];//将图片所有像素值存入P
end;
end;
这样就将一个图像的所有像素都存入了P这个数组
在SysUtils单元中可以看出PByteArray实际上是一个Byte类型的数组
所以我们声明的P:array[0..100] of PByteArray;实际上可以看成是一个二维数组
P数组就是一个图像像素的 ......
1.SHIFT+鼠标左键 先选中任一控件,按键后可选中窗体(选中控件后按Esc效果一样)
2.Shift+F8 调试时弹出CPU窗口。 3.Shift+F10 等于鼠标右键（Windows快捷键）。
4.Shitf+箭头 选择 5.shift +F12 快速查找窗体并打开
6.F7 （步进式调试同时追踪进入子过程） 7.F8 （步进式调试不进入子过程）
8.F9 运行 9.F12 切换EDITOR,FORM
10.Alt+F4 关闭所有编辑框中打开的源程序文件，但不关闭项目
11.ALT+鼠标左键 可以块选代码，用来删除对齐的重复代码非常有用
12.Ctrl+F9 编译 13.Ctrl+shift+N(n=1,2,3,4......) 定义书签
14.Ctrl+n(n=1,2,3,4......)跳到书签n
15.CTRL +SHIFT+N 在书签N处，再按一次 取消书签
16.Ctrl+PageUp 将光标移至本屏的第一行，屏幕不滚动
17.Ctrl+PageDown 将光标移至本屏的最后一行，屏幕不滚动
18.Ctrl+↓ 向下滚动屏幕，光标跟随滚动不出本屏
19.Ctrl+↑ 向上滚动屏幕，光标跟随滚动不出本屏
20.Ctrl+Home 将光标移至文件头 21.Ctrl+End 将光标移至文件尾
22.Ctrl+B Buffer List窗口 23.Ctrl+I 同Tab键
24.CTRL+J (弹出Delphi语句提示窗口，选择所需语句将自动完成一条语句)代码模板
25.Ctrl+M 同Enter键。 26.Ctrl+N 同Enter� ......
DELPHI类毕业设计
下一页：最新DELPHI毕业论文
若有合适您的设计，请告诉我详细说明的网址！谢谢合作！
编号 题目 开发工具 内容 资料费 详细说明
001DPAC 网络教学管理系统 DELPH I+ ACCESS delphi源代码+毕业论文+开题报告+答辩稿 ￥150 详细说明
002DPAC 教学计划管理系统 DELPH I+ ACCESS delphi源代码+毕业论文+开题报告+答辩稿 ￥150 详细说明
003DPAC 教育信息系统 DELPH I+ ACCESS delphi源代码+毕业论文+开题报告+答辩稿 ￥150 详细说明
004DPAC 教师管理系统 DELPH I+ ACCESS delphi源代码+毕业论文+开题报告+答辩稿 ￥150 详细说明
005DPAC 大学排课系统 DELPH I+ ACCESS delphi源代码+毕业论文+开题报告+答辩稿 ￥150 详细说明
006DPAC 排课管理系统 DELPH I+ ACCESS delphi源代码+毕业论文+开题报告+答辩稿 ￥150 详细说明
007DPAC 题库管理系统 DELPH I+ ACCESS delphi源代码+毕业论文+开题报告+答辩稿 ￥150 详细说明
008DPAC 题库管理与试卷生成系统 DELPH I+ ACCESS delphi源代码+毕业论文+开题报告+答辩稿 ￥150 详细说明
009DPAC 自动出卷系统 DELPH I+ ACCESS delphi源代码+毕业论文+开题报告+答辩稿 ￥150 详细说明
010DPAC 试� ......
DELPHI面向对象参考
陈奇 2005-07-21
一、类和对象
类是对象的类型，是创建对象的模板。一个类可以创建多个对象，而一个对象总是属于某个类。类具有内部的属性（状态）和行为（操作）。
对象是类的实例，具有区别于同类其他对象的属性集合。
对象的声明存放于堆栈，对象的引用存放于堆。
二、类的方法分类
1、 普通方法
不加任何修饰的方法为普通方法。普通方法必须调用类的实例进行访问。即必须
建类的对象，调用方式为：对象.方法，声明方式为：
procedure[function] 方法名(参数表)[:返回值];
2、 构造方法
构造方法用于创建类的实例，调用后返回类的句柄。构造方法可以有多个版本。声明方式是：
constructor 构造方法名(参数表);
3、 析构方法
析构方法用于销毁类的实例，一般不建议直接调用析构方法，而采用调用对象.Free的方式进行对象释放。声明方式为：
destructor 析构方法名(参数表);
4、 类方法
类方法属于一个类，在运行时即存在于内存中。可使用类.方法的方式进行调用，即不需要创建类的实例。声明方式是在普通方法前加class：
class procedure[function] ......
function ValidatePID(const APID: string): string;
{内部函数,取身份证号校验位,最后一位,对18位有效}
function GetVerifyBit(sIdentityNum: string): Char;
var
nNum: Integer;
begin
Result := #0;
nNum := StrToInt(sIdentityNum[1]) * 7 +
StrToInt(sIdentityNum[2]) * 9 +
StrToInt(sIdentityNum[3]) * 10 +
StrToInt(sIdentityNum[4]) * 5 +
StrToInt(sIdentityNum[5]) * 8 +
StrToInt(sIdentityNum[6]) * 4 +
StrToInt(sIdentityNum[7]) * 2 +
StrToInt(sIdentityNum[8]) * 1 +
&n ......
最新文章 : delphi