ypjhunit.dfm

能进行药品的选择和添加

object Form4: TForm4
  Left = 463
  Top = 341
  Width = 650
  Height = 444
  Caption = #33647#21697#36827#36135#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 200
    Top = 24
    Width = 232
    Height = 30
    Caption = #33647#21697#36827#36135#35760#24405#26597#35810
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -29
    Font.Name = #21326#25991#24425#20113
    Font.Style = []
    ParentFont = False
  end
  object Image1: TImage
    Left = 520
    Top = 16
    Width = 41
    Height = 57
    Picture.Data = {
      055449636F6E0000010002002020100000000000E80200002600000010101000
      00000000280100000E0300002800000020000000400000000100040000000000
      8002000000000000000000000000000000000000000000000000800000800000
      0080800080000000800080008080000080808000C0C0C0000000FF0000FF0000
      00FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000000000000000000
      0000000000000000033333333000000000000000000000033BBBBBBBBBB33300
      000000000000003FFBB3333300003333000000000000003BF33BBBBBBB330033
      00000000000000033FFB33300003330000000000000000000333FBBB33300000
      0000000000000000000030333000000000000000000000000000000300000000
      000000000000000000033300000000000000000000000000033BB33333300000
      00000000000000033BB3000000033000000000000000003BBB00556665500330
      00000000000003FB307776555666603300000000000000330778768865665503
      3000000000000000782D7EEEE6556650300000000000000672D2277ED8E65757
      03000000000000062D222EEDEE22657703000000000000DEEDEEEEDEDE222577
      50300000000000DEDE7EEDEEED228656503000000000006DEE7EDEEEE2D2D265
      603000000000006DAEEDFEFEE22D22856030000000000067AEDF7FEFE2D27285
      60300000000000DADE8EF7FEFD227E66503300000000006AADEFEF7F7EEAA776
      50B3000000000006A7EEFEF7FEAAAD8603B3000000000006DEDEE77F77AADA76
      0B300000000000006EE7DEEEEEDDA870BB3000000000000006DEEDEEEDEA7703
      B3000000000000000066EEDDDEE6603FB30000000000000000006D666DD0003F
      3000000000000000000000000000000300000000FF8003FFFE0000FFFC00007F
      FC00007FFC00007FFE0000FFFF8003FFFFF01FFFFFFC7FFFFFE01FFFFF8007FF
      FE0001FFFC0000FFF800007FFC00003FFE00003FFE00001FFE00001FFC00000F
      FC00000FFC00000FFC00000FFC00000FFC00000FFC00000FFE00000FFE00001F
      FF00001FFF80003FFFC0003FFFF01C7FFFFFFEFF280000001000000020000000
      0100040000000000C00000000000000000000000000000000000000000000000
      00008000008000000080800080000000800080008080000080808000C0C0C000
      0000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000000
      000000000003FB3333330000000033BB33000000000000333000000000000003
      00000000000003333000000000003B30033000000003B06660330000000302EE
      8D033000000DEEDED270300000067EEDE56030000006DEDFD67083000006ADFF
      E5D0B30000006EDEED60B300000006EDD60B30000000008668330000F00F0000
      E0070000F00F0000FC3F0000FE7F0000F81F0000F00F0000E0070000E0030000
      E0030000E0030000E0030000E0030000F0030000F8070000FC0F0000}
  end
  object GroupBox1: TGroupBox
    Left = 16
    Top = 78
    Width = 609
    Height = 155
    Caption = #36827#36135#35760#24405
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Label2: TLabel
      Left = 32
      Top = 40
      Width = 48
      Height = 12
      Caption = #36827#36135#26102#26399
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 214
      Top = 39
      Width = 48
      Height = 12
      Caption = #33647#21697#21517#31216
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 397
      Top = 40
      Width = 48
      Height = 12
      Caption = #33647#21697#20195#30721
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 32
      Top = 80
      Width = 48
      Height = 12
      Caption = #36827#36135#25968#37327
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 214
      Top = 79
      Width = 48
      Height = 12
      Caption = #36827#36135#21333#20215
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 397
      Top = 80
      Width = 48
      Height = 12
      Caption = #36827#36135#37329#39069
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object SpeedButton1: TSpeedButton
      Left = 120
      Top = 112
      Width = 81
      Height = 22
      Caption = #19979#19968#31508#36827#36135
      Flat = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      OnClick = SpeedButton1Click
    end
    object SpeedButton2: TSpeedButton
      Left = 216
      Top = 112
      Width = 89
      Height = 22
      Caption = #30830#35748#35760#24405
      Flat = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      OnClick = SpeedButton2Click
    end
    object DBEdit1: TDBEdit
      Left = 86
      Top = 33
      Width = 121
      Height = 20
      DataField = #36827#36135#26102#26399
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 266
      Top = 34
      Width = 121
      Height = 20
      DataField = #33647#21697#21517#31216
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
    end
    object DBEdit3: TDBEdit
      Left = 448
      Top = 34
      Width = 121
      Height = 20
      DataField = #33647#21697#20195#30721
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 2
    end
    object DBEdit4: TDBEdit
      Left = 87
      Top = 74
      Width = 121
      Height = 20
      DataField = #36827#36135#25968#37327
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 3
    end
    object DBEdit5: TDBEdit
      Left = 267
      Top = 75
      Width = 121
      Height = 20
      DataField = #36827#36135#21333#20215
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 4
    end
    object DBEdit6: TDBEdit
      Left = 448
      Top = 74
      Width = 121
      Height = 20
      DataField = #36827#36135#37329#39069
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 5
    end
  end
  object GroupBox2: TGroupBox
    Left = 16
    Top = 240
    Width = 609
    Height = 129
    Caption = #36827#36135#27983#35272
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 8
      Top = 16
      Width = 593
      Height = 103
      DataSource = DataSource1
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
    end
  end
  object DBNavigator1: TDBNavigator
    Left = 280
    Top = 376
    Width = 240
    Height = 25
    DataSource = DataSource1
    Flat = True
    TabOrder = 2
  end
  object Table1: TTable
    Active = True
    TableName = #36827#36135#24773#20917'.db'
    Left = 464
    object Table1BDEDesigner: TStringField
      FieldName = #36827#36135#26102#26399
    end
    object Table1BDEDesigner2: TStringField
      FieldName = #33647#21697#21517#31216
    end
    object Table1BDEDesigner3: TStringField
      FieldName = #33647#21697#20195#30721
    end
    object Table1BDEDesigner4: TFloatField
      FieldName = #36827#36135#25968#37327
    end
    object Table1BDEDesigner5: TCurrencyField
      FieldName = #36827#36135#21333#20215
    end
    object Table1BDEDesigner6: TCurrencyField
      FieldName = #36827#36135#37329#39069
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 456
    Top = 56
  end
end