随笔 - 2146  文章 - 19 评论 - 11846 阅读 - 1267万

随笔分类 -  学习官方示例

学习官方示例 - SysUtils.EncodeDate、EncodeTime、StrToDate、StrToTime、StrToDateTime
摘要:代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) ListBox1: TListBox; Button1... 阅读全文
posted @ 2008-09-11 15:17 万一 阅读(10732) 评论(6) 推荐(0) 编辑
学习官方示例 - SysUtils.DecodeDate、DecodeTime
摘要:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure Button... 阅读全文
posted @ 2008-09-11 14:31 万一 阅读(5778) 评论(4) 推荐(0) 编辑
学习官方示例 - System.RunError
摘要:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure Button... 阅读全文
posted @ 2008-09-11 14:16 万一 阅读(5009) 评论(5) 推荐(0) 编辑
学习官方示例 - System.Frac: 返回小数部分
摘要:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure Button... 阅读全文
posted @ 2008-09-11 14:09 万一 阅读(4720) 评论(2) 推荐(0) 编辑
学习官方示例 - System.Assigned
摘要:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: TButton... 阅读全文
posted @ 2008-09-11 00:50 万一 阅读(5435) 评论(10) 推荐(0) 编辑
学习官方示例 - System.TClass
摘要:本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) ListBox1: TListBox; ... 阅读全文
posted @ 2008-09-11 00:38 万一 阅读(3485) 评论(0) 推荐(0) 编辑
学习官方示例 - System.Hi、System.Lo
摘要:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: TButton... 阅读全文
posted @ 2008-09-11 00:26 万一 阅读(3536) 评论(2) 推荐(0) 编辑
学习官方示例 - TForm.BorderIcons
摘要:本例用一行代码禁用了最大化按钮. unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormCreate(Sender: TO... 阅读全文
posted @ 2008-06-21 12:25 万一 阅读(3931) 评论(2) 推荐(1) 编辑
学习官方示例 - TApplication.OnShowHint
摘要:代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Label1: TLabel; Label2: TLab... 阅读全文
posted @ 2008-06-19 15:26 万一 阅读(3884) 评论(0) 推荐(0) 编辑
学习官方示例 - TApplication.OnMessage
摘要:本例演示了一个消息的定义、发送和接受的过程. 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) ... 阅读全文
posted @ 2008-06-19 12:48 万一 阅读(6887) 评论(14) 推荐(0) 编辑
学习官方示例 - TApplication.OnException
摘要:本例演示了全局的异常捕获及处理, 并模拟激发了一个异常; 编译后, 单独运行一下生成的程序文件... 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type ... 阅读全文
posted @ 2008-06-19 12:14 万一 阅读(4419) 评论(0) 推荐(0) 编辑
学习官方示例 - TApplication.OnDeactivate
摘要:本例功能: 切换窗口时让程序最小化. 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormCreate(Se... 阅读全文
posted @ 2008-06-19 11:52 万一 阅读(3125) 评论(0) 推荐(0) 编辑
学习官方示例 - TApplication.Icon
摘要:本例同时包含了 TOpenPictureDialog 控件的一些用法. 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtDlgs, StdCtrls; type TForm1 = cla... 阅读全文
posted @ 2008-06-19 11:35 万一 阅读(3989) 评论(0) 推荐(0) 编辑
学习官方示例 - TApplication.ExeName
摘要:本例包含用 TFileStream 复制文件和用 ShellAPI.ShellExecute 打开文件夹的方法. 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; ... 阅读全文
posted @ 2008-06-19 10:48 万一 阅读(5055) 评论(3) 推荐(0) 编辑
学习官方示例 - TApplication.CreateForm
摘要:本例源码下载, 运行效果图: 制作过程: 1、新建工程后, 再添加 Form2、Form3、Form4、Form5; 2、在 Form5 上分别添加一个 TProgressBar、TLabel(使用默认名称); 3、打开工程源码(Project -> View Source), 贴入以下文件后运行. program Project1; uses Forms, SysUtils, ... 阅读全文
posted @ 2008-06-19 09:24 万一 阅读(7925) 评论(2) 推荐(0) 编辑



点击右上角即可分享
微信分享提示