Delphi
文章平均质量分 79
EYUANatQQdotCOM
这个作者很懒,什么都没留下…
展开
-
Delphi练习一
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, jpeg;type TForm1 = class(TForm) Label1: TLabel; Edi原创 2012-03-03 19:46:03 · 588 阅读 · 0 评论 -
Delphi练习二
unit Unit1;interfaceuses Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms, Dialogs,StdCtrls,ExtCtrls;type TfrmVoter = class(TForm) edtSelectedCities: TEdit; grpCa原创 2012-03-05 18:08:17 · 444 阅读 · 0 评论 -
Delphi练习四——窗体间跳转(用户登录)
主窗体代码:unit Unit3;interfaceuses Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms, Dialogs,Menus, jpeg, ExtCtrls;type TfrmUserMana = class(TForm) MainMenu1: TMainMenu原创 2012-03-06 15:48:28 · 2561 阅读 · 0 评论 -
Delphi练习五——文本编辑器(简单)
很简单的一个文本编辑器:unit Unit1;interfaceuses Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms, Dialogs,StdCtrls;type TfrmTextEditor = class(TForm) mmoEditArea: TMemo; b原创 2012-03-06 15:52:16 · 655 阅读 · 0 评论 -
TreeView、TreeNode练习,使用指针
DFM文件:object Encodefrm: TEncodefrm Left = 240 Top = 189 Width = 373 Height = 263 Caption = #32534#30721 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText F原创 2012-03-29 18:22:39 · 8481 阅读 · 0 评论 -
Delphi练习——StringGrid的使用(九九乘法表)
PAS:unit U_StringGrid;interfaceuses Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms, Dialogs,StdCtrls,Grids;type TfrmEinmaleins = class(TForm) lblEinmaleins: TLabe原创 2012-03-14 15:49:04 · 1312 阅读 · 0 评论 -
Delphi练习——TreeView使用
PASunit U_TreeView;interfaceuses Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms, Dialogs,StdCtrls,ComCtrls;type TfrmEncode = class(TForm) tvEncode: TTreeView;原创 2012-03-14 15:52:43 · 735 阅读 · 0 评论 -
字体设置器(TSpinEdit、TListBox使用)
DFM:object FontSelectorfrm: TFontSelectorfrm Left = 568 Top = 409 Width = 205 Height = 234 Caption = #23383#20307#35774#32622#22120 Color = clBtnFace Font.Charset = DEFAULT_CHARSET F原创 2012-03-21 09:39:20 · 778 阅读 · 0 评论