ß ¹ M6Z^ñ <p Unit1.pasY r Unit1.dfmÔEYdStdCtrlsÈCÒï fTButton7êÈefTEdit5$Pÿg.TButton x;Hg.TEdit ²ÂácdExtCtrlsÈCÒï fTPanel g.TPanelôyôcdMSINKAUTLib_TLB^ñ f TInkCollector5a3 fTInkRecognizerContextj¼£f
|
IInkCursor È!VfIInkStrokeDispfäºg.TInkCollector ï¥ÿg.TInkRecognizerContextQJogTInkCollector.Set_hWnd;$!AgTInkCollector.Set_Enabled=$!Ag*TInkCollector.Get_DefaultDrawingAttributes>$!AfIInkDrawingAttributesYñgTInkCollector.Get_InkB$!AfIInkDispî
åf IInkStrokes©ÿÔcd OleServerÈCÒï cdDialogsÈCÒï cdFormsÈCÒï fTFormè±Ig.TFormïu$,gTCustomForm.AlignControlsmgaÈgTCustomForm.CreateParamspgaÈg TCustomForm.CreateWindowHandleqgaÈgTCustomForm.CreateWndrgaÈg TCustomForm.DefinePropertiestgaÈg TCustomForm.DestroyWindowHandleugaÈgTCustomForm.DoCreatewgaÈgTCustomForm.DoDestroyxgaÈgTCustomForm.GetClientRect{gaÈgTCustomForm.GetFloating}gaÈgTCustomForm.LoadedgaÈgTCustomForm.NotificationgaÈgTCustomForm.PaintWindowgaÈgTCustomForm.QueryInterfacegaÈgTCustomForm.ReadState
gaÈg TCustomForm.SetParentBiDiModegaÈgTCustomForm.SetParentgaÈgTCustomForm.UpdateActionsgaÈgTCustomForm.ValidateRenamegaÈgTCustomForm.WndProcgaÈgTCustomForm.ResizinggaÈgTCustomForm.CreateÇgaÈgTCustomForm.CreateNewÈgaÈgTCustomForm.DestroyÉgaÈg TCustomForm.AfterConstructionÊgaÈg TCustomForm.BeforeDestructionËgaÈgTCustomForm.CloseQueryÍgaÈgTCustomForm.DefaultHandlerÎgaÈgTCustomForm.SetFocusÚgaÈg TCustomForm.SetFocusedControlÛgaÈgTCustomForm.ShowModalÝgaÈgTCustomForm.WantChildKeyÞgaÈg%TScrollingWinControl.AdjustClientRect¸(#g&TScrollingWinControl.AutoScrollEnabledº(#g%TScrollingWinControl.AutoScrollInView»(#cdControlsÈCÒï gTWinControl.AssignToê.¯gTWinControl.CanAutoSizeê.¯gTWinControl.CanResizeê.¯g TWinControl.ConstrainedResizeê.¯gTWinControl.CreateHandleê.¯g#TWinControl.CustomAlignInsertBeforeê.¯g TWinControl.CustomAlignPositionê.¯gTWinControl.DestroyWnd£ê.¯gTWinControl.GetClientOrigin³ê.¯g TWinControl.GetControlExtentsµê.¯g TWinControl.GetDeviceContext¶ê.¯g TWinControl.SetParentBackgroundÏê.¯gTWinControl.ShowControlÑê.¯gTWinControl.Invalidateë.¯gTWinControl.Repaintë.¯gTWinControl.SetBounds ë.¯gTWinControl.Update ë.¯gTControl.GetAction6`)gTControl.GetDragImages<`)gTControl.GetEnabled=`)g!TControl.GetFloatingDockSiteClass?`)gTControl.SetAutoSizeN`)gTControl.SetDragModeO`)gTControl.SetEnabledP`)gTControl.SetNameQ`)gTControl.SetBiDiModeU`)gTControl.InitiateAction`)gTWinControl.GetHandle ê.¯gTControl.SetTextñ
`)gTControl.Refresh`)gTControl.GetTextÊ
`)cdGraphicsÈCÒï gclRedú«ZåcdClassesÈCÒï gTComponent.UpdateRegistryòìgTComponent.WriteStateòìg TComponent.SafeCallExceptionªòìgTPersistent.Assign§N`cdVariantsÈCÒï cdSysUtilsÈCÒï gTrim¬J¢cdMessagesÈCÒï cdWindowsÈCÒï cdSysInitÈCÒï cdSystemÈCÒï fTObject¼©_fWordBoolò}FÉf
|
WideString¹ÌÌgTObject.DispatchÀGgTObject.NewInstanceÂGgTObject.FreeInstanceÃGgTrue°¹òàg@CheckAutoResult%g@FinalizeArrayBB´¼g@HandleFinallyEóafInteger¶¨§ gLength g@WStrLenÛHÙgDelete g @WStrDelete )9g @WStrAddRefåÁ¡@g@WStrAsg4Så!g@WStrClrѨ}µfStringÔÿ×f
|
AnsiStringÔÿ×g
|
@IntfClear%Ebg @LStrFromWStruKg@LStrClrѨ}µfTGUIDüyRÆg @IntfCast0ZõÊg@LStrCatEóag @WStrFromLStrzh]g @WStrArrayClrzY´c4Unit1iif@c4Windows Öc4Messages Ôc4SysUtils Ðc4Variants Îc4Classes Äc4Graphics Àc4Controls c4Forms 4c4Dialogs 2c4 OleServer 0c4MSINKAUTLib_TLB c4ExtCtrls c4StdCtrls c&.TForm1)iä¸& *TForm1BÛqÖ( Form1æPAÖ(H .2f* ( TForm1.InitializeInkCollectorA_ú µ,!Self(c(TForm1.DeleteStrB_ú Ê !Self( !strf ø#Result LengthOfText c(TForm1.FormCreate;_ú ,!Self( !Senderc(TForm1.InkCLTStroke<_ú Ù,!Self(!ASender!Cursor !Stroke""Cancel&c(TForm1.Button1Click=_ú µ,!Self(!Senderc(TForm1.Button2Click>_ú !,!Self(!Sender Strokesfø
|
LastStrokefðc(TForm1.Button3Click?_ú m,!Self(!Sender
|
c(TForm1.Button4Click@_ú A,!Self(!Senderc( FinalizationEóa \! ,c(Unit1 !,cþG (5 F<e az©þ¼& ,InkCLTá ,InkRC
|
ñ ,Panel1 ,Button1 ,edtName! ,Button21 ,Button3A ,Button4Q ,Edit1a -
|
FormCreateî- InkCLTStrokeî- Button1Clickî±- Button2Clickî½- Button3ClickîÑ- Button4ClickîÝ-InitializeInkCollector îq- DeleteStr îy cD * ÿÿÿP@ l= L @ ¾ 0 7 ø InkCLTü InkRC Panel1 Button1 edtName Button2 Button3 Button4 Edit1
|
FormCreate InkCLTStroke Button1Click Button2Click Button3Click Button4ClickTForm1 TForm1L ^ Unit1 Uìj j SØ3ÀUh¡ dÿ0d è Ðø è Êÿø è hÿ Uüø è EüP ÿP è h HCUøø è EøP ÿP(è 3ÀZYYdh¨ Eø ¹ è Ãé ëå[YY]ÃUìQSÙUüEüè 3ÀUhZ dÿ0d Eüè
À~Uü¹ è ÃUüè 3ÀZYYdha Eüè Ãé ëð[Y]Ãè ÃUìj j j j SØ3ÀUh¨ dÿ0d Eøè PEôè PEðè PE P ÿP,è EðP ÿP è EôP ÿP,è UøEüè Uü è 3ÀZYYdh¯ Eðè Eôè Eøè Eüè Ãé ëØ[å] Uìj j j SØ3ÀUh¡ dÿ0d Eüè PUøø è EøP ÿP è EüPUôø è EôP ÿP4è ÿà è 3ÀZYYdh¨ Eô ¹ è Eüè Ãé ëÝ[å]ÃUì3ÉQQQQQQQQSØ3ÀUh+ dÿ0d EôPEðè PUìø è EìP ÿP è EðP ÿP è }ô Eüè PUèø è EèP ÿP è Eäè PEôPEüP ÿP è EôHPEüP ÿP0è UäEø¹8 è EøPUàø è EàP ÿP8è 3ÀZYYdh2 Eàè Eäè Eè ¹ è Eðè Eøè Eüè Ãé ë½[å]à ê/$CÑrJ>û¹)Ï¢Uìj j j SVWúØ3ÀUh dÿ0d Uü³ Æè EüPUô è EôUøè UøXè UüÆè ×Ãè 3ÀZYYdh Eôè Eøè Eüè Ãé ëà_^[å]ÃUì3ÉQQQQSVØ3ÀUh dÿ0d Uð³ Æè UðEôè UôMøÃè UøEüè UüÆè 3ÀZYYdh Eðè Eôº è Eüè Ãé ëÛ^[å]ÃUì3ÀUh% dÿ0d ÿ 3ÀZYYdh, Ãé ëø]Ã- Ãm- a a eaaa8ÊjlâpäæhBÌNPV²Æ^ÈTd¤J¦¨Lª¬®°ZX´`¶ ¢z:<>@DRr|~bFH\fntvx a"&±&½&Ñ&Ý4
|
e ea6 q q"¸" $&& ê&& êq(ì îy úy ô$øüyþ îq
|
$ þ ê ê ê º þ î± ± * ê$* ê2¼±,ì î½(½$ * ê ê$ * ê &ê&ê½
|
$* ê½ ,ì î8Ñ(Ñ,¾$¾Ò º±Ñ îÝ"Ý,¾!y ºÝ% îéémé îm JZ 00 B
|
|
@ N
|
|
8M4 v
|
<J|à,<l6Þh ú ( ,f e e e e e e
|
e e "e $e & *(e ( .*e *± 0.°e .½ 20Àe 0Ñ 42àe 2Ý 64îe 4q <:Xe :y ><he" <i Hu } h
j l £8 ¡ ¥ © µ Ks¹ °Á 2Å ÀÉ ÄÍ ÆÕ Ù àá 2å îé øPq@ u0u¡þy` 2
@P tþ
Âþ@
|
þ@ 8½þ±@ µ4µ¡þ½@@ Á<ÁÉþÑ` pÕ<Ù<
|
ÕQþÙQþÝ@ 0á6á)þé a
|
