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
| 9 ¦|1J#ä DocListþÙ? <r DocList.dfm°sCp DocList.pasø? dSystem fTObject»<úÎfInteger fÂgTObject.Equalsô\ggTObject.GetHashCodeõ\ggTObject.ToStringö\ggTObject.Dispatchú\ggTObject.NewInstanceü\ggTObject.FreeInstanceý\gfstringOª]Ïf UnicodeStringOª]Ïg @UStrArrayClrüg@HandleFinallyé`pÅgPosFþqgPosPÓ×úgLength g@UStrLeno>G¤D gCopy g @UStrCopy%E fBooleanú efPLongintËÉg@UStrClr\ª«>g TObject.Freeá\ggExit cdSysInit cdWindows g PostMessageÐU«gWA_CLICKACTIVE²}ç1cdMessages g WM_ACTIVATE¾}ç1cdSysUtils g CompareTextÿ\®cdVariants cdClasses f TStringListá§
ägTComponent.UpdateRegistryÙ§TgTComponent.WriteStateݧTg TComponent.SafeCallExceptionö§TgTPersistent.Assignòg°Çf
| TComponent
¼fTCollectionItemrS±&gTCollectionItem.GetIndexsƾfTStringsl
| ©g .TStringListÄ{c6gTStringList.Create È|cdGraphics cdControls gTWinControl.AssignToÄgTWinControl.CanAutoSizeÉgTWinControl.CanResizeÊg TWinControl.ConstrainedResizeÌgTWinControl.CreateHandleÏg#TWinControl.CustomAlignInsertBeforeÓg TWinControl.CustomAlignPositionÔgTWinControl.DestroyWndØg!TWinControl.DockReplaceDockClientÛgTWinControl.GetClientOriginèg TWinControl.GetControlExtentsêg TWinControl.GetDeviceContextëg TWinControl.SetParentBackground g#TWinControl.SetParentDoubleBuffered gTWinControl.ShowControlg+TWinControl.UpdateControlOriginalParentSizegTWinControl.InvalidateGgTWinControl.RepaintMgTWinControl.SetBoundsPgTWinControl.UpdateSgTControl.GetActionv @ùgTControl.GetEnabled| @ùg!TControl.GetFloatingDockSiteClass~ @ùgTControl.SetAutoSize @ùgTControl.SetDragMode @ùgTControl.SetEnabled @ùgTControl.SetName @ùgTControl.SetBiDiMode @ùgTControl.GetDragImages @ùgTControl.InitiateActionÚ @ùgmrCancel²}ç1gTControl.GetTextN @ùgTWinControl.GetHandleMgmrOk¯}ç1cdForms fTFormåègTCustomForm.AlignControls6HÉgTCustomForm.CreateParams:HÉg TCustomForm.CreateWindowHandle;HÉgTCustomForm.CreateWnd<HÉg TCustomForm.DefineProperties>HÉgTCustomForm.DestroyHandle?HÉg TCustomForm.DestroyWindowHandle@HÉgTCustomForm.DoCreateBHÉgTCustomForm.DoDestroyCHÉgTCustomForm.GetClientRectHHÉgTCustomForm.GetFloatingIHÉgTCustomForm.LoadedMHÉgTCustomForm.NotificationNHÉgTCustomForm.PaintWindowPHÉgTCustomForm.ReadStateRHÉgTCustomForm.RequestAlignSHÉg TCustomForm.SetParentBiDiModeUHÉgTCustomForm.SetParentWHÉgTCustomForm.UpdateActionsXHÉgTCustomForm.ValidateRenameZHÉgTCustomForm.WndProc\HÉgTCustomForm.Resizing]HÉgTCustomForm.QueryInterfaceaHÉgTCustomForm.CreateHÉgTCustomForm.CreateNewHÉgTCustomForm.DestroyHÉgTCustomForm.CloseQueryHÉgTCustomForm.DefaultHandlerHÉgTCustomForm.SetFocusHÉg TCustomForm.SetFocusedControl®HÉgTCustomForm.ShowModal°HÉgTCustomForm.WantChildKey±HÉg TCustomForm.AfterConstruction³HÉg TCustomForm.BeforeDestruction´HÉg%TScrollingWinControl.AdjustClientRect|ag&TScrollingWinControl.AutoScrollEnabled~ag%TScrollingWinControl.AutoScrollInViewag.TFormȼßëcdDialogs g ShowMessage
JücdComCtrls f TListViewÖ_®¿f TListColumnÂIf TListItemÑíÿHg
| .TListView¹3fTCustomListViewägTCustomListView.CustomSortÏ)ù«gTCustomListView.GetSelected))ù«f
| TListItems4ÞngTListItems.Addi'ógTListItem.SetCaption ácdStdCtrls fTButtonÇCëfTEditJì®@fTLabel½¿ Äg.TButtonª^=g.TEdit-Àg.TLabel ~cdExtCtrls fTPanel þÝg.TPanelÒz/cdIISUnit g_MsgÍV&c5DocList _¸Ïc5System c5SysInit 4c5Windows 6c5Messages <c5SysUtils @c5Variants Dc5Classes Fc5Graphics ^c5Controls `c5Forms ¦c5Dialogs öc5ComCtrls úc5StdCtrls !c5ExtCtrls =c5IISUnit Ic& .TDocListForm Z&ªÑ* * TDocListForm wRÌ, DocListFormæ
¸å,J7.2F . (TDocListForm.CancelBtClick ¥rá 0,!Self , !Sender c¡ ,ÿ( TDocListForm.DocLVColumnClick ¨rá R0,!Self ,!Sender !Column
| c ,ÿ(TDocListForm.DocLVCompare ©rá 0,!Self ,!Sender !Item1 !Item2& !Data& "Compare& c½ ,ÿ(TDocListForm.DocLVDblClick §rá :0,!Self ,!Sender cÙ ,ÿ(TDocListForm.Edit1Change «rá a0,!Self ,!Sender i vf ø v1f ð .f à . 2 . cå ,ÿ(TDocListForm.FormCreate ¦rá T0,!Self ,!Sender c ,ÿ(TDocListForm.FormDestroy ªrá 0,!Self , !Sender c ,ÿ(TDocListForm.FormShow ¬rá 0,!Self , !Sender c! ,ÿ(TDocListForm.OkBtClick ¤rá !0,!Self ,!Sender c- ,ÿ( Finalization é`pÅ \!0 c(DocList !0 cþG ,a
| FL þØ& ,Panel1
| (á = ,ÿ,OkBt
| "ñ A ,ÿ,CancelBt
| "E ,ÿ,Panel2
| (I ,ÿ,DocLV
| !M ,ÿ,Panel3
| (1Q ,ÿ,Edit1
| $AU ,ÿ,IndexLB
| &QY ,ÿ. OkBtClick
| è-] ,ÿ. CancelBtClick
| è¡a ,ÿ.
| FormCreate
| è e ,ÿ. DocLVDblClick
| èÙi ,ÿ.DocLVColumnClick
| èm ,ÿ. DocLVCompare
| è½q ,ÿ. FormDestroy
| èu ,ÿ. Edit1Change
| èåy ,ÿ.FormShow
| è!} ,ÿ,
| FormIDList a ,ÿcD . ÿÿÿ @ E 0 l9X ` Í u ¤ x Panel1| OkBt CancelBt Panel2 DocLV Panel3 Edit1 IndexLB OkBtClick CancelBtClick
| FormCreate DocLVDblClick DocLVColumnClick DocLVCompare FormDestroy Edit1Change FormShow TDocListForm TDocListFormX l DocList Ǥ ÃSVWùØÇè ³ F ¹ 3ÒÆè _^[ÃUìj j SVWñØ3ÀUh dÿ0d x uEP F è Uë?Mü P JE@8ÿW EüPMø P JFÿS EøZè U3ÀZYYdh Eøº è Ãé ëë_^[YY] SØ è
Àt 3ÒÃè [ÃUì¹ j j IuùSVWØ3ÀUh´ dÿ0d ÿè ÿRH
À @Eô3öUì è }ì t3MèÖ 8ÿW EèPUä è EäZè
À è EðMàÖ 8ÿW Uà¸Ð è EüMÜÖ 8ÿW EÜEØEØ
Àtè EøEÔPMÐÖ 8ÿW EÐMüIº è UÔEðè EÌPMÈÖ 8ÿW EÈMø+MüéUüÂè UÌEð@ÿQ8FÿMô
íþÿÿ 3ÒP ¹ 3Òè 3ÀZYYdh» EȺ è Eܺ è Eäè Eèè Eìè Ãé ëÆ_^[å]à ° ÿÿÿÿ # @ # SØj jjÃè Pè ²¡ è [à è à 3ÒP ÃUìj SØ3ÀUh\ dÿ0d è
ÀuUü¸t è Eüè ë
| Ǥ 3ÀZYYdhc Eüè Ãé ëð[Y]à ° ÿÿÿÿ \*gxÇdxkjeöN Uì3ÀUh% dÿ0d ÿ 3ÀZYYdh, Ãé ëø]Ã- Ãm
ô
| NêìàÜb²PÀÂÆJÐLÖØfdht¼x¾ÈÌÊÒîªj¬®°ln´¶prvÄz|~âðòÔ¸ºÎÚÞäæè Þ- ¡( "Ù(.½&$å$!8E159 $¨ ¡ V. ½$½@BB$½ Ù- å0åx P 26å
| ( V(^ å... F ¢ 8Z
| \ 0
| ! --"-
| Mø2-. V 999 XZù
| 8*~V
| D 4(@J`rèÈ&$, *àö , . ý ¤ Ô
| " $- (&à &¡ *(V ( ,*¾ *Ù ., , 0.` .½ 40n 0 64Ê 4å 86 6! :8Ô" 8$ B J¥ © V± µ `¹ `R¬
| ýdr~¶ØT ýd Mýf¸Á Å lÉ lÍ lÑ nÕ n\ýv¬ý~®Ý á ýäé í ñ õ ù ýXý)Rý X²
| ý ¨ª¬®üDý¤"ý¤X`ý® ¾H"ýÄH&ýÄH@ýÄHBýÄHJýÄ ÊýÎ% ) Ô1 5 à9 ôd¡@ ¥ ¥þ` p ±¹
| ¹.þ±Jþ½pÁ8É8ÁPþÁzÁøþÉøþÙ@ ÝÝ6þå`p péDññuþéÑþ @ Pþ@ þ!@ % %þ-` 1,1Jþ1x1þ9 a
|
|
