A†QDp–T;1zXôú–p Elipse.pas¥sÞ,r Elipse.DFM¹aá,dExtCtrlsÇc&fTPanel02afTImageý†VJg.TPanel ßR%g.TImageÖWwcdButtonsÇc&fTBitBtn‘Q¤g.TBitBtnj"4hcdSpinÇc&f TSpinEdit:uUg .TSpinEditFvãcdStdCtrlsÇc&cdDialogsÇc&cdFormsÇc&fTFormH×Ë)g.TForm!¨ìígTCustomForm.AlignControlsïÂí#gTCustomForm.CreateParamsïÂí#gTCustomForm.CreateWindowHandleïÂí#gTCustomForm.CreateWndïÂí#gTCustomForm.DefaultHandlerïÂí#gTCustomForm.DefinePropertiesïÂí#gTCustomForm.DestroyWindowHandleïÂí#gTCustomForm.GetClientRectïÂí#gTCustomForm.LoadedïÂí#gTCustomForm.NotificationïÂí#gTCustomForm.PaintWindowïÂí#gTCustomForm.ReadStateïÂí#gTCustomForm.SetParentïÂí#gTCustomForm.ValidateRenameïÂí#gTCustomForm.WndProcïÂí#gTCustomForm.CreateïÂí#gTCustomForm.DestroyïÂí#gTCustomForm.SetFocusïÂí#gTCustomForm.WantChildKeyïÂí#gTCustomForm.CloseïÂí#cdControlsÇc&f TMouseButtonìÜà|gTWinControl.CreateHandleïÂí#gTWinControl.DestroyWndïÂí#gTWinControl.GetClientOriginïÂí#gTWinControl.GetDeviceContextïÂí#gTWinControl.ShowControlïÂí#gTWinControl.InvalidateïÂí#gTWinControl.RepaintïÂí#gTWinControl.SetBoundsïÂí#gTWinControl.UpdateïÂí#gTControl.GetDragImagesïÂí#gTControl.SetDragModeïÂí#gTControl.SetNameïÂí#gTWinControl.WMNCHitTestïÂí#gTWinControl.GetHandleïÂí#cdGraphicsÇc&cdClassesÇc&f TShiftStateÉYñgTComponent.WriteStateïÂí#gTComponent.SafeCallExceptionïÂí#gTPersistent.AssignToïÂí#gTPersistent.AssignïÂí#gTComponent.GetComponentCountïÂí#gTComponent.GetComponentïÂí#gPointCxµcdSysUtilsík…šcdMessagesík…šf TWMNCHitTest«®:Þg WM_NCHITTEST=B+g WM_SYSCOMMANDÌ«6cdWindowsík…šfTPointa„„g GetCursorPosï-QçfTHandle`õL gCreateEllipticRgn„hk÷g CombineRgn„hk÷gRGN_XOR¼A+g CreateRectRgn„hk÷g SetWindowRgn­Î·égCreatePolygonRgnò¦ÿbg ALTERNATEºA+gReleaseCaptureB ¯Pg SendMessage„hk÷cdSysInitík…šcdSystemík…šfTObjectâ’!ŠfInteger`õL fWordü@ÆÍgTObject.NewInstanceïÂí#gTObject.FreeInstanceïÂí#gTrueºjÊQg@IsClass÷ŸøQg@AsClass÷ŸøQg@HandleFinally÷ŸøQc& .TFormaElipse€À®~* TFormaElipseˆçÝç¹ FormaElipseæõCº2 .1f (TFormaElipse.WMNCHitTest€ïÂí#H"!Self"M Pfc(TFormaElipse.FormCreate€ïÂí#9 "!Self!Sender Af$ I Rgn Rgn1f . .c(TFormaElipse.Panel2MouseDown€ïÂí#Z"!Self!Sender!Button !Shift& !X&!Y&c(TFormaElipse.Timer1Timer€ïÂí# "!Self!Senderc(TFormaElipse.Image2Click€ïÂí# "!Self!Senderc(TFormaElipse.FormKeyDown€ïÂí#"!Self!Sender"Key!Shift&c(TFormaElipse.Image1DblClick€ïÂí# "!Self!Senderc(TFormaElipse.FormClick€ïÂí# "!Self!Senderc( Finalization€÷ŸøQ\! "c(Elipse€!"cG‘FJº ±¸@¨v,Panel2q,Image2�, SpinEdit1‘,Image1¡- FormCreateôÈ-Panel2MouseDownôÚ- Timer1Timerôè- Image2Clickôî- FormKeyDownôô-Image1DblClickôþ- FormClickô - WMNCHitTest ÀcD €ÿÿÿ@La&D l @Àý�‰ì–ÜPanel2àImage2ä SpinEdit1èImage1 FormCreatePanel2MouseDown Timer1Timer Image2Click FormKeyDownImage1DblClick FormClick„ TFormaElipse TFormaElipse@;ElipseSƒÄø‹Ø‹ÃèTè‹C0)$‹C4)D$YZ[ÃSVWUƒÄœ‹ØhÈh&j(jè‹øj‹D$PWWè‹Ãè‹èM…í|^E3ö‹Ö‹Ãè‹è„Àt?‹Ö‹Ãè‹è‹H4HXZ\^"N$&(.P6VDF ¸~È"Ú,è$î$ô$þ* $À& ºº$¸Àf Œ*È0� ’x&z  ²z  ´4–"’h ˜ |@|F|F|@|F|F|F|F|F|@|<š*h ˜Úž.h  èH îH ôHþH  H ¾ ¶¾ �^B%     * "0(:ô  @@FF@FFFFF@"0  :      l‘I’Ö�Ø “”XÀ` Ä ÄþÂ@þÈ ÈðÊÒ< ÐzÖÒÖþÐaþÒ¡þÊ þÚ@Ü ÜPþè@êê þî@ðð þô@ööþþ@ þ @   þ  a