摘要: Move 移动 1、将选定的静态函数从一个类移动到另一个类 2、将选中的类或接口移动到其他单元 Extract Interface 抽取接口 将选定的函数抽取到一个新的接口中 Extract Superclass 抽取基类 ... 阅读全文
posted @ 2007-12-17 23:21 万一 阅读(6704) 评论(1) 推荐(0) 编辑
摘要: unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) ... 阅读全文
posted @ 2007-12-17 22:48 万一 阅读(23286) 评论(15) 推荐(4) 编辑
摘要: GetCursorPos; //获取 SetCursorPos; //设置 ClientToScreen; //转换 ScreenToClient; //转换 阅读全文
posted @ 2007-12-17 18:08 万一 阅读(2028) 评论(0) 推荐(0) 编辑
摘要: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) RadioGroup1: TRadioGroup; ... 阅读全文
posted @ 2007-12-17 16:38 万一 阅读(3889) 评论(7) 推荐(0) 编辑
摘要: unit Unit1; interface uses Classes, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); end; TBase = class ... 阅读全文
posted @ 2007-12-17 13:43 万一 阅读(4471) 评论(38) 推荐(0) 编辑
摘要: free 并不能将对象置为 nil 阅读全文
posted @ 2007-12-17 13:26 万一 阅读(2706) 评论(1) 推荐(0) 编辑