naconcentration.dfm

本代码可以较好地计算腹膜透析中合理的钠浓度

object FormInputView: TFormInputView
  Left = 260
  Top = 121
  Width = 606
  Height = 483
  Caption = #25214#20986#20302#38048#36879#26512#28082#30340#27987#24230
  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 = 184
    Top = 312
    Width = 23
    Height = 13
    Caption = 'From'
  end
  object Label2: TLabel
    Left = 0
    Top = 312
    Width = 168
    Height = 13
    Caption = #36879#26512#28082#20013#38048#31163#23376#30340#27987#24230#65288#23454#25968#65289
  end
  object Label3: TLabel
    Left = 328
    Top = 312
    Width = 13
    Height = 13
    Caption = 'To'
  end
  object Label4: TLabel
    Left = 280
    Top = 312
    Width = 31
    Height = 13
    Caption = 'mmol/l'
  end
  object Label5: TLabel
    Left = 400
    Top = 312
    Width = 31
    Height = 13
    Caption = 'mmol/l'
  end
  object Label6: TLabel
    Left = 456
    Top = 336
    Width = 24
    Height = 13
    Caption = #27493#38271
  end
  object Label7: TLabel
    Left = 552
    Top = 336
    Width = 31
    Height = 13
    Caption = 'mmol/l'
  end
  object Label8: TLabel
    Left = 0
    Top = 288
    Width = 573
    Height = 13
    Caption = 
      '----------------------------------------------------------------' +
      '----------------------------------------------------------------' +
      '---------------------------------------------------------------'
  end
  object Label13: TLabel
    Left = 16
    Top = 40
    Width = 36
    Height = 13
    Caption = #31532#19968#34955
  end
  object Label14: TLabel
    Left = 16
    Top = 72
    Width = 36
    Height = 13
    Caption = #31532#20108#34955
  end
  object Label15: TLabel
    Left = 16
    Top = 104
    Width = 36
    Height = 13
    Caption = #31532#19977#34955
  end
  object Label16: TLabel
    Left = 16
    Top = 136
    Width = 36
    Height = 13
    Caption = #31532#22235#34955
  end
  object Label18: TLabel
    Left = 64
    Top = 8
    Width = 114
    Height = 13
    Caption = #33145#36879#28082#23384#33145#26102#38388'('#25972#25968')'
  end
  object Label19: TLabel
    Left = 144
    Top = 40
    Width = 16
    Height = 13
    Caption = 'min'
  end
  object Label20: TLabel
    Left = 144
    Top = 72
    Width = 16
    Height = 13
    Caption = 'min'
  end
  object Label21: TLabel
    Left = 144
    Top = 104
    Width = 16
    Height = 13
    Caption = 'min'
  end
  object Label22: TLabel
    Left = 144
    Top = 136
    Width = 16
    Height = 13
    Caption = 'min'
  end
  object Label23: TLabel
    Left = 0
    Top = 192
    Width = 570
    Height = 13
    Caption = 
      '----------------------------------------------------------------' +
      '----------------------------------------------------------------' +
      '--------------------------------------------------------------'
  end
  object Label24: TLabel
    Left = 200
    Top = 8
    Width = 132
    Height = 13
    Caption = #27599#22825#25668#20837#39135#30416#37327#65288#23454#25968#65289
  end
  object Label25: TLabel
    Left = 200
    Top = 40
    Width = 23
    Height = 13
    Caption = 'From'
  end
  object Label26: TLabel
    Left = 288
    Top = 40
    Width = 6
    Height = 13
    Caption = 'g'
  end
  object Label27: TLabel
    Left = 200
    Top = 72
    Width = 9
    Height = 13
    Caption = 'to'
  end
  object Label28: TLabel
    Left = 288
    Top = 72
    Width = 6
    Height = 13
    Caption = 'g'
  end
  object Label9: TLabel
    Left = 392
    Top = 8
    Width = 132
    Height = 13
    Caption = #27599#22825#25490#20986#30416#20221#37327#65288#23454#25968#65289
  end
  object Label10: TLabel
    Left = 320
    Top = 32
    Width = 132
    Height = 13
    Caption = '1. '#20174#27735#28082#19982#31914#20415#25490#20986#30416#20221
  end
  object Label11: TLabel
    Left = 518
    Top = 32
    Width = 6
    Height = 13
    Caption = 'g'
  end
  object Label12: TLabel
    Left = 400
    Top = 64
    Width = 48
    Height = 13
    Caption = '2. '#25490#23615#37327
  end
  object Label17: TLabel
    Left = 520
    Top = 64
    Width = 10
    Height = 13
    Caption = 'ml'
  end
  object Label29: TLabel
    Left = 368
    Top = 128
    Width = 84
    Height = 13
    Caption = #20174#23615#28082#25490#20986#30416#20221
  end
  object Label30: TLabel
    Left = 516
    Top = 128
    Width = 6
    Height = 13
    Caption = 'g'
  end
  object Label31: TLabel
    Left = 352
    Top = 96
    Width = 96
    Height = 13
    Caption = #23615#28082#20013#38048#31163#23376#27987#24230
  end
  object Label32: TLabel
    Left = 520
    Top = 96
    Width = 31
    Height = 13
    Caption = 'mmol/l'
  end
  object Label33: TLabel
    Left = 40
    Top = 208
    Width = 216
    Height = 13
    Caption = #36879#26512#30149#20154#34880#28082#20013#37096#20998#28342#36136#30340#27987#24230#65288#23454#25968#65289
  end
  object Label34: TLabel
    Left = 24
    Top = 232
    Width = 36
    Height = 13
    Caption = #38048#31163#23376
  end
  object Label35: TLabel
    Left = 224
    Top = 232
    Width = 36
    Height = 13
    Caption = #33889#33796#31958
  end
  object Label36: TLabel
    Left = 144
    Top = 240
    Width = 31
    Height = 13
    Caption = 'mmol/l'
  end
  object Label37: TLabel
    Left = 344
    Top = 240
    Width = 31
    Height = 13
    Caption = 'mmol/l'
  end
  object Label38: TLabel
    Left = 408
    Top = 232
    Width = 24
    Height = 13
    Caption = #23615#32032
  end
  object Label39: TLabel
    Left = 512
    Top = 240
    Width = 31
    Height = 13
    Caption = 'mmol/l'
  end
  object Label40: TLabel
    Left = 32
    Top = 352
    Width = 168
    Height = 13
    Caption = #36879#26512#28082#20013#33889#33796#31958#30340#27987#24230#65288#23454#25968#65289
  end
  object Label41: TLabel
    Left = 0
    Top = 392
    Width = 573
    Height = 13
    Caption = 
      '----------------------------------------------------------------' +
      '----------------------------------------------------------------' +
      '---------------------------------------------------------------'
  end
  object Label42: TLabel
    Left = 128
    Top = 376
    Width = 31
    Height = 13
    Caption = 'mmol/l'
  end
  object Label43: TLabel
    Left = 24
    Top = 368
    Width = 23
    Height = 13
    Caption = 'From'
  end
  object Label44: TLabel
    Left = 168
    Top = 376
    Width = 13
    Height = 13
    Caption = 'To'
  end
  object Label45: TLabel
    Left = 240
    Top = 376
    Width = 31
    Height = 13
    Caption = 'mmol/l'
  end
  object EditPDNaDown: TEdit
    Left = 208
    Top = 304
    Width = 49
    Height = 21
    TabOrder = 0
  end
  object EditPDNaUp: TEdit
    Left = 344
    Top = 304
    Width = 49
    Height = 21
    TabOrder = 1
  end
  object EditPDStep: TEdit
    Left = 496
    Top = 328
    Width = 49
    Height = 21
    TabOrder = 2
  end
  object EditFirstDepositTime: TEdit
    Left = 72
    Top = 32
    Width = 65
    Height = 21
    TabOrder = 3
  end
  object EditSecondDepositTime: TEdit
    Left = 72
    Top = 64
    Width = 65
    Height = 21
    TabOrder = 4
  end
  object EditThirdDepositTime: TEdit
    Left = 72
    Top = 96
    Width = 65
    Height = 21
    TabOrder = 5
  end
  object EditFourthDepositTime: TEdit
    Left = 72
    Top = 128
    Width = 65
    Height = 21
    TabOrder = 6
  end
  object BtPreSetDepositTime: TButton
    Left = 56
    Top = 160
    Width = 97
    Height = 25
    Caption = #39044#35774#23384#33145#26102#38388
    TabOrder = 7
    OnClick = BtPreSetDepositTimeClick
  end
  object EditBloodNa: TEdit
    Left = 72
    Top = 232
    Width = 65
    Height = 21
    TabOrder = 8
  end
  object BtSavePreSet: TButton
    Left = 104
    Top = 416
    Width = 145
    Height = 25
    Caption = #20445#23384#21508#39033#35774#23450#20540#24182#19979#19968#27493
    TabOrder = 9
    OnClick = BtSavePreSetClick
  end
  object EditNaIntakeDown: TEdit
    Left = 232
    Top = 32
    Width = 49
    Height = 21
    TabOrder = 10
  end
  object EditNaIntakeUp: TEdit
    Left = 232
    Top = 64
    Width = 49
    Height = 21
    TabOrder = 11
  end
  object BtPreSetNaIntake: TButton
    Left = 232
    Top = 96
    Width = 81
    Height = 25
    Caption = #39044#35774#25668#20837#30416#37327
    TabOrder = 12
    OnClick = BtPreSetNaIntakeClick
  end
  object BtPreSetNaOut: TButton
    Left = 456
    Top = 160
    Width = 105
    Height = 25
    Caption = #39044#35774#38750#33145#36879#25490#30416#37327
    TabOrder = 13
    OnClick = BtPreSetNaOutClick
  end
  object EditNaOutSweat: TEdit
    Left = 456
    Top = 32
    Width = 57
    Height = 21
    TabOrder = 14
  end
  object EditUrineOutV: TEdit
    Left = 456
    Top = 64
    Width = 57
    Height = 21
    TabOrder = 15
  end
  object EditNaOutUrine: TEdit
    Left = 456
    Top = 128
    Width = 57
    Height = 21
    TabOrder = 16
  end
  object EditUrineOutCon: TEdit
    Left = 456
    Top = 96
    Width = 57
    Height = 21
    TabOrder = 17
  end
  object EditBloodGlucose: TEdit
    Left = 272
    Top = 232
    Width = 65
    Height = 21
    TabOrder = 18
  end
  object EditBloodUrea: TEdit
    Left = 440
    Top = 232
    Width = 65
    Height = 21
    TabOrder = 19
  end
  object BtPreSetBloodCon: TButton
    Left = 440
    Top = 264
    Width = 129
    Height = 25
    Caption = #39044#35774#34880#28082#20013#21508#28342#36136#27987#24230
    TabOrder = 20
    OnClick = BtPreSetBloodConClick
  end
  object BtPreSetPDCon: TButton
    Left = 440
    Top = 360
    Width = 129
    Height = 25
    Caption = #39044#35774#36879#26512#28082#20013#28342#36136#27987#24230
    TabOrder = 21
    OnClick = BtPreSetPDConClick
  end
  object BtReset: TButton
    Left = 336
    Top = 416
    Width = 97
    Height = 25
    Caption = #22797#20301#39044#35774#20540
    TabOrder = 22
    OnClick = BtResetClick
  end
  object EditPDGluDown: TEdit
    Left = 56
    Top = 368
    Width = 65
    Height = 21
    TabOrder = 23
  end
  object EditPDGluUp: TEdit
    Left = 184
    Top = 368
    Width = 49
    Height = 21
    TabOrder = 24
  end
end