gyswh.~dfm

仓库管理信息系统

object gyswhfrm: Tgyswhfrm
  Left = 206
  Top = 117
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #20379#24212#21830#32500#25252
  ClientHeight = 361
  ClientWidth = 565
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 565
    Height = 27
    Align = alTop
    TabOrder = 0
    object DBNavigator1: TDBNavigator
      Left = 0
      Top = 1
      Width = 280
      Height = 25
      DataSource = dm.whgysdmds
      Flat = True
      Hints.Strings = (
        #31532#19968#26465
        #21069#19968#26465
        #19979#19968#26465
        #26368#21518#19968#26465
        #22686#21152
        #21024#38500
        #20462#25913
        #20445#23384
        #21462#28040
        #21047#26032)
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
    end
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 27
    Width = 565
    Height = 334
    ActivePage = TabSheet1
    Align = alClient
    Style = tsFlatButtons
    TabIndex = 0
    TabOrder = 1
    object TabSheet1: TTabSheet
      Caption = #35760#24405#32534#36753
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      object Label11: TLabel
        Left = 3
        Top = 9
        Width = 546
        Height = 13
        Caption = 
          '----------------------------------------------------------------' +
          '--------------'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object Label7: TLabel
        Left = 6
        Top = 274
        Width = 546
        Height = 13
        Caption = 
          '----------------------------------------------------------------' +
          '--------------'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object Label1: TLabel
        Left = 37
        Top = 44
        Width = 53
        Height = 13
        Caption = #20379#24212#21830'ID'
        FocusControl = DBEdit1
      end
      object Label2: TLabel
        Left = 226
        Top = 44
        Width = 65
        Height = 13
        Caption = #20379#24212#21830#31616#31216
        FocusControl = DBEdit2
      end
      object Label3: TLabel
        Left = 24
        Top = 76
        Width = 65
        Height = 13
        Caption = #20379#24212#21830#21517#31216
        FocusControl = DBEdit3
      end
      object Label4: TLabel
        Left = 50
        Top = 116
        Width = 39
        Height = 13
        Caption = #32852#31995#20154
        FocusControl = DBEdit4
      end
      object Label5: TLabel
        Left = 227
        Top = 117
        Width = 65
        Height = 13
        Caption = #32852#31995#20154#22836#34900
        FocusControl = DBEdit5
      end
      object Label6: TLabel
        Left = 62
        Top = 155
        Width = 26
        Height = 13
        Caption = #22320#22336
        FocusControl = DBEdit6
      end
      object Label8: TLabel
        Left = 382
        Top = 156
        Width = 52
        Height = 13
        Caption = #37038#25919#32534#30721
        FocusControl = DBEdit7
      end
      object Label9: TLabel
        Left = 64
        Top = 192
        Width = 26
        Height = 13
        Caption = #22478#24066
        FocusControl = DBEdit8
      end
      object Label10: TLabel
        Left = 266
        Top = 187
        Width = 26
        Height = 13
        Caption = #22320#21306
        FocusControl = DBEdit9
      end
      object Label12: TLabel
        Left = 62
        Top = 231
        Width = 26
        Height = 13
        Caption = #30005#35805
        FocusControl = DBEdit10
      end
      object Label13: TLabel
        Left = 264
        Top = 230
        Width = 26
        Height = 13
        Caption = #20256#30495
        FocusControl = DBEdit11
      end
      object DBEdit1: TDBEdit
        Left = 95
        Top = 44
        Width = 78
        Height = 21
        DataField = #20379#24212#21830'ID'
        DataSource = dm.whgysdmds
        TabOrder = 0
      end
      object DBEdit2: TDBEdit
        Left = 298
        Top = 44
        Width = 135
        Height = 21
        DataField = #20379#24212#21830#31616#31216
        DataSource = dm.whgysdmds
        TabOrder = 1
      end
      object DBEdit3: TDBEdit
        Left = 95
        Top = 76
        Width = 264
        Height = 21
        DataField = #20379#24212#21830#21517#31216
        DataSource = dm.whgysdmds
        TabOrder = 2
      end
      object DBEdit4: TDBEdit
        Left = 95
        Top = 116
        Width = 80
        Height = 21
        DataField = #32852#31995#20154
        DataSource = dm.whgysdmds
        TabOrder = 3
      end
      object DBEdit5: TDBEdit
        Left = 298
        Top = 116
        Width = 96
        Height = 21
        DataField = #32852#31995#20154#22836#34900
        DataSource = dm.whgysdmds
        TabOrder = 4
      end
      object DBEdit6: TDBEdit
        Left = 95
        Top = 156
        Width = 263
        Height = 21
        DataField = #22320#22336
        DataSource = dm.whgysdmds
        TabOrder = 5
      end
      object DBEdit7: TDBEdit
        Left = 442
        Top = 156
        Width = 58
        Height = 21
        DataField = #37038#25919#32534#30721
        DataSource = dm.whgysdmds
        TabOrder = 6
      end
      object DBEdit8: TDBEdit
        Left = 95
        Top = 190
        Width = 81
        Height = 21
        DataField = #22478#24066
        DataSource = dm.whgysdmds
        TabOrder = 7
      end
      object DBEdit9: TDBEdit
        Left = 298
        Top = 187
        Width = 94
        Height = 21
        DataField = #22320#21306
        DataSource = dm.whgysdmds
        TabOrder = 8
      end
      object DBEdit10: TDBEdit
        Left = 95
        Top = 231
        Width = 120
        Height = 21
        DataField = #30005#35805
        DataSource = dm.whgysdmds
        TabOrder = 9
      end
      object DBEdit11: TDBEdit
        Left = 297
        Top = 230
        Width = 120
        Height = 21
        DataField = #20256#30495
        DataSource = dm.whgysdmds
        TabOrder = 10
      end
    end
    object TabSheet2: TTabSheet
      Caption = #35760#24405#27983#35272
      ImageIndex = 1
      object DBGridEh1: TDBGridEh
        Left = 0
        Top = 0
        Width = 557
        Height = 300
        Align = alClient
        DataSource = dm.whgysdmds
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -13
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        PopupMenu = PopupMenu1
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -13
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnDblClick = DBGridEh1DblClick
        Columns = <
          item
            EditButtons = <>
            FieldName = #20379#24212#21830'ID'
            Footers = <>
            Width = 53
          end
          item
            EditButtons = <>
            FieldName = #20379#24212#21830#31616#31216
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #20379#24212#21830#21517#31216
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #32852#31995#20154
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #30005#35805
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #22320#22336
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #22320#21306
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #32852#31995#20154#22836#34900
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #37038#25919#32534#30721
            Footers = <>
            Width = 55
          end
          item
            EditButtons = <>
            FieldName = #20256#30495
            Footers = <>
          end
          item
            EditButtons = <>
            FieldName = #22478#24066
            Footers = <>
          end>
      end
    end
  end
  object ActionManager1: TActionManager
    ActionBars = <
      item
      end>
    Left = 192
    Top = 197
    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
    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 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 = 235
    Top = 198
  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 = 281
    Top = 197
    BeforeGridText_Data = {
      7B5C727466315C616E73695C616E73696370673933365C64656666305C646566
      6C616E67313033335C6465666C616E676665323035327B5C666F6E7474626C7B
      5C66305C666E696C5C6663686172736574313334205C2763625C2763655C2763
      635C2765353B7D7D0D0A5C766965776B696E64345C7563315C706172645C7163
      5C6C616E67323035325C66305C6673343020255B62745D202020202020202020
      2020202020202020202020202020202020202020202020202020202020202020
      202020200D0A5C706172205C667332345C2762345C2766325C2764335C276131
      5C2763385C2764355C2763365C2764615C6C616E6731303333203A5C6C616E67
      32303532202020255B546F6461795D2020200D0A5C706172207D0D0A00}
    AfterGridText_Data = {
      7B5C727466315C616E73695C616E73696370673933365C64656666305C646566
      6C616E67313033335C6465666C616E676665323035327B5C666F6E7474626C7B
      5C66305C666E696C5C6663686172736574313334204D532053616E7320536572
      69663B7D7D0D0A5C766965776B696E64345C7563315C706172645C71635C6C61
      6E67323035325C66305C667332345C2764365C2763365C2762315C2765645C27
      63385C2763625C2761335C276261202020202020202020202020202020202020
      2020202020202020202020202020202020202020202020202020202020202020
      5C2763395C2766335C2762615C2763625C66733136200D0A5C706172207D0D0A
      00}
  end
  object PopupMenu1: TPopupMenu
    Left = 322
    Top = 196
    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
    object N7: TMenuItem
      Caption = '-'
    end
    object N8: TMenuItem
      Caption = #38544#34255#21015
      OnClick = N8Click
    end
    object N9: TMenuItem
      Caption = #21462#28040#38544#34255
      OnClick = N9Click
    end
  end
end