ypkcgl.dfm

很好的药店进销存系统

object ypkcgl_Form: Typkcgl_Form
  Left = 284
  Top = 189
  Width = 441
  Height = 265
  Caption = #33647#21697#24211#23384#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 305
    Height = 238
    Align = alClient
    TabOrder = 0
    object Panel1: TPanel
      Left = 2
      Top = 15
      Width = 301
      Height = 66
      Align = alTop
      TabOrder = 0
      object ypmc_LEdit: TLabeledEdit
        Left = 16
        Top = 24
        Width = 121
        Height = 21
        EditLabel.Width = 93
        EditLabel.Height = 13
        EditLabel.Caption = #21517#31216#27169#31946#26597#35810'       '
        TabOrder = 0
      end
      object cmdok: TButton
        Left = 168
        Top = 25
        Width = 49
        Height = 25
        Caption = #30830' '#23450
        TabOrder = 1
        OnClick = cmdokClick
      end
    end
    object DBGrid1: TDBGrid
      Left = 2
      Top = 81
      Width = 301
      Height = 155
      Align = alClient
      DataSource = DataSource1
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 1
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnCellClick = DBGrid1CellClick
      Columns = <
        item
          Expanded = False
          FieldName = #32534#21495
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = #21517#31216
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = #24211#23384
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = #19979#38480
          Width = 60
          Visible = True
        end>
    end
  end
  object GroupBox2: TGroupBox
    Left = 305
    Top = 0
    Width = 128
    Height = 238
    Align = alRight
    TabOrder = 1
    object kc_LEdit: TLabeledEdit
      Left = 16
      Top = 40
      Width = 81
      Height = 21
      EditLabel.Width = 30
      EditLabel.Height = 13
      EditLabel.Caption = #24211#23384'  '
      TabOrder = 0
    end
    object xx_LEdit: TLabeledEdit
      Left = 16
      Top = 88
      Width = 81
      Height = 21
      EditLabel.Width = 30
      EditLabel.Height = 13
      EditLabel.Caption = #19979#38480'  '
      TabOrder = 1
    end
    object cmdadd: TButton
      Left = 36
      Top = 129
      Width = 49
      Height = 25
      Caption = #28155#21152
      TabOrder = 2
      OnClick = cmdaddClick
    end
    object cmdmodi: TButton
      Left = 36
      Top = 161
      Width = 49
      Height = 25
      Caption = #20462#25913
      TabOrder = 3
      OnClick = cmdmodiClick
    end
    object cmddel: TButton
      Left = 36
      Top = 193
      Width = 49
      Height = 25
      Caption = #21024#38500
      TabOrder = 4
      OnClick = cmddelClick
    end
  end
  object Query1: TQuery
    Left = 272
    Top = 40
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 232
    Top = 40
  end
end