object LuftDialog: TLuftDialog
  Left = 98
  Top = 120
  ActiveControl = OKBtn
  BorderStyle = bsDialog
  Caption = 'Stoffdaten von trockener Luft'
  ClientHeight = 205
  ClientWidth = 515
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  PixelsPerInch = 96
  Position = poScreenCenter
  OnCreate = FormCreate
  TextHeight = 13
  object Bevel1: TBevel
    Left = 8
    Top = 8
    Width = 258
    Height = 153
    Shape = bsFrame
    IsControl = True
  end
  object Label1: TLabel
    Left = 30
    Top = 30
    Width = 82
    Height = 13
    Caption = 'Temperatur in �C:'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 30
    Top = 75
    Width = 76
    Height = 13
    Caption = 'Dichte in kg/m�:'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 30
    Top = 102
    Width = 113
    Height = 13
    Caption = 'Viskosit�t in 10^-6 Pa s:'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 30
    Top = 130
    Width = 112
    Height = 13
    Caption = 'Druck (absolut) in mbar:'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object OKBtn: TBitBtn
    Left = 48
    Top = 170
    Width = 141
    Height = 27
    Caption = 'Daten �bernehmen'
    Default = True
    ModalResult = 1
    TabOrder = 1
    OnClick = OKBtnClick
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      3333333333333333333333333333333333333333333FF3333333333333003333
      3333333333773FF3333333333309003333333333337F773FF333333333099900
      33333FFFFF7F33773FF30000000999990033777777733333773F099999999999
      99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900
      33333333337F3F77333333333309003333333333337F77333333333333003333
      3333333333773333333333333333333333333333333333333333333333333333
      33333333333333333333333333333333333333333333333333330000}
    Margin = 2
    NumGlyphs = 2
    Spacing = -1
    IsControl = True
  end
  object CancelBtn: TBitBtn
    Left = 197
    Top = 170
    Width = 91
    Height = 27
    TabOrder = 2
    Kind = bkCancel
    Margin = 2
    Spacing = -1
    IsControl = True
  end
  object ListBox_Temperatur: TListBox
    Left = 170
    Top = 20
    Width = 61
    Height = 41
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ItemHeight = 13
    ParentFont = False
    TabOrder = 4
    OnClick = ListBox_TemperaturClick
  end
  object Edit_Dichte: TEdit
    Left = 170
    Top = 70
    Width = 61
    Height = 20
    TabStop = False
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 5
  end
  object Edit_Visko: TEdit
    Left = 170
    Top = 100
    Width = 61
    Height = 20
    TabStop = False
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 6
  end
  object Edit_Druck: TEdit
    Left = 170
    Top = 125
    Width = 61
    Height = 20
    TabStop = False
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 7
    Text = '1000'
  end
  object Memo1: TMemo
    Left = 270
    Top = 10
    Width = 236
    Height = 151
    TabStop = False
    Color = clScrollBar
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Lines.Strings = (
      'Die Daten beziehen sich auf '
      'trockene Luft. Die Unterschiede zu '
      'feuchter Luft k�nnen i.A. '
      'vernachl��igt werden.'
      'Bei einem Druck von 1,0 bar sind '
      'Me�werte angegeben. Wird ein '
      'anderer Druck gew�hlt, so wird die '
      'Dichte berechnet. Der Wert kann in '
      'der N�he des Siedepunktes etwas '
      'von der Realit�t abweichen.'
      'Die Viskosit�t ist im Bereich von 0,1 '
      'bis 10 bar kaum vom Druck '
      'abh�ngig und wird deshalb nicht '
      'umgerechnet. Bei h�heren Dr�cken ist die '
      'angegebene Viskosit�t nur als ca-Wert zu '
      'betrachten.')
    ParentFont = False
    ReadOnly = True
    ScrollBars = ssVertical
    TabOrder = 0
  end
  object Btn_Druck_aendern: TBitBtn
    Left = 306
    Top = 170
    Width = 161
    Height = 26
    Caption = 'Druck �ndern'
    TabOrder = 3
    OnClick = Btn_Druck_aendernClick
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
      333333333337F33333333333333033333333333333373F333333333333090333
      33333333337F7F33333333333309033333333333337373F33333333330999033
      3333333337F337F33333333330999033333333333733373F3333333309999903
      333333337F33337F33333333099999033333333373333373F333333099999990
      33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
      33333333337F7F33333333333309033333333333337F7F333333333333090333
      33333333337F7F33333333333309033333333333337F7F333333333333090333
      33333333337F7F333333333333000333333333333377733333330000}
    NumGlyphs = 2
  end
end