findproductsample.dfm

某公司资料管理系统

object FindProductSampleForm: TFindProductSampleForm
  Left = 205
  Top = 198
  BorderStyle = bsDialog
  Caption = #26597#35810#26679#26495#24207#21495
  ClientHeight = 343
  ClientWidth = 329
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 4
    Top = 4
    Width = 237
    Height = 62
    Shape = bsFrame
  end
  object Label1: TLabel
    Left = 15
    Top = 16
    Width = 48
    Height = 12
    Caption = #23383#27573#21517#31216
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 25
    Top = 43
    Width = 36
    Height = 12
    Caption = #23383#27573#20540
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object SearchBtn: TSpeedButton
    Left = 208
    Top = 36
    Width = 23
    Height = 23
    Hint = 'Search'
    Enabled = False
    Glyph.Data = {
      CA010000424DCA01000000000000760000002800000022000000110000000100
      04000000000054010000CE0E0000D80E00001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333333FBFFF
      FFFFF3333333333333333300000033333333FBBFFFFBF3333333333333333300
      00003333333FBFFFFBFFF333333333333333330000003333333FBFFFFBFBF333
      3333333333333300000033333333FBBFFFFFF333333333333333330000003333
      333444FBFFFBF3333333888333333300000033333344834FBFFFF33333388738
      333333000000333334847F84BFFFF33333878737833333000000333334484F84
      FBBFB333338878378333330000003333348F74483FF3F3333387338873333300
      0000333344FFF743333333333883333833333300000033448F84443333333338
      873388873333330000003448F74333333333338873387773333333000000348F
      77333333333333873337333333333300000034F7743333333333338333873333
      3333330000003444433333333333338888733333333333000000333333333333
      3333333333333333333333000000}
    NumGlyphs = 2
    ParentShowHint = False
    ShowHint = True
    OnClick = SearchBtnClick
  end
  object DBGrid1: TDBGrid
    Left = 4
    Top = 65
    Width = 320
    Height = 271
    DataSource = MastData.SampleNoLookupSource
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
    Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    ParentFont = False
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDblClick = DBGrid1DblClick
  end
  object Button1: TButton
    Left = 249
    Top = 6
    Width = 75
    Height = 25
    Caption = #30830#23450
    Default = True
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ModalResult = 1
    ParentFont = False
    TabOrder = 1
  end
  object Button2: TButton
    Left = 249
    Top = 37
    Width = 75
    Height = 25
    Cancel = True
    Caption = #21462#28040
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ModalResult = 2
    ParentFont = False
    TabOrder = 2
  end
  object SearchEdit: TEdit
    Left = 75
    Top = 39
    Width = 116
    Height = 20
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
    ParentFont = False
    TabOrder = 3
    OnChange = SearchEditChange
    OnKeyPress = SearchEditKeyPress
  end
  object OrderCombox: TComboBox
    Left = 75
    Top = 12
    Width = 143
    Height = 20
    Style = csDropDownList
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
    ItemHeight = 12
    ItemIndex = 0
    ParentFont = False
    TabOrder = 4
    Text = #26679#26495#24207#21495
    OnChange = OrderComboxChange
    Items.Strings = (
      #26679#26495#24207#21495
      #20135#21697#32534#21495)
  end
  object DataSource: TDataSource
    DataSet = MastData.SampleNoLookup
    Left = 90
    Top = 150
  end
end