findsampleroute.dfm

某公司资料管理系统

object FindSampleRouteForm: TFindSampleRouteForm
  Left = 193
  Top = 138
  BorderStyle = bsSingle
  Caption = #26597#35810#26679#26495#27969#31243
  ClientHeight = 346
  ClientWidth = 470
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Scaled = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 470
    Height = 305
    Align = alClient
    Caption = 'Panel1'
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 1
      Top = 1
      Width = 225
      Height = 303
      Hint = #21452#20987#23558#36820#22238#26412#26465#35760#24405
      Align = alLeft
      DataSource = MastData.SampleRouteLookupSource
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'SampleID'
          Title.Caption = #24207#21495
          Width = 40
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'SampleRouteName'
          Title.Alignment = taCenter
          Title.Caption = #26679#26495#27969#31243#21517#31216
          Visible = True
        end>
    end
    object DBGrid2: TDBGrid
      Left = 226
      Top = 1
      Width = 243
      Height = 303
      Align = alClient
      DataSource = MastData.SampleRouteDLookupSource
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'ItemNo'
          Title.Caption = #20998#21333#24207#21495
          Width = 40
          Visible = True
        end
        item
          Color = clInfoBk
          Expanded = False
          FieldName = 'RouteCode'
          ReadOnly = True
          Title.Caption = #27969#31243#20195#30721
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'RouteName'
          Title.Caption = #27969#31243#21517#31216
          Visible = True
        end>
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 305
    Width = 470
    Height = 41
    Align = alBottom
    BevelOuter = bvLowered
    TabOrder = 1
    object Button1: TButton
      Left = 242
      Top = 6
      Width = 64
      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 = 0
    end
    object Button2: TButton
      Left = 333
      Top = 6
      Width = 58
      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 = 1
    end
  end
end