object export: Texport Left = 154 Top = 70 ActiveControl = MaskEdit1 BorderStyle = bsDialog Caption = 'Export' ClientHeight = 183 ClientWidth = 310 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object OKBtn: TBitBtn Left = 220 Top = 8 Width = 77 Height = 27 Caption = 'OK' Default = True TabOrder = 0 OnClick = OKBtnClick Glyph.Data = { BE060000424DBE06000000000000360400002800000024000000120000000100 0800000000008802000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303 0303030303030303030303030303030303030303030303030303030303030303 03030303030303030303030303030303030303030303FF030303030303030303 03030303030303040403030303030303030303030303030303F8F8FF03030303 03030303030303030303040202040303030303030303030303030303F80303F8 FF030303030303030303030303040202020204030303030303030303030303F8 03030303F8FF0303030303030303030304020202020202040303030303030303 0303F8030303030303F8FF030303030303030304020202FA0202020204030303 0303030303F8FF0303F8FF030303F8FF03030303030303020202FA03FA020202 040303030303030303F8FF03F803F8FF0303F8FF03030303030303FA02FA0303 03FA0202020403030303030303F8FFF8030303F8FF0303F8FF03030303030303 FA0303030303FA0202020403030303030303F80303030303F8FF0303F8FF0303 0303030303030303030303FA0202020403030303030303030303030303F8FF03 03F8FF03030303030303030303030303FA020202040303030303030303030303 0303F8FF0303F8FF03030303030303030303030303FA02020204030303030303 03030303030303F8FF0303F8FF03030303030303030303030303FA0202020403 030303030303030303030303F8FF0303F8FF03030303030303030303030303FA 0202040303030303030303030303030303F8FF03F8FF03030303030303030303 03030303FA0202030303030303030303030303030303F8FFF803030303030303 030303030303030303FA0303030303030303030303030303030303F803030303 0303030303030303030303030303030303030303030303030303030303030303 0303} Margin = 2 NumGlyphs = 2 Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 220 Top = 40 Width = 77 Height = 27 TabOrder = 1 OnClick = CancelBtnClick Kind = bkCancel Margin = 2 Spacing = -1 IsControl = True end object GroupBox1: TGroupBox Left = 8 Top = 8 Width = 201 Height = 161 Hint = 'Den Zeitraum w�hlen und'#13'mit OK in die Felderwahl gehen.|' Caption = 'Zeitraum' ParentShowHint = False ShowHint = True TabOrder = 2 object Label1: TLabel Left = 16 Top = 40 Width = 18 Height = 13 Caption = 'von' end object Label2: TLabel Left = 16 Top = 72 Width = 13 Height = 13 Caption = 'bis' end object SpeedButton1: TSpeedButton Left = 144 Top = 32 Width = 25 Height = 25 Glyph.Data = { DE000000424DDE0000000000000076000000280000000D0000000D0000000100 0400000000006800000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7000777777777777700077777707777770007777706077777000777706660777 7000777066666077700077066666660770007000066600007000777706660777 7000777706660777700077770666077770007777000007777000777777777777 7000} OnClick = SpeedButton1Click end object SpeedButton2: TSpeedButton Left = 144 Top = 71 Width = 25 Height = 25 Glyph.Data = { DE000000424DDE0000000000000076000000280000000D0000000D0000000100 0400000000006800000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7000777777777777700077777707777770007777706077777000777706660777 7000777066666077700077066666660770007000066600007000777706660777 7000777706660777700077770666077770007777000007777000777777777777 7000} OnClick = SpeedButton2Click end object Label3: TLabel Left = 24 Top = 104 Width = 122 Height = 13 Caption = 'Den Zeitraum w�hlen und' end object Label4: TLabel Left = 24 Top = 128 Width = 123 Height = 13 Caption = 'mit OK den Export starten.' end object MaskEdit1: TMaskEdit Left = 48 Top = 35 Width = 89 Height = 21 EditMask = '!90/90/0000;1;_' MaxLength = 10 TabOrder = 0 Text = '01.01.1996' end object MaskEdit2: TMaskEdit Left = 48 Top = 72 Width = 89 Height = 21 EditMask = '!90/90/0000;1;_' MaxLength = 10 TabOrder = 1 Text = '01.12.1996' end end object sd: TSaveDialog DefaultExt = 'csv' FileEditStyle = fsEdit Filter = 'CSV Files (*.CSV)|*.CSV' Left = 232 Top = 120 end end