ustock.dfm

成本系统三层结构源码 开发工具：Delphi 7.0+SQLServer 2005 主要技术：Midas、COM+ 所用第三方控件： FastReport V2.47 D7 Inforp

inherited fmStock: TfmStock
  Left = 209
  Top = 112
  Caption = #20179#24211#20449#24687
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 12
  inherited PageControl: TPageControl
    inherited Tabbrowse: TTabSheet
      inherited Panel1: TPanel
        inherited DBGrid1: TdxDBGrid
          Height = 162
          Filter.Criteria = {00000000}
          object DBGrid1StockID: TdxDBGridMaskColumn
            BandIndex = 0
            RowIndex = 0
            FieldName = 'StockID'
          end
          object DBGrid1StockName: TdxDBGridMaskColumn
            BandIndex = 0
            RowIndex = 0
            FieldName = 'StockName'
          end
          object DBGrid1Address: TdxDBGridMaskColumn
            BandIndex = 0
            RowIndex = 0
            FieldName = 'Address'
          end
          object DBGrid1Principal: TdxDBGridMaskColumn
            BandIndex = 0
            RowIndex = 0
            FieldName = 'Principal'
          end
          object DBGrid1Telephone: TdxDBGridMaskColumn
            BandIndex = 0
            RowIndex = 0
            FieldName = 'Telephone'
          end
          object DBGrid1Remark: TdxDBGridMaskColumn
            BandIndex = 0
            RowIndex = 0
            FieldName = 'Remark'
          end
          object DBGrid1Creater: TdxDBGridMaskColumn
            BandIndex = 0
            RowIndex = 0
            FieldName = 'Creater'
          end
          object DBGrid1CreateDate: TdxDBGridDateColumn
            BandIndex = 0
            RowIndex = 0
            FieldName = 'CreateDate'
          end
          object DBGrid1Updater: TdxDBGridMaskColumn
            BandIndex = 0
            RowIndex = 0
            FieldName = 'Updater'
          end
          object DBGrid1UpdateDate: TdxDBGridDateColumn
            BandIndex = 0
            RowIndex = 0
            FieldName = 'UpdateDate'
          end
        end
        inherited Panel3: TPanel
          Top = 163
          Height = 100
          Visible = True
          object Label1: TLabel
            Left = 8
            Top = 8
            Width = 24
            Height = 12
            Caption = #32534#21495
            FocusControl = DBEdit1
          end
          object Label2: TLabel
            Left = 88
            Top = 8
            Width = 36
            Height = 12
            Caption = #20179#24211#21517
            FocusControl = DBEdit2
          end
          object Label3: TLabel
            Left = 240
            Top = 8
            Width = 36
            Height = 12
            Caption = #36131#20219#20154
            FocusControl = DBEdit3
          end
          object Label4: TLabel
            Left = 392
            Top = 8
            Width = 48
            Height = 12
            Caption = #32852#31995#30005#35805
            FocusControl = DBEdit4
          end
          object Label5: TLabel
            Left = 8
            Top = 56
            Width = 24
            Height = 12
            Caption = #22791#27880
            FocusControl = DBEdit5
          end
          object DBEdit1: TDBEdit
            Left = 8
            Top = 21
            Width = 52
            Height = 20
            DataField = 'StockID'
            DataSource = DSMain
            TabOrder = 0
          end
          object DBEdit2: TDBEdit
            Left = 88
            Top = 21
            Width = 124
            Height = 20
            DataField = 'StockName'
            DataSource = DSMain
            TabOrder = 1
          end
          object DBEdit3: TDBEdit
            Left = 240
            Top = 21
            Width = 124
            Height = 20
            DataField = 'Principal'
            DataSource = DSMain
            TabOrder = 2
          end
          object DBEdit4: TDBEdit
            Left = 392
            Top = 21
            Width = 124
            Height = 20
            DataField = 'Telephone'
            DataSource = DSMain
            TabOrder = 3
          end
          object DBEdit5: TDBEdit
            Left = 8
            Top = 72
            Width = 510
            Height = 20
            DataField = 'Remark'
            DataSource = DSMain
            TabOrder = 4
          end
        end
      end
    end
  end
  inherited DSMain: TDataSource
    DataSet = DMBase.CStock
  end
end