一个关于 absolute 关键字的小练习
摘要://例子中的三个变量让 absolute 都给弄到一块了, 这有时会很方便; 但我总也想不到用, 还是不熟. procedure TForm1.FormCreate(Sender: TObject); var num: Int64; pt: TPoint absolute num; arr: array[0..1] of Integer absolute pt; begin p...
阅读全文
posted @
2009-02-19 16:03
万一
阅读(7202)
推荐(1) 编辑
Delphi 的运算符重载(1)
摘要:其实 Delphi 2006 就已经支持运算符重载了, 不过 for Win32 的版本只是在 record 里支持. 运算符重载有什么用处呢? 举个例子: 譬如 "张三"、"李四" 两人一起来拜见你, 你可能会问: "你们两个谁大?" 其实你是在问: "你们两个谁的年龄大?"; 但生活中人们一般都不这么罗嗦. 在程序中能否这样简化呢? 这只能通过 "运算符重载" 做到! 先按 "你们两...
阅读全文
posted @
2008-12-09 23:49
万一
阅读(9389)
推荐(0) 编辑
Delphi 的按位运算详解 - 回复来宾"初学汇编"的问题
摘要:问题来源: http://www.cnblogs.com/del/archive/2008/04/02/1055762.html#1134153 http://www.cnblogs.com/del/archive/2008/04/02/1055648.html#1134081 Delphi 的按位运算符共有六个: not and or xor shr shl; 其中的 not and or ...
阅读全文
posted @
2008-04-02 12:01
万一
阅读(15066)
推荐(1) 编辑
^ 符号的特殊用法
摘要:begin ShowMessage(IntToStr(Byte(^A))); {1} ShowMessage(IntToStr(Integer(^b))); {2} ShowMessage(IntToStr(Integer(^^))); {30} ShowMessage(IntToStr(Integer(^?))); {127} end; ^ 符号的特殊用法产生...
阅读全文
posted @
2008-01-01 01:51
万一
阅读(10734)
推荐(0) 编辑
Delphi 的运算符列表
摘要:分类 运算符 操作 操作数 结果类型 范例 算术运算符 + 加 整数,实数 整数,实数 X + Y - 减 整数,实数 整数,实数 Result - 1 * 乘 整数,实数 整数,实数 P * InterestRate / 实数除 整数,实数 实数 X / 2 div 整数除 整数 整数 Total div UnitSize mod 取模 整数 整数 Y mo...
阅读全文
posted @
2007-12-10 15:01
万一
阅读(34725)
推荐(1) 编辑
is 与 as 运算符举例
摘要:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ActnList, StdCtrls, ExtCtrls; type TForm1 = class(TForm) Button1: TButton; ...
阅读全文
posted @
2007-11-30 20:59
万一
阅读(4658)
推荐(0) 编辑
@ 与 ^ 运算符
摘要://例1: procedure TForm1.Button1Click(Sender: TObject); var str: string; p: Pointer; begin p := @str; //变量 str 的地址 p := @Form1; //变量 Form1 的地址 p := @TForm1.Button1Click; //过程 TForm1.Butt...
阅读全文
posted @
2007-11-26 23:27
万一
阅读(5018)
推荐(0) 编辑
关于运算符
摘要:运算符包括: @ not ^ * / div mod and shl shr as + - or xor = > = in is 其中 @ not ^ 是一元运算符; + - 有时是一元,有时是二元; 其他都是二元运算符. 一元运算符在运算数的前面, ^ 例外,也可以在后面,如: P^; 二元运算符在运算数中间. 运算符的行为随运算数的类型...
阅读全文
posted @
2007-11-22 15:07
万一
阅读(4909)
推荐(0) 编辑