stock_contract_search.dfm

delphi的一个开发实例

object frm_Stock_Contract_Search: Tfrm_Stock_Contract_Search
  Left = 168
  Top = 210
  Width = 740
  Height = 480
  BorderIcons = [biSystemMenu]
  Caption = #12304#37319#36141#21512#21516#26597#35810#12305
  Color = clSkyBlue
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 732
    Height = 453
    Align = alClient
    Color = clSkyBlue
    TabOrder = 0
    object GroupBox1: TGroupBox
      Left = 1
      Top = 1
      Width = 730
      Height = 125
      Align = alTop
      TabOrder = 0
      object Label1: TLabel
        Left = 598
        Top = 19
        Width = 14
        Height = 14
        Caption = #21040
        Visible = False
      end
      object CheckBox1: TCheckBox
        Left = 12
        Top = 19
        Width = 91
        Height = 17
        Caption = #25353#24405#21333#26085#26399
        TabOrder = 0
        OnClick = CheckBox1Click
      end
      object CheckBox2: TCheckBox
        Left = 12
        Top = 45
        Width = 91
        Height = 17
        Caption = #25353#21333#25454#32534#21495
        TabOrder = 1
        OnClick = CheckBox2Click
      end
      object CheckBox3: TCheckBox
        Left = 12
        Top = 72
        Width = 91
        Height = 17
        Caption = #25353#32463#25163#20154#21592
        TabOrder = 2
        OnClick = CheckBox3Click
      end
      object CheckBox4: TCheckBox
        Left = 368
        Top = 19
        Width = 115
        Height = 17
        Caption = #25353#24405#21333#26085#26399#27573#20174
        TabOrder = 3
        OnClick = CheckBox4Click
      end
      object Edit4: TMaskEdit
        Left = 490
        Top = 16
        Width = 100
        Height = 22
        EditMask = '!9999/99/00;1;_'
        MaxLength = 10
        TabOrder = 4
        Text = '    -  -  '
        Visible = False
      end
      object Edit5: TMaskEdit
        Left = 624
        Top = 16
        Width = 100
        Height = 22
        EditMask = '!9999/99/00;1;_'
        MaxLength = 10
        TabOrder = 5
        Text = '    -  -  '
        Visible = False
      end
      object CheckBox5: TCheckBox
        Left = 368
        Top = 45
        Width = 91
        Height = 17
        Caption = #25353#21333#25454#25688#35201
        TabOrder = 6
        OnClick = CheckBox5Click
      end
      object Edit6: TComboBox
        Left = 490
        Top = 42
        Width = 233
        Height = 22
        ItemHeight = 14
        TabOrder = 7
        Visible = False
      end
      object Edit1: TComboBox
        Left = 106
        Top = 16
        Width = 233
        Height = 22
        ItemHeight = 14
        TabOrder = 8
        Visible = False
      end
      object Edit2: TComboBox
        Left = 106
        Top = 42
        Width = 233
        Height = 22
        ItemHeight = 14
        TabOrder = 9
        Visible = False
      end
      object Edit3: TComboBox
        Left = 106
        Top = 69
        Width = 233
        Height = 22
        ItemHeight = 14
        TabOrder = 10
        Visible = False
      end
      object Panel2: TPanel
        Left = 2
        Top = 94
        Width = 726
        Height = 29
        Align = alBottom
        BevelOuter = bvNone
        Color = clSkyBlue
        TabOrder = 11
        object Cmd_Search: TSpeedButton
          Left = 6
          Top = 4
          Width = 74
          Height = 22
          Caption = #26597#35810
          OnClick = Cmd_SearchClick
        end
        object Cmd_Select: TSpeedButton
          Left = 102
          Top = 4
          Width = 83
          Height = 22
          Caption = #36873#25321
          Visible = False
          OnClick = Cmd_SelectClick
        end
      end
      object Edit_Stock_Contract_NO: TLabeledEdit
        Left = 490
        Top = 67
        Width = 231
        Height = 22
        EditLabel.Width = 70
        EditLabel.Height = 14
        EditLabel.Caption = #21333#25454#32534#21495#65306
        Enabled = False
        LabelPosition = lpLeft
        LabelSpacing = 3
        TabOrder = 12
        Visible = False
      end
      object DateTimePicker1: TDateTimePicker
        Left = 570
        Top = 16
        Width = 19
        Height = 22
        CalAlignment = dtaLeft
        Date = 37991.4137283102
        Time = 37991.4137283102
        DateFormat = dfShort
        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 13
        Visible = False
        OnChange = DateTimePicker1Change
      end
      object DateTimePicker2: TDateTimePicker
        Left = 704
        Top = 16
        Width = 19
        Height = 22
        CalAlignment = dtaLeft
        Date = 37991.4137283102
        Time = 37991.4137283102
        DateFormat = dfShort
        DateMode = dmComboBox
        Kind = dtkDate
        ParseInput = False
        TabOrder = 14
        Visible = False
        OnChange = DateTimePicker2Change
      end
    end
    object DBGrid1: TDBGrid
      Left = 1
      Top = 126
      Width = 730
      Height = 326
      Align = alClient
      FixedColor = clSkyBlue
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 1
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -14
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnCellClick = DBGrid1CellClick
    end
  end
  object XPMenu1: TXPMenu
    DimLevel = 30
    GrayLevel = 10
    Font.Charset = GB2312_CHARSET
    Font.Color = clMenuText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    Color = clBtnFace
    IconBackColor = clBtnFace
    MenuBarColor = clBtnFace
    SelectColor = clHighlight
    SelectBorderColor = clHighlight
    SelectFontColor = clMenuText
    DisabledColor = clInactiveCaption
    SeparatorColor = clBtnFace
    CheckedColor = clHighlight
    IconWidth = 24
    DrawSelect = True
    UseSystemColors = True
    OverrideOwnerDraw = False
    Gradient = False
    FlatMenu = False
    AutoDetect = True
    Active = True
    ControlUseTrueXPStyle = True
    BtnRoundArc = 5
    BtnOutLineBorderColor = 7552000
    BtnInnerBorderMoveColor = 3257087
    BtnInnerBorderFocusColor = 15183500
    BtnSurfaceNormalColor = 16251903
    BtnSurfaceDownColor = 14608359
    BtnSurfaceBottomLineColor = 14608359
    BtnSurfaceDownBottomLineColor = 15199215
    RdoChkControlChkColor = 41472
    ComboBoxChkColor = 9201994
    ComboboxSurfaceMoveColor = 16771030
    ControlDisabledBorderColor = 11913158
    Left = 208
    Top = 56
  end
end