qclyjeb.dfm

仓库管理信息系统

object qclyfrm: Tqclyfrm
  Left = 154
  Top = 106
  Width = 768
  Height = 437
  Caption = #20840#21378#39046#29992#37329#39069#34920
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 760
    Height = 49
    Align = alTop
    TabOrder = 0
    object Label8: TLabel
      Left = 16
      Top = 20
      Width = 65
      Height = 13
      Caption = #20986#20179#26085#26399#20174
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label9: TLabel
      Left = 190
      Top = 20
      Width = 13
      Height = 13
      Caption = #21040
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label1: TLabel
      Left = 440
      Top = 16
      Width = 52
      Height = 13
      Caption = #26448#26009#32534#30721
    end
    object dtp1: TDateTimePicker
      Left = 80
      Top = 16
      Width = 100
      Height = 21
      CalAlignment = dtaLeft
      Date = 37380.4112435532
      Time = 37380.4112435532
      DateFormat = dfShort
      DateMode = dmUpDown
      Kind = dtkDate
      ParseInput = False
      TabOrder = 0
    end
    object dtp2: TDateTimePicker
      Left = 210
      Top = 16
      Width = 100
      Height = 21
      CalAlignment = dtaLeft
      Date = 37380.4112435532
      Time = 37380.4112435532
      DateFormat = dfShort
      DateMode = dmUpDown
      Kind = dtkDate
      ParseInput = False
      TabOrder = 1
    end
    object Button1: TButton
      Left = 321
      Top = 16
      Width = 75
      Height = 25
      Caption = #26085#26399#30830#35748
      TabOrder = 2
      OnClick = Button1Click
    end
    object Edit1: TEdit
      Left = 506
      Top = 16
      Width = 100
      Height = 21
      TabOrder = 3
      OnKeyUp = Edit1KeyUp
    end
    object Panel1: TPanel
      Left = 679
      Top = 15
      Width = 79
      Height = 32
      Align = alRight
      AutoSize = True
      BevelInner = bvLowered
      TabOrder = 4
      object Button2: TButton
        Left = 2
        Top = 3
        Width = 75
        Height = 25
        Caption = #36864#20986
        TabOrder = 0
        OnClick = Button2Click
      end
    end
  end
  object DBGridEh1: TDBGridEh
    Left = 0
    Top = 49
    Width = 760
    Height = 361
    Align = alClient
    DataSource = dm.qclyds
    FooterColor = 16439211
    FooterFont.Charset = ANSI_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -13
    FooterFont.Name = #23435#20307
    FooterFont.Style = []
    FooterRowCount = 1
    FrozenCols = 1
    PopupMenu = PopupMenu1
    ReadOnly = True
    SumList.Active = True
    TabOrder = 1
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    UseMultiTitle = True
    Columns = <
      item
        EditButtons = <>
        FieldName = #26448#26009#32534#30721
        Footer.Alignment = taCenter
        Footer.Value = #21512#35745
        Footer.ValueType = fvtStaticText
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = #26448#26009#21517#31216
        Footers = <>
        Width = 139
      end
      item
        EditButtons = <>
        FieldName = #37096#38376#21517#31216
        Footers = <>
        Width = 100
      end
      item
        EditButtons = <>
        FieldName = #37096#38376'ID'
        Footers = <>
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = #37329#39069
        Footer.ValueType = fvtSum
        Footers = <>
        Width = 99
      end>
  end
  object SaveDialog1: TSaveDialog
    Filter = 
      'Microsoft Excel Workbook (*.xls)|*.XLS|Comma separated values (*' +
      '.csv)|*.CSV|HTML file (*.htm)|*.HTM|Rich Text Format (*.rtf)|*.R' +
      'TF|Text files (*.txt)|*.TXT'
    InitialDir = 'd:'
    Left = 237
    Top = 200
  end
  object ActionManager1: TActionManager
    ActionBars = <
      item
      end>
    Left = 264
    Top = 270
    object EditCut1: TEditCut
      Category = 'Edit'
      Caption = 'Cu&t'
      Hint = #21098#20999
      ImageIndex = 0
      ShortCut = 16472
    end
    object EditCopy1: TEditCopy
      Category = 'Edit'
      Caption = '&Copy'
      Hint = #22797#21046
      ImageIndex = 1
      ShortCut = 16451
    end
    object EditPaste1: TEditPaste
      Category = 'Edit'
      Caption = '&Paste'
      Hint = #31896#36148
      ImageIndex = 2
      ShortCut = 16470
    end
    object EditDelete1: TEditDelete
      Category = 'Edit'
      Caption = '&Delete'
      Hint = 'Delete|Erases the selection'
      ImageIndex = 5
      ShortCut = 46
    end
    object FilePrintSetup1: TFilePrintSetup
      Category = 'File'
      Caption = 'Print Set&up...'
      Hint = 'Print Setup'
      ImageIndex = 19
    end
    object FontEdit1: TFontEdit
      Category = 'Dialog'
      Caption = 'Select &Font...'
      Dialog.Font.Charset = DEFAULT_CHARSET
      Dialog.Font.Color = clWindowText
      Dialog.Font.Height = -11
      Dialog.Font.Name = 'MS Sans Serif'
      Dialog.Font.Style = []
      Dialog.MinFontSize = 0
      Dialog.MaxFontSize = 0
      Hint = #23383#20307
      ImageIndex = 21
      OnAccept = FontEdit1Accept
    end
    object ColorSelect1: TColorSelect
      Category = 'Dialog'
      Caption = 'Select &Color...'
      Dialog.Ctl3D = True
      Hint = #39068#33394
      ImageIndex = 22
    end
    object PrintDlg1: TPrintDlg
      Category = 'Dialog'
      Caption = '&Print...'
      ImageIndex = 20
      ShortCut = 16464
    end
  end
  object MYPDBGEh: TPrintDBGridEh
    Options = [pghFitGridToPageWidth, pghRowAutoStretch]
    Page.BottomMargin = 2
    Page.LeftMargin = 2
    Page.RightMargin = 2
    Page.TopMargin = 2
    PageFooter.CenterText.Strings = (
      '  '#31532' &[Page] '#39029'       ')
    PageFooter.Font.Charset = DEFAULT_CHARSET
    PageFooter.Font.Color = clWindowText
    PageFooter.Font.Height = -13
    PageFooter.Font.Name = 'MS Sans Serif'
    PageFooter.Font.Style = []
    PageFooter.LeftText.Strings = (
      '')
    PageHeader.Font.Charset = DEFAULT_CHARSET
    PageHeader.Font.Color = clWindowText
    PageHeader.Font.Height = -24
    PageHeader.Font.Name = 'MS Sans Serif'
    PageHeader.Font.Style = []
    PrintFontName = #23435#20307
    Units = MM
    Left = 303
    Top = 196
    BeforeGridText_Data = {
      7B5C727466315C616E73695C616E73696370673933365C64656666305C646566
      6C616E67313033335C6465666C616E676665323035327B5C666F6E7474626C7B
      5C66305C666E696C5C6663686172736574313334205C2763625C2763655C2763
      635C2765353B7D7D0D0A5C766965776B696E64345C7563315C706172645C7163
      5C6C616E67323035325C66305C6673343020255B62745D202020202020202020
      2020202020202020202020202020202020202020202020202020202020202020
      202020200D0A5C706172205C667332345C2762345C2766325C2764335C276131
      5C2763385C2764355C2763365C2764615C6C616E6731303333203A5C6C616E67
      32303532202020255B546F6461795D2020200D0A5C706172205C706172645C6C
      616E673130333320205C6C616E67323035322020255B746A5D2020200D0A5C70
      6172207D0D0A00}
    AfterGridText_Data = {
      7B5C727466315C616E73695C616E73696370673933365C64656666305C646566
      6C616E67313033335C6465666C616E676665323035327B5C666F6E7474626C7B
      5C66305C666E696C5C6663686172736574313334204D532053616E7320536572
      69663B7D7D0D0A5C766965776B696E64345C7563315C706172645C6C616E6732
      3035325C66305C6673323420202020205C2762325C2764365C2762395C276463
      5C2761335C276261202020202020202020202020202020202020202020202020
      20202020202020202020202020205C2764365C2763365C2762315C2765645C27
      61335C2762612020202020205C66733136200D0A5C706172207D0D0A00}
  end
  object PopupMenu1: TPopupMenu
    Left = 369
    Top = 194
    object N2: TMenuItem
      Action = FontEdit1
      Caption = #23383#20307#35774#32622
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object N6: TMenuItem
      Action = FilePrintSetup1
      Caption = #25171#21360#35774#32622
    end
    object PrintSetup1: TMenuItem
      Action = PrintDlg1
      Caption = #25171#21360
    end
    object N1: TMenuItem
      Caption = #25171#21360#39044#35272
      OnClick = N1Click
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object N4: TMenuItem
      Caption = #23548#20986#25968#25454
      OnClick = N4Click
    end
  end
end