object Form1: TForm1 Left = 233 Top = 125 Width = 696 Height = 480 Caption = 'Geburtstagsproblem' 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 LGroesse: TLabel Left = 24 Top = 40 Width = 219 Height = 25 Caption = 'Gruppengr'#246#223'e eingeben:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -20 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object LErgebnis: TLabel Left = 32 Top = 136 Width = 88 Height = 25 Caption = 'LErgebnis' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -20 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object EAnzahl: TEdit Left = 264 Top = 40 Width = 105 Height = 33 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -20 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 Text = '30' end object BtWahrsch: TButton Left = 32 Top = 80 Width = 209 Height = 33 Caption = 'Wahrscheinlichkeit bestimmen' TabOrder = 1 OnClick = BtWahrschClick end end