servicestorequery.dfm

来自「物流管理系统是一个典型的数据库应用程序」· DFM 代码 · 共 106 行

inherited f_servicestorequery: Tf_servicestorequery
  Left = 11
  Top = 87
  Caption = #29289#36164#32500#20462#26597#35810
  PixelsPerInch = 96
  TextHeight = 13
  inherited Label1: TLabel
    Left = 337
    Caption = #29289#36164#32500#20462#26597#35810
  end
  inherited Panel2: TPanel
    inherited storagefield: TComboBox
      Items.Strings = (
        #29289#36164#21517#31216
        #36127#36131#20154
        #25805#20316#21592
        #31080#21495)
    end
  end
  inherited Panel1: TPanel
    inherited Grid: TDBGrid
      Columns = <
        item
          Expanded = False
          FieldName = 'serviceid'
          Title.Caption = #32500#20462#31080#21495
          Width = 75
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'storename'
          Title.Caption = #22791#21697#21517#31216
          Width = 75
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'principal'
          Title.Caption = #36127#36131#20154
          Width = 63
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'operator'
          Title.Caption = #25805#20316#21592
          Width = 59
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'num'
          Title.Caption = #25968#37327
          Width = 45
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'paymoney'
          Title.Caption = #24212#20184#37329#39069
          Width = 61
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'factmoney'
          Title.Caption = #23454#20184#37329#39069
          Width = 61
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'memo'
          Title.Caption = #22791#27880
          Width = 82
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'timedate'
          Title.Caption = #26085#26399
          Width = 96
          Visible = True
        end>
    end
    inherited DBGrid1: TDBGrid
      Columns = <
        item
          Expanded = False
          FieldName = 'storename'
          Title.Caption = #22791#21697#21517#31216
          Width = 108
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'factmoney'
          Title.Caption = #23454#20184#37329#39069
          Width = 112
          Visible = True
        end>
    end
  end
end