万一 - 博客园

2008年6月17日

摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) ComboBox1: TComboBox; ... 阅读全文

posted @ 2008-06-17 15:41 万一阅读(3804) 评论(0) 推荐(0) 编辑

再学 GDI+[44]: 文本输出 - 字体

摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) ListBox1: TListBox; ... 阅读全文

posted @ 2008-06-17 14:36 万一阅读(2282) 评论(5) 推荐(0) 编辑

WinAPI: GetModuleFileName、GetModuleHandle

摘要： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure FormCr... 阅读全文

posted @ 2008-06-17 11:40 万一阅读(9405) 评论(13) 推荐(0) 编辑

2008年6月16日

再学 GDI+[43]: 文本输出 - 获取已安装的字体列表

摘要：这比用 Screen.Fonts; 获取麻烦一些. 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) ... 阅读全文

posted @ 2008-06-16 23:43 万一阅读(1794) 评论(0) 推荐(0) 编辑

获取已打开的所有记事本的标题

摘要： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Memo1: TMemo; ... 阅读全文

posted @ 2008-06-16 21:42 万一阅读(3527) 评论(5) 推荐(0) 编辑

再学 GDI+[42]: 文本输出 - 字号单位

摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, ComCtrls; type TForm1 = class(TForm) Rad... 阅读全文

posted @ 2008-06-16 18:56 万一阅读(2070) 评论(0) 推荐(0) 编辑

再学 GDI+[41]: 文本输出 - 控制输出字符的个数

摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormPaint(Sender: TObje... 阅读全文

posted @ 2008-06-16 17:41 万一阅读(1955) 评论(1) 推荐(0) 编辑

再学 GDI+[40]: 文本输出 - 选择画刷

摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, CheckLst; type TForm1 = class(TForm) Rad... 阅读全文

posted @ 2008-06-16 14:45 万一阅读(2062) 评论(5) 推荐(0) 编辑

再学 GDI+[39]: 文本输出 - 文本样式

摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, CheckLst; type TForm1 = class(TForm) CheckListBox1... 阅读全文

posted @ 2008-06-16 14:14 万一阅读(2388) 评论(0) 推荐(0) 编辑

再学 GDI+[38]: 文本输出 - DrawString、TGPFont

摘要：本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; B... 阅读全文

posted @ 2008-06-16 11:05 万一阅读(4664) 评论(5) 推荐(0) 编辑