goods_write.dfm

delphi的一个开发实例

            Left = 364
            Top = 44
            Width = 121
            Height = 20
            Color = clSkyBlue
            Ctl3D = False
            EditLabel.Width = 70
            EditLabel.Height = 14
            EditLabel.Caption = #24215#38754#32534#21495#65306
            LabelPosition = lpLeft
            LabelSpacing = 3
            ParentCtl3D = False
            TabOrder = 7
          end
        end
        object Edit2: TLabeledEdit
          Left = 449
          Top = 19
          Width = 121
          Height = 20
          Color = clSkyBlue
          Ctl3D = False
          EditLabel.Width = 70
          EditLabel.Height = 14
          EditLabel.Caption = #21333#25454#32534#21495#65306
          LabelPosition = lpLeft
          LabelSpacing = 3
          ParentCtl3D = False
          TabOrder = 3
        end
        object Edit3: TLabeledEdit
          Left = 656
          Top = 19
          Width = 121
          Height = 20
          Color = clSkyBlue
          Ctl3D = False
          EditLabel.Width = 70
          EditLabel.Height = 14
          EditLabel.Caption = #21512#21516#32534#21495#65306
          LabelPosition = lpLeft
          LabelSpacing = 3
          ParentCtl3D = False
          TabOrder = 4
        end
      end
      object Panel5: TPanel
        Left = 9
        Top = 225
        Width = 828
        Height = 4
        Color = clBackground
        TabOrder = 1
      end
      object Panel6: TPanel
        Left = 833
        Top = 33
        Width = 4
        Height = 195
        Caption = 'Panel6'
        Color = clBackground
        TabOrder = 2
      end
    end
    object Panel9: TPanel
      Left = 1
      Top = 234
      Width = 850
      Height = 425
      Align = alClient
      Caption = 'Panel9'
      Color = clSkyBlue
      TabOrder = 1
      object Panel10: TPanel
        Left = 1
        Top = 1
        Width = 43
        Height = 423
        Align = alLeft
        Color = clSkyBlue
        TabOrder = 0
        object Cmd_Delete: TSpeedButton
          Left = 2
          Top = 52
          Width = 40
          Height = 25
          Caption = #20943#34892
          Flat = True
          NumGlyphs = 2
          OnClick = Cmd_DeleteClick
        end
        object Cmd_Add: TSpeedButton
          Left = 2
          Top = 27
          Width = 40
          Height = 25
          Caption = #22686#34892
          Flat = True
          NumGlyphs = 2
          OnClick = Cmd_AddClick
        end
      end
      object StringGrid1: TStringGrid
        Left = 44
        Top = 1
        Width = 805
        Height = 423
        Align = alClient
        Color = clWhite
        ColCount = 27
        DefaultRowHeight = 20
        FixedColor = clSkyBlue
        RowCount = 2
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goDrawFocusSelected, goRowSizing, goColSizing, goRowMoving, goColMoving, goEditing, goTabs, goThumbTracking]
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnDblClick = StringGrid1DblClick
        OnDrawCell = StringGrid1DrawCell
        ColWidths = (
          64
          64
          64
          64
          64
          65
          64
          64
          64
          64
          64
          64
          64
          64
          64
          64
          64
          64
          64
          64
          64
          64
          64
          64
          64
          64
          64)
      end
    end
    object P_Check: TPanel
      Left = 1
      Top = 659
      Width = 850
      Height = 28
      Align = alBottom
      Color = clSkyBlue
      TabOrder = 2
      object P1: TPanel
        Left = 1
        Top = 1
        Width = 167
        Height = 26
        Align = alLeft
        Color = clSkyBlue
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        Visible = False
        object Cmd1: TSpeedButton
          Left = 5
          Top = 2
          Width = 23
          Height = 22
          Caption = #23457
          OnClick = Cmd1Click
        end
        object L1: TLabel
          Left = 30
          Top = 6
          Width = 12
          Height = 12
          Caption = 'L1'
          Font.Charset = ANSI_CHARSET
          Font.Color = clFuchsia
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
      end
      object P2: TPanel
        Left = 168
        Top = 1
        Width = 167
        Height = 26
        Align = alLeft
        Color = clSkyBlue
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        Visible = False
        object Cmd2: TSpeedButton
          Left = 5
          Top = 2
          Width = 23
          Height = 22
          Caption = #23457
          OnClick = Cmd2Click
        end
        object L2: TLabel
          Left = 30
          Top = 6
          Width = 12
          Height = 12
          Caption = 'L2'
          Font.Charset = ANSI_CHARSET
          Font.Color = clFuchsia
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
      end
      object P3: TPanel
        Left = 335
        Top = 1
        Width = 167
        Height = 26
        Align = alLeft
        Color = clSkyBlue
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        Visible = False
        object Cmd3: TSpeedButton
          Left = 5
          Top = 2
          Width = 23
          Height = 22
          Caption = #23457
          OnClick = Cmd3Click
        end
        object L3: TLabel
          Left = 30
          Top = 6
          Width = 12
          Height = 12
          Caption = 'L3'
          Font.Charset = ANSI_CHARSET
          Font.Color = clFuchsia
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
      end
      object P4: TPanel
        Left = 502
        Top = 1
        Width = 167
        Height = 26
        Align = alLeft
        Color = clSkyBlue
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        Visible = False
        object L4: TLabel
          Left = 30
          Top = 6
          Width = 12
          Height = 12
          Caption = 'L4'
          Font.Charset = ANSI_CHARSET
          Font.Color = clFuchsia
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Cmd4: TSpeedButton
          Left = 5
          Top = 2
          Width = 23
          Height = 22
          Caption = #23457
          OnClick = Cmd4Click
        end
      end
      object P5: TPanel
        Left = 669
        Top = 1
        Width = 167
        Height = 26
        Align = alLeft
        Color = clSkyBlue
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        Visible = False
        object L5: TLabel
          Left = 30
          Top = 6
          Width = 12
          Height = 12
          Caption = 'L5'
          Font.Charset = ANSI_CHARSET
          Font.Color = clFuchsia
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
        end
        object Cmd5: TSpeedButton
          Left = 5
          Top = 2
          Width = 23
          Height = 22
          Caption = #23457
          OnClick = Cmd5Click
        end
      end
    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 = 256
    Top = 104
  end
end