![](https://img-blog.csdnimg.cn/20201014180756916.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
Delphi
文章平均质量分 72
林小宝
这个作者很懒,什么都没留下…
展开
-
计算器
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Label1: TLabel; La原创 2013-08-19 19:53:37 · 428 阅读 · 0 评论 -
Memo与MaskEdit小应用
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Mask, ExtCtrls;type TForm1 = class(TForm) Panel1:原创 2013-08-19 20:01:02 · 539 阅读 · 0 评论 -
opendialog与savedialog
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls;type TForm1 = class(TForm) Memo1: TMemo;原创 2013-08-20 11:38:16 · 1240 阅读 · 0 评论 -
ProgressBar进度条与颜色RGB
unit Unit2;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, ComCtrls;type TForm2 = class(TForm) Tra原创 2013-08-20 11:41:10 · 1140 阅读 · 0 评论 -
文件编辑器
unit Unit1;interfaceuses COmObj,WordXP,Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Menus, StdCtrls, OleCtnrs, ComCtrls, Buttons, ToolWin;原创 2013-08-20 11:36:08 · 693 阅读 · 0 评论 -
Timer时钟
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls;type TForm1 = class(TForm) Timer1: TTime原创 2013-08-25 23:57:34 · 654 阅读 · 1 评论 -
Radio 组件
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls;type TForm1 = class(TForm) RadioGroup1:原创 2013-08-18 20:46:26 · 540 阅读 · 0 评论 -
文件操作
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Label1: TLabel; Ed原创 2013-08-18 20:42:04 · 484 阅读 · 0 评论