Delphi基础
文章平均质量分 74
chinaandys
这个作者很懒,什么都没留下…
展开
-
Delphi基础:回调函数及其使用
Delphi基础:回调函数及其使用 1 回调函数的概述 回调函数是这样一种机制:调用者在初始化一个对象(这里的对象是泛指,包括OOP中的对象、全局函数等)时,将一些参数传递给对象,同时将一个调用者可以访问的函数地址传递给该对象。这个函数就是调用者和被调用者之间的一种通知约定,当约定的事件发生时,被调用者(转载 2004-12-01 11:31:00 · 1204 阅读 · 1 评论 -
DBGrid控件大全(一)
DbGrid控件的标题栏弹出菜单procedure TFrmOrderPost.DbgOrderPostMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);var CurPost:TPoint;begin GetCursorPos(CurPost)转载 2005-03-01 16:11:00 · 4947 阅读 · 0 评论 -
小写转大写
function NumToChar(const n: Real): string; //可以到万亿,并且可以随便扩大范围const cNum: WideString = 零壹贰叁肆伍陆柒捌玖--万仟佰拾亿仟佰拾万仟佰拾元角分;cCha:array[0..1, 0..12]of string =(( 零元,零拾,零佰,零仟,零万,零亿,亿万,零零零,零零,转载 2005-03-25 08:21:00 · 912 阅读 · 0 评论 -
进制转换
//二进制字符转十进制Function binToDec(Value :string) : string;//integer;VAR str : String; Int : Integer; i : integer;BEGIN Str := UpperCase(Value); Int := 0; FOR i := 1 TO Length(str) DO Int := Int * 2+ ORD(s转载 2005-03-29 17:54:00 · 817 阅读 · 0 评论