todoform.dfm

来自「Delphi Kylix Database Development 附书代码」· DFM 代码 · 共 114 行

object frmTodo: TfrmTodo
  Left = 327
  Top = 144
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Add Todo'
  ClientHeight = 118
  ClientWidth = 390
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object pnlClient: TPanel
    Left = 0
    Top = 0
    Width = 390
    Height = 70
    Align = alClient
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 12
      Width = 56
      Height = 13
      Caption = '&Description:'
    end
    object Label2: TLabel
      Left = 8
      Top = 44
      Width = 54
      Height = 13
      Caption = '&Scheduled:'
    end
    object Label3: TLabel
      Left = 224
      Top = 44
      Width = 9
      Height = 13
      Caption = 'a&t'
    end
    object ecDescription: TEdit
      Left = 80
      Top = 8
      Width = 297
      Height = 21
      MaxLength = 50
      TabOrder = 0
    end
    object dtDate: TDateTimePicker
      Left = 80
      Top = 40
      Width = 129
      Height = 21
      CalAlignment = dtaLeft
      Date = 37101.4736959722
      Time = 37101.4736959722
      DateFormat = dfShort
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 1
    end
    object dtTime: TDateTimePicker
      Left = 248
      Top = 40
      Width = 129
      Height = 21
      CalAlignment = dtaLeft
      Date = 37101.4738068981
      Time = 37101.4738068981
      DateFormat = dfShort
      DateMode = dmComboBox
      Kind = dtkTime
      ParseInput = False
      TabOrder = 2
    end
  end
  object pnlBottom: TPanel
    Left = 0
    Top = 70
    Width = 390
    Height = 48
    Align = alBottom
    TabOrder = 1
    object btnCancel: TButton
      Left = 304
      Top = 12
      Width = 75
      Height = 25
      Cancel = True
      Caption = 'Cancel'
      ModalResult = 2
      TabOrder = 0
    end
    object btnOk: TButton
      Left = 224
      Top = 12
      Width = 75
      Height = 25
      Caption = 'OK'
      Default = True
      ModalResult = 1
      TabOrder = 1
    end
  end
end