文件名称:delphi动态时钟设计
文件大小:158KB
文件格式:RAR
更新时间:2011-12-31 09:55:21
delphi 时钟
显示当前的年,月,日,以及时间 object Form1: TForm1 Left = 465 Top = 119 Width = 402 Height = 248 Caption = 'Form1' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 0 Top = 0 Width = 394 Height = 214 Align = alClient Alignment = taCenter Color = clGradientActiveCaption Font.Charset = DEFAULT_CHARSET Font.Color = clMaroon Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False Layout = tlCenter end object Button1: TButton Left = 16 Top = 160 Width = 70 Height = 20 Caption = 'date' TabOrder = 0 OnClick = Button1Click end object Button2: TButton Left = 112 Top = 160 Width = 70 Height = 20 Caption = 'time' TabOrder = 1 OnClick = Button2Click end object Button3: TButton Left = 216 Top = 160 Width = 70 Height = 20 Caption = 'date:time' TabOrder = 2 OnClick = Button3Click end object Button4: TButton Left = 312 Top = 160 Width = 70 Height = 20 Caption = 'exit' TabOrder = 3 OnClick = Button4Click end object Timer1: TTimer Enabled = False Interval = 20 OnTimer = Timer1Timer Left = 72 Top = 88 end object Timer2: TTimer Enabled = False Interval = 20 OnTimer = Timer2Timer Left = 256 Top = 88 end end
【文件预览】:
动态时钟
----Project1.exe(371KB)
----Unit1.dfm(2KB)
----Project1.dpr(188B)
----Unit1.pas(2KB)