WDR Computer Club Digital 1997 February/club9702.bin/SHARE95/95DRUCK/_SETUP.1/Druck3.exe/0/RCDATA/TEINH_UMR/TEINH_UMR.txt

Text File | 1996-10-14 | 8KB | 331 lines

object Einh_Umr: TEinh_Umr
  Left = 196
  Top = 112
  BorderStyle = bsDialog
  Caption = 'Umrechnung von Einheiten F�rdermedium'
  ClientHeight = 202
  ClientWidth = 367
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 96
  Position = poScreenCenter
  OnShow = FormShow
  TextHeight = 16
  object TabbedNotebook1: TTabbedNotebook
    Left = 0
    Top = 0
    Width = 367
    Height = 202
    Align = alClient
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    TabFont.Color = clBtnText
    TabFont.Height = -12
    TabFont.Name = 'MS Sans Serif'
    TabFont.Style = []
    TabOrder = 1
    object TTabPage
      Left = 5
      Top = 26
      Caption = 'Volumenstrom'
      object Label1: TLabel
        Left = 115
        Top = 77
        Width = 23
        Height = 13
        Caption = 'l/min'
      end
      object Label2: TLabel
        Left = 155
        Top = 74
        Width = 11
        Height = 20
        Caption = '='
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label3: TLabel
        Left = 255
        Top = 77
        Width = 22
        Height = 13
        Caption = 'm�/h'
      end
      object Edit_Anf_Vo: TEdit
        Left = 40
        Top = 75
        Width = 66
        Height = 20
        TabOrder = 1
        Text = 'Edit_Anf_Vo'
        OnChange = Edit_Anf_VoChange
      end
      object Edit_Ende_Vo: TEdit
        Left = 180
        Top = 75
        Width = 66
        Height = 20
        TabOrder = 0
        Text = 'Edit_Ende_Vo'
      end
      object RadioGroup1: TRadioGroup
        Left = 40
        Top = 15
        Width = 166
        Height = 51
        Caption = 'Umrechnung von ... in m�/h'
        Columns = 2
        ItemIndex = 0
        Items.Strings = (
          'l/min'
          'l/s')
        TabOrder = 2
        OnClick = RadioGroup1Click
      end
    end
    object TTabPage
      Left = 5
      Top = 26
      Caption = 'Massenstrom'
      object Label4: TLabel
        Left = 115
        Top = 102
        Width = 22
        Height = 13
        Caption = 'kg/s'
      end
      object Label5: TLabel
        Left = 155
        Top = 99
        Width = 11
        Height = 20
        Caption = '='
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label6: TLabel
        Left = 255
        Top = 102
        Width = 22
        Height = 13
        Caption = 'm�/h'
      end
      object Label7: TLabel
        Left = 40
        Top = 75
        Width = 76
        Height = 13
        Caption = 'Dichte in kg/m�:'
      end
      object RadioGroup2: TRadioGroup
        Left = 40
        Top = 15
        Width = 206
        Height = 51
        Caption = 'Umrechnung von ... in m�/h'
        Columns = 3
        ItemIndex = 0
        Items.Strings = (
          'kg/s'
          'kg/min'
          'kg/h')
        TabOrder = 0
        OnClick = RadioGroup2Click
      end
      object Edit_anf_Ma: TEdit
        Left = 40
        Top = 100
        Width = 66
        Height = 20
        TabOrder = 1
        Text = 'Edit_Anf_Ma'
        OnChange = Edit_anf_MaChange
      end
      object Edit_Ende_Ma: TEdit
        Left = 180
        Top = 100
        Width = 66
        Height = 20
        TabOrder = 2
        Text = 'Edit_Ende_Ma'
      end
      object Edit_Dichte: TEdit
        Left = 125
        Top = 70
        Width = 66
        Height = 20
        TabOrder = 3
        Text = 'Edit_Dichte'
        OnChange = Edit_DichteChange
      end
    end
    object TTabPage
      Left = 5
      Top = 26
      Caption = 'Viskosit�t'
      object Label8: TLabel
        Left = 40
        Top = 75
        Width = 76
        Height = 13
        Caption = 'Dichte in kg/m�:'
        Visible = False
      end
      object Label9: TLabel
        Left = 115
        Top = 102
        Width = 49
        Height = 13
        Caption = 'dyn. mPas'
      end
      object Label10: TLabel
        Left = 190
        Top = 99
        Width = 11
        Height = 20
        Caption = '='
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label11: TLabel
        Left = 290
        Top = 102
        Width = 60
        Height = 13
        Caption = '10^-6 kg/ms'
      end
      object RadioGroup3: TRadioGroup
        Left = 25
        Top = 10
        Width = 251
        Height = 51
        Caption = 'Umrechnung von ... in dyn. 10^-6 kg/ms'
        Columns = 2
        ItemIndex = 0
        Items.Strings = (
          'dyn. mPa s'
          'kin. 10^-6 m�/s')
        TabOrder = 0
        OnClick = RadioGroup3Click
      end
      object Edit_Dichte_Vi: TEdit
        Left = 125
        Top = 70
        Width = 66
        Height = 20
        TabOrder = 1
        Text = 'Edit_Dichte'
        Visible = False
        OnChange = Edit_DichteChange
      end
      object Edit_Anf_Vi: TEdit
        Left = 40
        Top = 100
        Width = 66
        Height = 20
        TabOrder = 2
        Text = 'Edit_Anf_Vi'
        OnChange = Edit_anf_MaChange
      end
      object Edit_Ende_Vi: TEdit
        Left = 215
        Top = 100
        Width = 66
        Height = 20
        TabOrder = 3
        Text = 'Edit_Ende_Vi'
      end
    end
  end
  object Bere2_Btn: TBitBtn
    Left = 10
    Top = 160
    Width = 105
    Height = 27
    Caption = 'Berechnen'
    Default = True
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
    OnClick = Bere_BtnClick
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000
      73333337777777773F333308888888880333337F3F3F3FFF7F33330808089998
      0333337F737377737F333308888888880333337F3F3F3F3F7F33330808080808
      0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
      0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808
      0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008
      0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008
      0333337F777777737F333308888888880333337F333333337F33330888888888
      03333373FFFFFFFF7333337000000000733333377777777733330000}
    Margin = 2
    NumGlyphs = 2
    Spacing = -1
  end
  object CancelBtn: TBitBtn
    Left = 278
    Top = 160
    Width = 77
    Height = 27
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    Kind = bkCancel
    Margin = 2
    Spacing = -1
  end
  object UebernahmeBtn: TBitBtn
    Left = 123
    Top = 160
    Width = 148
    Height = 27
    Caption = 'Daten �bernehmen'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ModalResult = 1
    ParentFont = False
    TabOrder = 3
    OnClick = UebernahmeBtnClick
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333333333333333333333333333333333333333333333
      3333333333333333333333333333333333333333333FF3333333333333003333
      3333333333773FF3333333333309003333333333337F773FF333333333099900
      33333FFFFF7F33773FF30000000999990033777777733333773F099999999999
      99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900
      33333333337F3F77333333333309003333333333337F77333333333333003333
      3333333333773333333333333333333333333333333333333333333333333333
      33333333333333333333333333333333333333333333333333330000}
    Margin = 2
    NumGlyphs = 2
    Spacing = -1
  end
end