typecodeform.dfm

地址档案管理系统

object FormTypeCode: TFormTypeCode
  Tag = 18
  Left = 47
  Top = 150
  Width = 800
  Height = 534
  Caption = #31867#21035#20195#30721#23450#20041
  Color = clBtnFace
  Constraints.MaxHeight = 534
  Constraints.MaxWidth = 800
  Constraints.MinHeight = 534
  Constraints.MinWidth = 800
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid1: TDBGrid
    Left = 8
    Top = 8
    Width = 305
    Height = 489
    Ctl3D = False
    DataSource = DM.dsMasterCode
    ParentCtl3D = False
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object DBGrid2: TDBGrid
    Left = 400
    Top = 8
    Width = 305
    Height = 489
    Ctl3D = False
    DataSource = DM.dsDetailCode
    ParentCtl3D = False
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object tDbNav971: tDbNav97
    Left = 320
    Top = 8
    Width = 73
    Height = 260
    DataSource = DM.dsMasterCode
    Ctl3D = True
    ParentCtl3D = False
    CaptionStyle = blBitmapTop
    Style = btCaption
    TabOrder = 1
  end
  object tDbNav972: tDbNav97
    Left = 712
    Top = 8
    Width = 73
    Height = 260
    DataSource = DM.dsDetailCode
    CaptionStyle = blBitmapTop
    Style = btCaption
    TabOrder = 3
  end
  object wwDBNavigator1: TwwDBNavigator
    Left = 320
    Top = 268
    Width = 73
    Height = 41
    AutosizeStyle = asSizeNavButtons
    DataSource = DM.dsMasterCode
    Layout = nlVertical
    RepeatInterval.InitialDelay = 500
    RepeatInterval.Interval = 100
    object wwDBNavigator1FilterDialog: TwwNavButton
      Left = 0
      Top = 0
      Width = 73
      Height = 21
      Hint = 'Filter the dataset'
      ImageIndex = 0
      NumGlyphs = 0
      ShowText = True
      Spacing = 4
      Transparent = False
      Caption = #31579#36873#35760#24405
      Enabled = False
      DisabledTextColors.ShadeColor = clGray
      DisabledTextColors.HighlightColor = clBtnHighlight
      Index = 0
      Style = nbsFilterDialog
    end
    object wwDBNavigator1LocateDialog: TwwNavButton
      Left = 0
      Top = 21
      Width = 73
      Height = 20
      Hint = 'Locate a specific record'
      ImageIndex = 0
      NumGlyphs = 2
      ShowText = True
      Spacing = 4
      Transparent = False
      Caption = #26597#25214#35760#24405
      Enabled = False
      DisabledTextColors.ShadeColor = clGray
      DisabledTextColors.HighlightColor = clBtnHighlight
      Index = 1
      Style = nbsLocateDialog
    end
  end
  object wwDBNavigator2: TwwDBNavigator
    Left = 712
    Top = 268
    Width = 73
    Height = 41
    AutosizeStyle = asSizeNavButtons
    DataSource = DM.dsDetailCode
    Layout = nlVertical
    RepeatInterval.InitialDelay = 500
    RepeatInterval.Interval = 100
    object wwNavButton1: TwwNavButton
      Left = 0
      Top = 0
      Width = 73
      Height = 21
      Hint = 'Filter the dataset'
      ImageIndex = 0
      NumGlyphs = 0
      ShowText = True
      Spacing = 4
      Transparent = False
      Caption = #31579#36873#35760#24405
      Enabled = False
      DisabledTextColors.ShadeColor = clGray
      DisabledTextColors.HighlightColor = clBtnHighlight
      Index = 0
      Style = nbsFilterDialog
    end
    object wwNavButton2: TwwNavButton
      Left = 0
      Top = 21
      Width = 73
      Height = 20
      Hint = 'Locate a specific record'
      ImageIndex = 0
      NumGlyphs = 2
      ShowText = True
      Spacing = 4
      Transparent = False
      Caption = #26597#25214#35760#24405
      Enabled = False
      DisabledTextColors.ShadeColor = clGray
      DisabledTextColors.HighlightColor = clBtnHighlight
      Index = 1
      Style = nbsLocateDialog
    end
  end
end