u_sick.dfm

是一小型门诊挂号软件

object F_sick: TF_sick
  Left = 20
  Top = 87
  Width = 772
  Height = 467
  Caption = #30149#20154#31649#29702
  Color = clSkyBlue
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 764
    Height = 440
    ActivePage = TabSheet2
    Align = alClient
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #19968#35272#30149#20154#20449#24687
      OnShow = TabSheet1Show
      object Bevel2: TBevel
        Left = 8
        Top = 217
        Width = 737
        Height = 7
      end
      object DBGrid4: TDBGrid
        Left = 32
        Top = 0
        Width = 689
        Height = 201
        DataSource = f_dm.DS_medical_Card
        ImeMode = imChinese
        ImeName = #20013#25991' ('#31616#20307') - '#26497#28857#20013#25991
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        Columns = <
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'ID'
            ImeMode = imClose
            Title.Alignment = taCenter
            Title.Caption = #32534#21495
            Title.Color = clSkyBlue
            Width = 73
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = #21333#20301#22320#22336
            Title.Alignment = taCenter
            Title.Color = clBackground
            Width = 113
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = #30005#35805#21495#30721
            Title.Alignment = taCenter
            Title.Color = clBackground
            Width = 72
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = #24180#40836
            Title.Alignment = taCenter
            Title.Color = clSkyBlue
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = #22995#21517
            Title.Alignment = taCenter
            Title.Color = clBackground
            Width = 74
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = #24615#21035
            Title.Alignment = taCenter
            Title.Color = clSkyBlue
            Width = 80
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = #34880#22411
            Title.Alignment = taCenter
            Title.Color = clBackground
            Width = 90
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = #32844#19994
            Title.Alignment = taCenter
            Title.Color = clBackground
            Width = 97
            Visible = True
          end>
      end
      object GroupBox4: TGroupBox
        Left = 32
        Top = 248
        Width = 377
        Height = 121
        Caption = 'X'#20809#24773#20917
        Color = clSkyBlue
        ParentColor = False
        TabOrder = 1
        object DBMemo2: TDBMemo
          Left = 2
          Top = 15
          Width = 373
          Height = 104
          Align = alClient
          DataField = #24773#20917
          DataSource = f_dm.D_X
          ImeName = #20013#25991' ('#31616#20307') - '#26497#28857#20013#25991
          ReadOnly = True
          TabOrder = 0
        end
      end
      object GroupBox5: TGroupBox
        Left = 416
        Top = 248
        Width = 313
        Height = 121
        Caption = #36807#25935#33647#29289#24773#20917
        Color = clSkyBlue
        ParentColor = False
        TabOrder = 2
        object DBMemo3: TDBMemo
          Left = 2
          Top = 15
          Width = 309
          Height = 104
          Align = alClient
          DataField = #21517#31216
          DataSource = f_dm.DS_thing
          ImeName = #20013#25991' ('#31616#20307') - '#26497#28857#20013#25991
          ReadOnly = True
          TabOrder = 0
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #32534#36753#30149#20154#20449#24687
      ImageIndex = 1
      OnShow = TabSheet2Show
      object Label1: TLabel
        Left = 48
        Top = 24
        Width = 73
        Height = 21
        AutoSize = False
        Caption = #21307#30103#35777#21495#65306
        Color = clAqua
        ParentColor = False
      end
      object Bevel3: TBevel
        Left = 8
        Top = 65
        Width = 721
        Height = 7
        Shape = bsBottomLine
      end
      object DBNavigator2: TDBNavigator
        Left = 1
        Top = 472
        Width = 270
        Height = 25
        TabOrder = 0
      end
      object DBNavigator3: TDBNavigator
        Left = 289
        Top = 472
        Width = 290
        Height = 25
        TabOrder = 1
      end
      object GroupBox6: TGroupBox
        Left = 8
        Top = 80
        Width = 345
        Height = 281
        Caption = #21307#30103#35777#22522#26412#20449#24687
        TabOrder = 2
        object Label5: TLabel
          Left = 32
          Top = 24
          Width = 36
          Height = 13
          Caption = #22995#21517#65306
        end
        object Label13: TLabel
          Left = 32
          Top = 88
          Width = 36
          Height = 13
          Caption = #24180#40836#65306
        end
        object Label14: TLabel
          Left = 32
          Top = 48
          Width = 36
          Height = 13
          Caption = #24615#21035#65306
        end
        object Label15: TLabel
          Left = 8
          Top = 216
          Width = 60
          Height = 13
          Caption = #21333#20301#22320#22336#65306
        end
        object Label16: TLabel
          Left = 8
          Top = 152
          Width = 60
          Height = 13
          Caption = #30005#35805#21495#30721#65306
        end
        object Label17: TLabel
          Left = 32
          Top = 120
          Width = 36
          Height = 13
          Caption = #34880#22411#65306
        end
        object Label18: TLabel
          Left = 24
          Top = 184
          Width = 36
          Height = 13
          Caption = #32844#19994#65306
        end
        object BitBtn2: TBitBtn
          Left = 230
          Top = 240
          Width = 75
          Height = 25
          Caption = #30830#23450#20462#25913
          TabOrder = 0
          OnClick = BitBtn2Click
        end
        object Edit1: TEdit
          Left = 88
          Top = 16
          Width = 121
          Height = 21
          ImeName = #20013#25991' ('#31616#20307') - '#26497#28857#20013#25991
          TabOrder = 1
          Text = 'Edit1'
        end
        object Edit2: TEdit
          Left = 88
          Top = 48
          Width = 121
          Height = 21
          ImeName = #20013#25991' ('#31616#20307') - '#26497#28857#20013#25991
          TabOrder = 2
          Text = 'Edit2'
        end
        object Edit3: TEdit
          Left = 88
          Top = 80
          Width = 121
          Height = 21
          ImeName = #20013#25991' ('#31616#20307') - '#26497#28857#20013#25991
          TabOrder = 3
          Text = 'Edit3'
        end
        object Edit4: TEdit
          Left = 88
          Top = 120
          Width = 121
          Height = 21
          ImeName = #20013#25991' ('#31616#20307') - '#26497#28857#20013#25991
          TabOrder = 4