formula4.dfm

来自「使用4中计算相对湿度」· DFM 代码 · 共 65 行

object Form5: TForm5
  Left = 202
  Top = 144
  Width = 696
  Height = 480
  Caption = 'Form5'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 120
  TextHeight = 16
  object Memo1: TMemo
    Left = 16
    Top = 16
    Width = 657
    Height = 409
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -23
    Font.Name = 'Times New Roman'
    Font.Style = []
    ImeName = '中文 (简体) - 拼音加加3.11'
    Lines.Strings = (
      'lnPs=C1/Ts+C2+C3Ts+C4Ts^2+C5Ts^3+C6ln(Ts)'
      'lnPg=m1-(m2/(Tg+m3))'
      'Pq=Ps-AB(Tg-Ts)'
      'RH=(Pq/Pg)*100%'
      'A=0.000667'
      'B=101300'
      'C1=-5800.2206'
      'C2=1.3914993'
      'C3=-0.04860239'
      'C4=0.000041764768'
      'C5=-0.000000014452093'
      'C6=6.5459673'
      'm1=23.1964'
      'm2=3816.44'
      'm3=-46.13'
      ''
      ''
      '')
    ParentFont = False
    TabOrder = 0
  end
  object Button1: TButton
    Left = 568
    Top = 368
    Width = 97
    Height = 49
    Caption = '返 回'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -27
    Font.Name = '隶书'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = Button1Click
  end
end