摘要: 1.progressbar进程控制条主要的属性:Max,Min,Step与Timer一起使用while(pb1.Position<pb1.Max) do//pb1是progressbar进度条控件 begin pb1.StepIt; end;2.Gauge与progressbar用途完全相同,所不同的是Gauge具有多种表现形式,如圆形,方形等。主要的属性:Max,Min,Process与Timer一起使用procedure TForm1.tmr1Timer(Sender: TObject);begin g1.Progress := g1.Progress + 1;//g1表示Gauge 阅读全文
posted @ 2011-09-05 16:35 Jasmines 阅读(876) 评论(0) 推荐(0) 编辑
摘要: assigned 是用来判断某一指针(pointer)或过程引用是否为nil(空),如果为空则返回假(false)。用法示例(防止窗体被实例化多次):procedure TForm1.Button1Click(Sender: TObject);begin if (Not assigned(form2)) then//判断form2是否被创建 begin form2:=Tform2.Create(Self); end; form2.show;end; 阅读全文
posted @ 2011-09-05 16:25 Jasmines 阅读(3330) 评论(0) 推荐(0) 编辑
摘要: delphi中表示跳出的有break,continue, exit,abort, halt, runerror。1、break 强制退出循环(只能放在循环中),用于从For语句,while语句或repeat语句中强制退出。2、continue 用于从For语句,while语句或repeat语句强行结束本次称称循环,并开始下一次循环。3、exit 用于从当前代码块中退出。若该代码为主程序,则终止该程序,若是函数或过程,则立即该过程或函数。4、abort 中止程序的运行,产生不报错的异常信息。跳出祖先模块。和exit的区别是procedure p1;begin p2; p3;end;procedu 阅读全文
posted @ 2011-09-05 15:10 Jasmines 阅读(10275) 评论(0) 推荐(1) 编辑
摘要: 名称变量类型ShortInt8位有符号整数Byte8位无符号整数SmallInt16位有符号整数Word16位无符号整数Integer32位有符号整数Longint32位有符号整数 Cardinal32位无符号整数Int6464位有符号整数Single4字节浮点数Real486字节浮点数Double8字节浮点数Extended10字节浮点数currency64位货币值TDateTime8字节日期/时间Variant16字节variantOleVariant16字节variantTVarData16字节variantChar1字节字符WideChar2字节字符ShortString固定长度字节的 阅读全文
posted @ 2011-09-05 14:24 Jasmines 阅读(451) 评论(0) 推荐(0) 编辑