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