糖炒栗子

cheap to talk,show muscle would be better...

导航

2011年12月1日 #

有关form的琐碎:free,hide,close

摘要: form.Free - 释放Form占用的所有资源。Free后,Form指针不能再使用,除非对Form重新赋值。 form.Hide - 隐藏Form。可以调用form.Show再一次显示。 form.close - 关闭Form,实际的结果取决于OnCloseQuery和OnClose,如果OnCloseQuery的CanClose为False,不执行任何操作,如果为True,进一步考察OnClose的Action的值: caNone: 不执行任何操作 caHide: 隐藏窗口,同form.Hide caFree: 释放Form占用的资源,同form.Free caMinimi... 阅读全文

posted @ 2011-12-01 12:25 糖炒栗子 阅读(1646) 评论(0) 推荐(0) 编辑

Delphi的OverRide、OverLoad和Virtual方法

摘要: 1.)方法的重写Overriding和重载Overloading是Java多态性的不同表现。重写Overriding是父类与子类之间多态性的一种表现,重载Overloading是一个类中多态性的一种表现。 如果在子类中定义某方法与其父类有相同的名称和参数,我们说该方法被重写 (Overriding)。子类的对象使用这个方法时,将调用子类中的定义,对它而言,父类中的定义如同被“屏蔽”了。 如果在一个类中定义了多个同名的方法,它们或有不同的参数个数或有不同的参数类型,则称为方法的重载(Overloading)。Overloaded的方法是可以改变返回值的类型。2.)Delphi 的函数覆盖(O.. 阅读全文

posted @ 2011-12-01 11:41 糖炒栗子 阅读(6433) 评论(0) 推荐(2) 编辑

Delphi窗体重绘API:DrawFocusRect,SetTextColor(),GetDc,GetWindowDC,MapWindowPoints,InflateRect

摘要: WinAPI: DrawFocusRect - 绘制焦点矩形用SetTextColor()设置颜色 功能 设置指定设备环境(HDC)的字体颜色原型 WINGDIAPI COLORREF WINAPI SetTextColor (HDC, COLORREF)也可以理解成 DWORD SetTextColor (HDC, DWORD),其中DWORD是关于颜色的参数,常用RGB()获取,如:SetTextColor(HDC,RGB(255,0,0));//声明: DrawFocusRect( hDC: HDC; {设备环境句柄} const lprc: TRect {矩形结构} ): ... 阅读全文

posted @ 2011-12-01 10:49 糖炒栗子 阅读(3598) 评论(0) 推荐(0) 编辑

delphi中的域

摘要: 对于对象来说,一个域就象一个变量。域可以是任何类型,包括类类型。(也就是说,域可以保存对象引用。)域通常是私有的。要定义类的域成员,只需简单地象声明变量那样声明域。所有的域声明必需出现在任何属性或方法声明之前。例如,下面的声明创建了一个叫做TNumber的类,该类中除继承自TObject的方法之外,仅有一个叫做Int的整数域成员。type TNumber = class Int: Integer;end;域的范围是静态的,即编译时对域的引用是固定的。要明白这一含义,考虑如下代码:Type TAncestor = class Value: Integer; end;TDescendant = c 阅读全文

posted @ 2011-12-01 10:19 糖炒栗子 阅读(333) 评论(0) 推荐(0) 编辑

delphi中exit,abort,break,continue 的区别

摘要: 在网上的一片帖子中找到的,挺详细,收藏了。exit: 退出函数体abort: 遇到异常,安静处理,就是不显示不提示break: 退出当前循环体,包括for ,while, repeat等循环体continue: 结束循环内的本次处理,继续从循环体的开始位置继续执行Exit 是跳出当前代码块,也就是当前函数,跳出后是要继续向下执行的(如果有后续代码)。Abort 是从 EAbort 过来的,可以激发 exception,其实质就是 Abort = RaiseException(),是一个不出现对话框的异常。所以 Abort 的行为和异常是一样的,其代码执行顺序也是follow异常的流程。例如:t 阅读全文

posted @ 2011-12-01 10:09 糖炒栗子 阅读(354) 评论(0) 推荐(0) 编辑

Delphi:assigned,TTreeView,return/result,listview

摘要: assigned 是用来判断某一指针(pointer)或过程引用是否为nil(空),如果为空则返回假(false)。用法示例(防止窗体被实例化多次):procedure TForm1.Button1Click(Sender: TObject);begin if (Not assigned(form2)) then begin form2:=Tform2.Create(Self); end; form2.show;end;procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);begin Action:=caFr 阅读全文

posted @ 2011-12-01 10:01 糖炒栗子 阅读(590) 评论(0) 推荐(0) 编辑