cac.dfm

速达开源ERP系统

inherited frmCac: TfrmCac
  Left = 79
  Top = 84
  Width = 592
  Height = 425
  Caption = '帐户管理'
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  inherited sbBar: TStatusBar
    Top = 357
    Width = 584
  end
  inherited CoolBar1: TCoolBar
    Width = 584
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 584
      end>
    inherited tbMainBar: TToolBar
      Width = 571
    end
  end
  object sgCac: TSDGrid [2]
    Left = 0
    Top = 39
    Width = 304
    Height = 318
    Align = alLeft
    Color = 50331647
    ColCount = 3
    Ctl3D = False
    DefaultRowHeight = 22
    FixedColor = 8564917
    RowCount = 4
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing]
    ParentCtl3D = False
    TabOrder = 1
    OnClick = sgCacClick
    EvenGridColor = 50331647
    OddGridColor = 50331647
    Columns = <
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '帐号'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '开户行名称'
        ColumnWidth = 0
      end>
    ColWidths = (
      3
      106
      180)
  end
  object tpcCac: TPageControl [3]
    Left = 304
    Top = 39
    Width = 280
    Height = 318
    ActivePage = TabSheet1
    Align = alClient
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    MultiLine = True
    ParentFont = False
    Style = tsFlatButtons
    TabOrder = 3
    TabStop = False
    object TabSheet1: TTabSheet
      Caption = '基本资料    '
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      object FloatPanel1: TFloatPanel
        Left = 0
        Top = 0
        Width = 272
        Height = 288
        Align = alClient
        Color = 50331647
        Caption = 'FloatPanel4'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentColor = False
        TabOrder = 0
        object Label1: TLabel
          Left = 18
          Top = 18
          Width = 60
          Height = 12
          Caption = '银行帐号：'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label2: TLabel
          Left = 18
          Top = 51
          Width = 72
          Height = 12
          Caption = '开户行名称：'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label3: TLabel
          Left = 18
          Top = 115
          Width = 42
          Height = 12
          Caption = '币 种：'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label4: TLabel
          Left = 18
          Top = 148
          Width = 42
          Height = 12
          Caption = '余 额：'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label5: TLabel
          Left = 18
          Top = 180
          Width = 42
          Height = 12
          Caption = '备 注：'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label8: TLabel
          Left = 18
          Top = 83
          Width = 60
          Height = 12
          Caption = '帐户类型：'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object scCacType: TSDComboBox
          Left = 87
          Top = 77
          Width = 130
          Height = 20
          Style = csDropDownList
          Color = 50331647
          Ctl3D = False
          ItemHeight = 12
          ParentCtl3D = False
          TabOrder = 2
          KeyItem = cbItem2
        end
        object seCacCode: TSDEdit
          Left = 87
          Top = 12
          Width = 123
          Height = 18
          Ctl3D = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 0
          Text = 'seCacCode'
          OnKeyDown = seCacCodeKeyDown
          SplitSymbol = ' | '
        end
        object seCacBalance: TSDEdit
          Left = 87
          Top = 142
          Width = 130
          Height = 18
          Ctl3D = False
          Enabled = False
          MaxLength = 13
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 4
          Text = '0'
          DigLen = 2
          DataType = dtNumber
          CharType = ctMathematic
          SplitSymbol = ' | '
          DefaultValue = '0'
        end
        object seCacBankName: TSDEdit
          Left = 87
          Top = 44
          Width = 124
          Height = 18
          Ctl3D = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 1
          Text = 'seCacBankName'
          SplitSymbol = ' | '
        end
        object scCacCurrency: TSDComboBox
          Left = 87
          Top = 109
          Width = 131
          Height = 20
          Style = csDropDownList
          Color = 50331647
          Ctl3D = False
          ItemHeight = 12
          ParentCtl3D = False
          TabOrder = 3
          Items.Strings = (
            '1-帐户类型1'
            '2-帐户类型2'
            '')
          KeyItem = cbItem2
        end
        object memCacDesc: TMemo
          Left = 20
          Top = 198
          Width = 203
          Height = 68
          Color = 50331647
          Ctl3D = False
          Lines.Strings = (
            'memCacDesc')
          ParentCtl3D = False
          TabOrder = 5
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = '其他    '
      ImageIndex = 1
      object FloatPanel4: TFloatPanel
        Left = 0
        Top = 0
        Width = 272
        Height = 288
        Align = alClient
        Color = 50331647
        Caption = 'FloatPanel4'
        ParentColor = False
        TabOrder = 0
        object labCacCancelDate: TLabel
          Left = 18
          Top = 129
          Width = 60
          Height = 12
          Caption = '取消日期：'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label30: TLabel
          Left = 18
          Top = 162
          Width = 60
          Height = 12
          Caption = '操 作 员：'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label31: TLabel
          Left = 18
          Top = 198
          Width = 60
          Height = 12
          Caption = '系统日期：'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label7: TLabel
          Left = 18
          Top = 18
          Width = 60
          Height = 12
          Caption = '科目代码：'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label28: TLabel
          Left = 18
          Top = 55
          Width = 60
          Height = 12
          Caption = '科目方向：'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object deCacSysDate: TLabel
          Left = 80
          Top = 197
          Width = 72
          Height = 12
          Caption = 'deCacSysDate'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object scCacUser: TSDComboBox
          Left = 80
          Top = 157
          Width = 122
          Height = 20
          Color = 50331647
          Ctl3D = False
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ItemHeight = 0
          ParentCtl3D = False
          ParentFont = False
          TabOrder = 4
          Text = 'scCacUser'
          KeyItem = cbItem2
        end
        object deCacCancelDate: TDateEdit
          Left = 80
          Top = 125
          Width = 123
          Height = 18
          LineOffset = 2
          LineColor = clGreen
          LineVisible = False
          CDate = '2001-04-24'
          InitDate = '2001-04-24'
          ModalResult = 0
          Enabled = False
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          TabOrder = 3
          Color = 50331647
          Ctl3D = False
          ParentFont = False
          ParentCtl3D = False
        end
        object seCacGlKm: TSDEdit
          Left = 80
          Top = 14
          Width = 122
          Height = 18
          Ctl3D = False
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentColor = True
          ParentCtl3D = False
          ParentFont = False
          TabOrder = 0
          Text = 'seCacGlKm'
          CharType = ctMathematic
          OnButtonClick = seCacGlKmButtonClick
          ButtonVisible = True
          SplitSymbol = ' | '
        end
        object chkCacCancel: TCheckBox
          Left = 18
          Top = 90
          Width = 46
          Height = 16
          Caption = '取消'
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
          OnClick = chkCacCancelClick
        end
        object GroupBox1: TGroupBox
          Left = 80
          Top = 46
          Width = 123
          Height = 27
          TabOrder = 1
          object srCacKmDir0: TRadioButton
            Left = 11
            Top = 9
            Width = 45
            Height = 16
            Caption = '借方'
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
            TabOrder = 0
          end
          object srCacKmDir1: TRadioButton
            Left = 66
            Top = 9
            Width = 45
            Height = 16
            Caption = '贷方'
            Font.Charset = GB2312_CHARSET
            Font.Color = clWindowText
            Font.Height = -12
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
            TabOrder = 1
          end
        end
      end
    end
  end
end