pfm_fendianxx.dfm

POS收银系统

inherited fm_fendianxx: Tfm_fendianxx
  Left = 206
  Top = 361
  Caption = '分店信息管理'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited PageControl1: TPageControl
    Font.Charset = ANSI_CHARSET
    ParentFont = False
    inherited TabSheet1: TTabSheet
      object Label2: TLabel [0]
        Left = 32
        Top = 24
        Width = 52
        Height = 13
        Caption = '分店代码'
        FocusControl = DBEdit2
      end
      object Label3: TLabel [1]
        Left = 32
        Top = 108
        Width = 52
        Height = 13
        Caption = '分店地址'
        FocusControl = DBEdit3
      end
      object Label4: TLabel [2]
        Left = 32
        Top = 148
        Width = 52
        Height = 13
        Caption = '分店经理'
        FocusControl = DBEdit4
      end
      object Label5: TLabel [3]
        Left = 32
        Top = 188
        Width = 52
        Height = 13
        Caption = '联系电话'
        FocusControl = DBEdit5
      end
      object Label6: TLabel [4]
        Left = 32
        Top = 228
        Width = 26
        Height = 13
        Caption = '备注'
      end
      object Label7: TLabel [5]
        Left = 216
        Top = 20
        Width = 52
        Height = 13
        Caption = '分店标识'
        FocusControl = DBEdit6
      end
      object Label1: TLabel [6]
        Left = 32
        Top = 64
        Width = 52
        Height = 13
        Caption = '分店名称'
      end
      object DBEdit2: TDBEdit
        Left = 32
        Top = 40
        Width = 137
        Height = 21
        DataField = 'fdmc'
        DataSource = DataSource1
        TabOrder = 9
      end
      object DBEdit3: TDBEdit
        Left = 32
        Top = 124
        Width = 305
        Height = 21
        DataField = 'addr'
        DataSource = DataSource1
        TabOrder = 10
      end
      object DBEdit4: TDBEdit
        Left = 32
        Top = 164
        Width = 141
        Height = 21
        DataField = 'manager'
        DataSource = DataSource1
        TabOrder = 11
      end
      object DBEdit5: TDBEdit
        Left = 32
        Top = 204
        Width = 141
        Height = 21
        DataField = 'tel'
        DataSource = DataSource1
        TabOrder = 12
      end
      object DBMemo1: TDBMemo
        Left = 32
        Top = 244
        Width = 305
        Height = 89
        DataField = 'remark'
        DataSource = DataSource1
        TabOrder = 13
      end
      object DBEdit6: TDBEdit
        Left = 216
        Top = 40
        Width = 97
        Height = 21
        DataField = 'fdset'
        DataSource = DataSource1
        TabOrder = 14
      end
      object Memo1: TMemo
        Left = 384
        Top = 44
        Width = 241
        Height = 237
        TabStop = False
        BorderStyle = bsNone
        Color = clBtnFace
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlue
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        Lines.Strings = (
          '   注意：'
          ''
          ' 1.分店标识是用于分店数据通讯的，'
          '   最好第一次加入时确定后就不要'
          '   再修改。大小为四个字节（用英'
          '   文字母）表示。'
          ''
          ' 2.分店代码4~6个字符，并且也不'
          '   要随意改动。'
          ''
          ' 3.仓库代码与分店代码不能重复！')
        ParentFont = False
        ReadOnly = True
        TabOrder = 15
      end
      object DBEdit1: TDBEdit
        Left = 32
        Top = 80
        Width = 137
        Height = 21
        DataField = 'fdname'
        DataSource = DataSource1
        TabOrder = 16
      end
    end
    inherited TabSheet2: TTabSheet
      inherited DBGrid1: TDBGrid
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      end
    end
  end
  inherited DataSource1: TDataSource
    Left = 180
    Top = 48
  end
  inherited Query1: TQuery
    Active = True
    BeforePost = Query1BeforePost
    SQL.Strings = (
      'select * from t_fendianxx')
    Left = 140
    Top = 56
    object Query1fdbm: TIntegerField
      FieldName = 'fdbm'
      Origin = 'POSDB."dbo.t_fendianxx".fdbm'
    end
    object Query1fdset: TStringField
      FieldName = 'fdset'
      Origin = 'POSDB."dbo.t_fendianxx".fdset'
      FixedChar = True
      Size = 4
    end
    object Query1fdmc: TStringField
      FieldName = 'fdmc'
      Origin = 'POSDB."dbo.t_fendianxx".fdmc'
      FixedChar = True
    end
    object Query1fdname: TStringField
      FieldName = 'fdname'
      Origin = 'POSDB."dbo.t_fendianxx".fdname'
      FixedChar = True
    end
    object Query1addr: TStringField
      FieldName = 'addr'
      Origin = 'POSDB."dbo.t_fendianxx".addr'
      FixedChar = True
      Size = 50
    end
    object Query1manager: TStringField
      FieldName = 'manager'
      Origin = 'POSDB."dbo.t_fendianxx".manager'
      FixedChar = True
    end
    object Query1tel: TStringField
      FieldName = 'tel'
      Origin = 'POSDB."dbo.t_fendianxx".tel'
      FixedChar = True
    end
    object Query1remark: TStringField
      FieldName = 'remark'
      Origin = 'POSDB."dbo.t_fendianxx".remark'
      FixedChar = True
      Size = 200
    end
  end
end