Hong-Dell\Hong
2024-03-14 f577443b19a16ee59a8ac5cc8f4745c09108d3e2
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
9{ q4M#äŸDocListþÙ?–<r DocList.dfmo4Mp DocList.paso4MdSystemfTObject»<úÎfInteger    ™fÂgTObject.Equalsô\ggTObject.GetHashCodeõ\ggTObject.ToStringö\ggTObject.Dispatchú\ggTObject.NewInstanceü\ggTObject.FreeInstanceý\gfstringOª]Ïf UnicodeStringOª]Ïg @UStrArrayClrüŸg@HandleFinallyé`pÅgPosFþ„qgPosPÓ×úgLengthg@UStrLeno>ƒGŸ¤ŸDgCopyg    @UStrCopy%EfBooleanúefPLongintˊÉg@UStrClr\ª«>g TObject.Freeá\ggExitcdSysInitcdWindowsg PostMessageÐU«gWA_CLICKACTIVE²}ç1cdMessagesg WM_ACTIVATE¾}ç1cdSysUtilsg CompareTextÿ\®cdVariantscdClassesf TStringListᧅägTComponent.UpdateRegistryÙ§šTgTComponent.WriteStateݧšTgTComponent.SafeCallExceptionö§šTgTPersistent.Assignòg°Çf
TComponentЇ…¼fTCollectionItemrS±&gTCollectionItem.GetIndex™sƾfTStringsl
©‡g .TStringListÄ{c6gTStringList.Create Èš|cdGraphicscdControlsgTWinControl.AssignToāgTWinControl.CanAutoSizeɁgTWinControl.CanResizeʁgTWinControl.ConstrainedResizégTWinControl.CreateHandleρg#TWinControl.CustomAlignInsertBeforeӁgTWinControl.CustomAlignPositionԁgTWinControl.DestroyWnd؁g!TWinControl.DockReplaceDockClientہgTWinControl.GetClientOriginègTWinControl.GetControlExtentsêgTWinControl.GetDeviceContextëgTWinControl.SetParentBackground ‚g#TWinControl.SetParentDoubleBuffered ‚gTWinControl.ShowControl‚g+TWinControl.UpdateControlOriginalParentSize‚gTWinControl.InvalidateG‚gTWinControl.RepaintM‚gTWinControl.SetBoundsP‚gTWinControl.UpdateS‚gTControl.GetActionv@ùgTControl.GetEnabled|@ùg!TControl.GetFloatingDockSiteClass~@ùgTControl.SetAutoSize‘@ùgTControl.SetDragMode’@ùgTControl.SetEnabled“@ùgTControl.SetName”@ùgTControl.SetBiDiMode—@ùgTControl.GetDragImagesŸ@ùgTControl.InitiateActionÚ@ùgmrCancel²}ç1gTControl.GetTextN@ùgTWinControl.GetHandleMgmrOk¯}ç1cdFormsfTFormåèšgTCustomForm.AlignControls6HɍgTCustomForm.CreateParams:HɍgTCustomForm.CreateWindowHandle;HɍgTCustomForm.CreateWnd<HɍgTCustomForm.DefineProperties>HɍgTCustomForm.DestroyHandle?HɍgTCustomForm.DestroyWindowHandle@HɍgTCustomForm.DoCreateBHɍgTCustomForm.DoDestroyCHɍgTCustomForm.GetClientRectHHɍgTCustomForm.GetFloatingIHɍgTCustomForm.LoadedMHɍgTCustomForm.NotificationNHɍgTCustomForm.PaintWindowPHɍgTCustomForm.ReadStateRHɍgTCustomForm.RequestAlignSHɍgTCustomForm.SetParentBiDiModeUHɍgTCustomForm.SetParentWHɍgTCustomForm.UpdateActionsXHɍgTCustomForm.ValidateRenameZHɍgTCustomForm.WndProc\HɍgTCustomForm.Resizing]HɍgTCustomForm.QueryInterfaceaHɍgTCustomForm.CreatešHɍgTCustomForm.CreateNew›HɍgTCustomForm.DestroyœHɍgTCustomForm.CloseQueryžHɍgTCustomForm.DefaultHandlerŸHɍgTCustomForm.SetFocus­HɍgTCustomForm.SetFocusedControl®HɍgTCustomForm.ShowModal°HɍgTCustomForm.WantChildKey±HɍgTCustomForm.AfterConstruction³HɍgTCustomForm.BeforeDestruction´Hɍg%TScrollingWinControl.AdjustClientRect|„a˜g&TScrollingWinControl.AutoScrollEnabled~„a˜g%TScrollingWinControl.AutoScrollInView„a˜g.TFormȼßëcdDialogsg ShowMessage…JücdComCtrlsf    TListViewÖ_®¿f TListColumnÂIf    TListItemÑíÿHg
.TListView¹3ŒfTCustomListView˜ägTCustomListView.CustomSortÏ)ù«gTCustomListView.GetSelected))ù«f
TListItems4ÞngTListItems.Addi'ógTListItem.SetCaption ácdStdCtrlsfTButtonÇC€ëfTEditJì®@fTLabel½¿ Äf    TCheckBoxEjb½g.TButtonª^=g.TEdit-ÀŒ’g.TLabel “~g
.TCheckBox(>@cdExtCtrlsfTPanel þœÝg.TPanelÒz/cdIISUnitg_Msg͔V&c5DocList€_¸ŽÏc5Systemc5SysInit4c5Windows6c5Messages<c5SysUtils@c5VariantsDc5ClassesFc5Graphics^c5Controls`c5Forms¦c5Dialogsöc5ComCtrlsúc5StdCtrls!c5ExtCtrlsEc5IISUnitQc& .TDocListForm€ÄŸÁ,* TDocListFormˆáË6o.  DocListFormæï1Po.L7.2F0(TDocListForm.CancelBtClick€ìKˆ2.!Self.!Sendercœ©.ÿ(TDocListForm.DocLVColumnClick€ìKRˆ2.!Self.!Sender!Column
cœµ.ÿ(TDocListForm.DocLVCompare€ìKˆ2.!Self.!Sender!Item1!Item2& !Data&"Compare&cœÅ.ÿ(TDocListForm.DocLVDblClick€ìK:ˆ2.!Self.!Sendercœá.ÿ(TDocListForm.Edit1Change€ìKaˆ2.!Self.!Sender i vfø v1fð .fà .4 .cœí.ÿ(TDocListForm.FormCreate€ìKTˆ2.!Self.!Sendercœ.ÿ(TDocListForm.FormDestroy€ìKˆ2.!Self.!Sendercœ.ÿ(TDocListForm.FormShow€ìKˆ2.!Self.!Sendercœ).ÿ(TDocListForm.OkBtClick€ìKqˆ2.!Self.!Sendercœ5.ÿ( Finalization€é`pÅ\!2cž(DocList€!2cžþG.±
FL„ˆ™    þØ&,Panel1
*á œE.ÿ,OkBt
"ñ œI.ÿ,CancelBt
"œM.ÿ,Panel2
*œQ.ÿ,DocLV
!œU.ÿ,Panel3
*1œY.ÿ,Edit1
$Aœ].ÿ,IndexLB
&Qœa.ÿ,    CheckBox1
(aœe.ÿ.    OkBtClick
è5ˆœi.ÿ. CancelBtClick
詈œm.ÿ.
FormCreate
舜q.ÿ. DocLVDblClick
èሜu.ÿ.DocLVColumnClick
赈œy.ÿ. DocLVCompare
èňœ}.ÿ. FormDestroy
舜.ÿ. Edit1Change
è툜….ÿ.FormShow
è)ˆœ‰.ÿ,
FormIDListqœ.ÿcD0€ÿÿÿ @E2lÙX`Ý…¤    ’xPanel1|OkBt€CancelBt„Panel2ˆDocLVŒPanel3Edit1”IndexLB˜    CheckBox1        OkBtClick CancelBtClick
FormCreate DocLVDblClickDocLVColumnClick DocLVCompare FormDestroy Edit1ChangeFormShow TDocListForm TDocListFormXlDocListǀ¤ÃSVW‹ù‹Ø‹Ç苳ˆ‰F ¹3ҋÆè_^[ÃU‹ìjjSVW‹ñ‹Ø3ÀUh—dÿ0d‰ ‹ƒˆƒx u‹E‹P ‹F è‹U‰ë?Mü‹ƒˆ‹P J‹E‹@‹8ÿW ‹EüPMø‹ƒˆ‹P J‹F‹ÿS ‹EøZè‹U‰3ÀZYYd‰hžEøºèÃéëë_^[YY] S‹Ø‹ƒˆè…Àt    3ҋÃè[ÃU‹ì¹jjIuùSVW‹Ø3ÀUh´dÿ0d‰ ‹ƒˆ‹ÿ’苃œ‹ÿRH…ÀŒ@‰Eô3öU싃èƒ}ìt3Mè‹Ö‹ƒœ‹8ÿW ‹EèPU䋃è‹EäZè…ÀŽÂ‹ƒˆ‹€Œè‰EðMà‹Ö‹ƒœ‹8ÿW ‹Uà¸Ðè‰EüM܋֋ƒœ‹8ÿW ‹E܉E؋E؅Àtƒè‹‰EøEÔPMЋ֋ƒœ‹8ÿW ‹EЋMüIºè‹UԋEðèEÌPMȋ֋ƒœ‹8ÿW ‹EȋMø+Müƒé‹UüƒÂè‹ŰEð‹@‹ÿQ8FÿMô…íþÿÿ‹ƒˆ3҉P ¹3Òè3ÀZYYd‰h»EȺèEܺèEäèEèèEìèÃéëÆ_^[‹å]ðÿÿÿÿ#@#S‹Øjjj‹ÃèP財艃œ[ˀœèˀˆ3҉P ÃU‹ìjS‹Ø3ÀUhndÿ0d‰ ‹ƒˆè…Àu)‹ƒ˜‹ÿ’Ü„ÀuUü¸ˆè‹Eüèë
ǃ¤3ÀZYYd‰huEüèÃéëð[Y]ðÿÿÿÿ\*gxÇdxk”j‡eöNU‹ì3ÀUh%dÿ0d‰ ÿ3ÀZYYd‰h,Ãéëø]Ã-Ãm‰ ™™ ™™™ô
 NêìàÜb²PÀÂÆ–JÐLÖØfdhŠt¼xŒ¾ŽÈ’”ÌʘҚœ‚„†ˆîªj¬®°ln´¶prvÄz|~€âðòÔ¸ºÎÚÞäæè ™þ5 ©("á(µ.Å&$í$)8M59=A $™¨  © µV.  Å$Å@B‚B$Å  á5 í0íx P  26í
 š(V(^ í... F ¢ 8Z
\ 0
) 55"<5
Uø25. Z AA¥A  ¥ X\I  8*~V
D4Ž(@J`rèÈ&$,B*䑸’.0¦ “œØ
  "$&5*(â(©,*X*.,À,á0.ˆ.µ20b0Å62p286̝ 6í:8”"8)<:֝$:&D¡L­±X¹½bÁbR¬
ýft€¸ÚTýf    MýhºÉÍnÑnÕnÙpÝp\ýx®‚ý€°å鈠   ‰ýŒæñõ”ù˜ý˜˜    ýœXœýž)Rý¢X²
ý¢ª¬®°üDý¦"ý¦X`ý°ÀH"ýÆH&ýÆH@ýÆHBýÆHJýÆ!%ÌýÐ-1Ö9=â1ýæAö”d©@­­þµ`p¹Á
Á.þ¹JþÅ€pÉ8Ñ8ÉPþÉzÉøþÑøþá@åå6þí`ppñDù”ùuþñÑþ@Pþ@!!þ)@--þ5`9,9nþ9œ9°þA  a