unit5.dfm

一个简单的医疗查询系统

object Form5: TForm5
  Left = 244
  Top = 179
  Width = 563
  Height = 334
  BorderIcons = [biSystemMenu]
  Caption = #33647#21697#20449#24687
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 553
    Height = 156
    BevelInner = bvLowered
    TabOrder = 0
    object Label1: TLabel
      Left = 16
      Top = 16
      Width = 24
      Height = 12
      Caption = #21517#31216
    end
    object Label2: TLabel
      Left = 200
      Top = 16
      Width = 36
      Height = 12
      Caption = #25340#38899#30721
    end
    object Edit1: TEdit
      Left = 48
      Top = 12
      Width = 121
      Height = 20
      ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
      TabOrder = 0
    end
    object Edit2: TEdit
      Left = 248
      Top = 12
      Width = 121
      Height = 20
      ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
      TabOrder = 1
    end
    object Button1: TButton
      Left = 424
      Top = 7
      Width = 75
      Height = 25
      Caption = #25628#32034
      TabOrder = 2
    end
    object DBGrid1: TDBGrid
      Left = 2
      Top = 35
      Width = 550
      Height = 119
      ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
      TabOrder = 3
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
    end
  end
  object MainMenu1: TMainMenu
    Left = 488
    Top = 96
    object N1: TMenuItem
      Caption = #36755#20986
      object N3: TMenuItem
        Caption = #25171#21360#33647#21697#20449#24687#21015#34920
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object N5: TMenuItem
        Caption = #23548#20986#33647#21697#20449#24687#21015#34920
      end
    end
    object N2: TMenuItem
      Caption = #20851#38381
      OnClick = N2Click
    end
  end
end