ETwP;wJUnit1?g@HandleFinally`pcdSysInitcdWindowscdMessagescdSysUtilsgIntToStrXzcdClassesgTComponent.UpdateRegistrycgTComponent.WriteStatecgTComponent.SafeCallExceptioncgTComponent.UpdateActioncgTPersistent.AssigncdGraphicscdControlsgTWinControl.AssignToogTWinControl.CanAutoSizeogTWinControl.CanResizeogTWinControl.ConstrainedResizeogTWinControl.CreateHandleog#TWinControl.CustomAlignInsertBefore!ogTWinControl.CustomAlignPosition"ogTWinControl.DestroyWnd&og!TWinControl.DockReplaceDockClient)ogTWinControl.GetClientOrigin6ogTWinControl.GetControlExtents8ogTWinControl.GetDeviceContext9ogTWinControl.SetParentBackgroundYog#TWinControl.SetParentDoubleBufferedZogTWinControl.ShowControl\og+TWinControl.UpdateControlOriginalParentSize^ogTWinControl.InvalidateogTWinControl.RepaintogTWinControl.SetBoundsogTWinControl.UpdateogTControl.CreateTouchManagerKgTControl.GetActionŏKgTControl.GetEnabledˏKg!TControl.GetFloatingDockSiteClass͏KgTControl.SetAutoSizeᏡKgTControl.SetDragMode⏡KgTControl.SetEnabled㏡KgTControl.SetName䏡KgTControl.SetBiDiMode珡KgTControl.GetDragImagesKgTControl.InitiateAction*KcdFormsfTFormfgTCustomForm.AlignControlsI\gTCustomForm.CreateParamsM\gTCustomForm.CreateWindowHandleN\gTCustomForm.CreateWndO\gTCustomForm.DefinePropertiesQ\gTCustomForm.DestroyHandleR\gTCustomForm.DestroyWindowHandleS\gTCustomForm.DoCreateU\gTCustomForm.DoDestroyV\gTCustomForm.GetClientRect[\gTCustomForm.GetFloating\\gTCustomForm.Loaded`\gTCustomForm.Notificationa\gTCustomForm.PaintWindowc\gTCustomForm.ReadStatee\gTCustomForm.RequestAlignf\gTCustomForm.SetParentBiDiModeh\gTCustomForm.SetParentj\gTCustomForm.UpdateActionsk\gTCustomForm.ValidateRenamem\gTCustomForm.WndProco\gTCustomForm.Resizingp\gTCustomForm.QueryInterfacet\gTCustomForm.Create\gTCustomForm.CreateNew\gTCustomForm.Destroy\gTCustomForm.CloseQuery\gTCustomForm.DefaultHandler\gTCustomForm.SetFocus\gTCustomForm.SetFocusedControl\gTCustomForm.ShowModal\gTCustomForm.WantChildKey\gTCustomForm.AfterConstruction\gTCustomForm.BeforeDestruction\g%TScrollingWinControl.AdjustClientRectVg&TScrollingWinControl.AutoScrollEnabledVg%TScrollingWinControl.AutoScrollInViewVgTScrollingWinControl.DoGestureVg(TScrollingWinControl.DoGetGestureOptionsVg.TFormIcdDialogscdStdCtrlsfTButtonCfTListBox g.TButton^=g .TListBoxcdButtonsfTBitBtng.TBitBtnc5Unit1_c5Systemc5SysInit*c5Windows,c5Messages.c5SysUtils0c5Classes4c5Graphics@c5ControlsBc5Formsc5Dialogsc5StdCtrlsc5Buttonsc&.TForm1r*TForm1I %Werteb1%Anzahl~1*BereichRm Form1 : Z`&<7.2F(zufall "Zf!Anz! Wertebereichf i j gleichc(TForm1.Button1Clickiʸ- !Self !Sender icA(TForm1.Button2Clickiʸ !Selff!Sender if j x z2fcQ( Finalization`p! c(Unit1! cG FD  q&%?,BitBtn1 !q,Button1 1u,ListBox1 Ay,Button2 Q},ListBox2 a. Button1Click A. Button2Click QcDDL@A"D@DlXp![bBitBtn1Button1ListBox1Button2ListBox2BitBtn1Button1ListBox1Button2ListBox2 Button1Click Button2ClickpbbTForm1< Button1ClickSelfSender< Button2ClickSelfSenderTForm1XnUnit1 BereichdSVWUL$ډ$D$@$|FC\$$D$@3ҋN~$ ;uNuuGL$uʃ ]_^[UjSVW3Uh~d0d ddUUQ8Nu3ZYYdhE_^[Y]UdSVW3ɉdE3Uhd0d EhdEhMAd d0;~ދ20AeuE}duEdhddEQ8Mu3ZYYdhd_^[]Ã-m-    :D>z68<HFJlnVZprtvx|~dfhjLNPRTX\^`b &&(&.A&Q&" A6 &Q6 "  $*%"HrAA2%2NA& (Q6Q82^Q& (m! ! PP   *   0(B FJ"$   T \A Q"<%- 5r -r=9 ==99 9=5A`pE0 MMEQ`qpaeeam  a