摘要：
对不同的类型的表达式相除要选用不同的除法运算符：/ 是对浮点数做除法运算；div 是对整数做除法运算；mod 取模 就是取余数； 阅读全文
posted @ 2010-08-11 11:53 beeone 阅读(682) 评论(0) 推荐(0) 编辑
摘要：
注意：在object Pascal中 ：= 运算符用来为一个变量赋值，而 = 运算符是比较两个操作数的值； Is是比较符 是用在对象之间，而 = 用于其他类型之间。 阅读全文
posted @ 2010-08-11 11:41 beeone 阅读(147) 评论(0) 推荐(0) 编辑
摘要：
Object Pascal 允许在const 和Var声明时用编译期间的函数，这些函数包括Ord()、Chr（）、Trunc（）、Round（）、High（）、Low（）和Sizeof（）。例如，下列所有代码都是合法的： Type A = Array[1..2] of Integer; Cont w: word = SizeOf(Byte); Var i :... 阅读全文
posted @ 2010-08-11 11:37 beeone 阅读(236) 评论(0) 推荐(0) 编辑
摘要：
当在Object Pascal 中声明一个变量时，变量名在类型的前面，中间用冒号隔开，变量初始化通常要跟变量声明分开。 注意：IDE能自动赋初值的变量仅是全局变量，不是那些在过程或函数中局部变量。 提示：Delphi编辑器自动对全局变量赋初值。当程序运行时，所欲的整数类型赋为0，浮点类型赋值0.0，指针为Null，字符串为空等，因此在源代码中不必对全局变量赋零初值。而过程或函数的局部变量需要赋... 阅读全文
posted @ 2010-08-11 10:17 beeone 阅读(369) 评论(0) 推荐(0) 编辑
摘要：
缺省值参数是在Dephi 4中被引进的（当调用有缺省值参数的过程和函数时，可以不提供参数）。为了声明一个有缺省值参数的过程或函数，在参数类型后跟一个等号和缺省值，示例如下： Procudure HasDefVal（S：String；I：Integer=0）； HasDefVal（）过程能用两种方式调用。 第一种方式：两个参数都指定： HasDefVal（‘Hello&rsquo... 阅读全文
posted @ 2010-08-11 09:55 beeone 阅读(1393) 评论(0) 推荐(0) 编辑
摘要：
UDL 链接数据库给程序编写提供了很大的方便之处，方便于程序切换不同的数据库类型，下面简单介绍下连接方法：新建一个文本文件改名为db.udl即可，双击即可运行。运行界面为：在程序里链接数据库的那一步改为链接UDL，方法如下：var dbStr: string; dbStr := extractfilepath(paramstr(0))+'db.udl'; dbStr := 'FILE NAME='... 阅读全文
posted @ 2010-08-05 14:22 beeone 阅读(531) 评论(0) 推荐(0) 编辑
摘要：
//创建定时器函数的声明: SetTimer( hWnd: HWND; {与定时器相关联的窗口句柄} nIDEvent: UINT; {指定一个非 0 的定时器标识符} uElapse: UINT; {指定间隔时间, 单位是毫秒} lpTimerFunc: TFNTimerProc {每到时间后, 要调用的函数... 阅读全文
posted @ 2010-08-05 11:51 beeone 阅读(272) 评论(0) 推荐(0) 编辑
摘要：
1 ，对于日期字段字段access表示为：#1981-28-12#SQLSERVER2000表示为：''1981-02-12''2,SQL语句区别，select ,update 在对单表操作时都差不多，但多表操作时update语句的区别ACCESS与SQLSERVER中的Update语句对比:SQLSERVER中更新多表的Update语句:Update Tab1SET a.Name = b.Nam... 阅读全文
posted @ 2010-08-05 11:26 beeone 阅读(786) 评论(0) 推荐(0) 编辑
摘要：
1、如何实现在Microsoft Access数据库中的图像存储： 这里是利用TStream的子类TMemoryStream向Microsoft Access数据库中存储图像的。 下面的这段代码是在按了“保存”按钮之后所触发的事件处理程序： procedure TForm1.Button1Click(Sender: TObject); Var MyJPEG : TJPEGImage; ... 阅读全文
posted @ 2010-08-05 11:22 beeone 阅读(985) 评论(0) 推荐(0) 编辑