qing_pi.dfm

采购管理系统：delphi+sql实现了企业采购自动化作业流程

object qing_p: Tqing_p
  Left = 255
  Top = 110
  AutoScroll = False
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #35531#36092#21934#25209#28310
  ClientHeight = 333
  ClientWidth = 285
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 248
    Top = 263
    Width = 32
    Height = 13
    Caption = 'Label1'
  end
  object DBGrid1: TDBGrid
    Left = 24
    Top = 57
    Width = 113
    Height = 263
    Hint = #38617#25802#35531#36092#21934#32232#34399#26597#30475#26126#32048
    Color = clYellow
    DataSource = DataSource1
    ParentShowHint = False
    ReadOnly = True
    ShowHint = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDblClick = DBGrid1DblClick
    Columns = <
      item
        Expanded = False
        FieldName = 'qing_gou_no'
        Title.Caption = #35531#36092#21934#32232#34399
        Visible = True
      end>
  end
  object Button1: TButton
    Left = 168
    Top = 65
    Width = 97
    Height = 25
    Caption = #25209#28310#35531#36092#21934
    TabOrder = 1
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 168
    Top = 101
    Width = 97
    Height = 25
    Caption = #21462#28040#25209#28310#35531#36092#21934
    TabOrder = 2
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 168
    Top = 194
    Width = 97
    Height = 25
    Caption = #36820#22238
    TabOrder = 3
    OnClick = Button3Click
  end
  object Button4: TButton
    Left = 168
    Top = 134
    Width = 97
    Height = 25
    Caption = #26597#25214#35531#36092#21934#32232#34399
    TabOrder = 4
    OnClick = Button4Click
  end
  object Button5: TButton
    Left = 168
    Top = 164
    Width = 97
    Height = 25
    Caption = #21047#26032
    TabOrder = 5
    OnClick = Button5Click
  end
  object GroupBox1: TGroupBox
    Left = 24
    Top = 1
    Width = 241
    Height = 50
    TabOrder = 6
    object RadioButton1: TRadioButton
      Left = 32
      Top = 16
      Width = 65
      Height = 17
      Caption = #26410#23529#26680
      TabOrder = 0
      OnClick = RadioButton1Click
    end
    object RadioButton2: TRadioButton
      Left = 136
      Top = 16
      Width = 63
      Height = 17
      Caption = #24050#23529#26680
      TabOrder = 1
      OnClick = RadioButton2Click
    end
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 56
    Top = 119
  end
  object Table1: TTable
    DatabaseName = 'vvv'
    TableName = 'dbo.qing_gou_wei_zhu'
    Left = 88
    Top = 183
  end
  object Table2: TTable
    DatabaseName = 'vvv'
    TableName = 'dbo.qing_gou_wei_zhu'
    Left = 152
    Top = 239
  end
  object Query1: TQuery
    DatabaseName = 'vvv'
    SQL.Strings = (
      'select * from qing_gou_wei_zhu')
    Left = 200
    Top = 247
  end
  object Query2: TQuery
    DatabaseName = 'vvv'
    Left = 80
    Top = 239
  end
end