Hong-Dell\Hong
2024-07-04 630dbb00b682c2e5ebee6ec666694441230b29cf
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
41
42
43
44
45
46
47
48
49
50
51
9Û#q4M#äŸSortMemoþÙ?–<r SortMemo.dfmo4Mp SortMemo.paso4MdSystemfTObject»<úÎfBooleanúegTObject.Equalsô\ggTObject.GetHashCodeõ\ggTObject.ToStringö\ggTObject.Dispatchú\ggTObject.NewInstanceü\ggTObject.FreeInstanceý\gfInteger    ™fÂf UnicodeStringOª]ÏfstringOª]ÏgExitgFalsesɚøgTruevɚøg
@UStrEqualé`pÅg @UStrArrayClrüŸg@UStrClr\ª«>g@HandleFinallyé`pÅgBreakg TObject.Freeá\gg    @UStrCatNé`pÅcdSysInitcdWindowsg PostMessageÐU«gWA_CLICKACTIVE²}ç1cdMessagesg WM_ACTIVATE¾}ç1cdSysUtilscdVariantscdClassesf TStringListᧅägTComponent.UpdateRegistryÙ§šTgTComponent.WriteStateݧšTgTComponent.SafeCallExceptionö§šTgTPersistent.Assignòg°Ç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Ú@ùgTControl.GetTextN@ùgTControl.SetTextO@ùgmrOk¯}ç1gmrCancel²}ç1gTWinControl.GetHandleMcdFormsfTFormåèšf TCloseAction¿¬þ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ȼßëgcaNone8Gª‘gcaFree>Gª‘cdDialogsg ShowMessage…Jüg
MessageDlgÎ%0Öf TMsgDlgType²ÇnÇgmtConfirmation4qlZf
TMsgDlgBtnUaKPgmbYesÎ
IãgmbCancel×
IãcdComCtrlsf    TListViewÖ_®¿f    TListItemÑíÿHg
.TListView¹3Œf
TListItems4ÞngTListItems.GetCounta'ógTListItems.GetItemc'ógTListItems.Addi'ógTListItem.SetCaption áfTCustomListView˜ägTCustomListView.GetSelected))ù«gTListItem.DeleteácdStdCtrlsf    TComboBoxÀüÕfTLabel½¿ ÄfTButtonÇC€ëg
.TComboBox£Ðô&g.TLabel “~g.TButtonª^=cdExtCtrlsfTPanel þœÝg.TPanelÒz/cdButtonscdIISUnitg_Msg͔V&c5SortMemo€_¸ŽÏc5Systemc5SysInit0c5Windows2c5Messages8c5SysUtils<c5Variants>c5Classes@c5GraphicsRc5ControlsTc5Formsœc5Dialogsòc5ComCtrlsc5StdCtrls5c5ExtCtrlsQc5Buttons]c5IISunitac&.TSortMemoForm€Ìmé(* TSortMemoFormˆé™*—*  SortMemoFormæ÷ÿC—*N7.2F,(TSortMemoForm.Button1Click€º?/aˆ.*!Self*!Sender i iContentfø iNamefð 
MemoExitstfî .cœ½*ÿ(TSortMemoForm.Button2Click€º?/ˆ.*!Self*!SendercœÝ*ÿ(TSortMemoForm.EraseBtClick€º?/Qˆ.*!Self*!Sendercœé*ÿ(TSortMemoForm.Button4Click€º?/ˆ.*!Self*!Sendercœõ*ÿ(TSortMemoForm.FormClose€º?/‘ˆ.*!Self*!Sender"Actionfð i NeedSavefî iContentføcœ*ÿ(TSortMemoForm.FormCreate€º?/Tˆ.*!Self*!Sendercœ*ÿ(TSortMemoForm.MemoLVSelectItem€º?/±ˆ.*!Self*!Sender!Item!Selected& i Sføcœ)*ÿ( Finalization€é`pÅ\!.cž(SortMemo€!.cžþG*
FP±„ˆÁ­    þØ&,Panel1
&á œI*ÿ,Panel2
&ñ œM*ÿ,    ComboBox1
 œQ*ÿ,MemoLV
œU*ÿ,MsgLb
"!œY*ÿ,AddBt
$1œ]*ÿ,SaveBt
$Aœa*ÿ,EraseBt
$Qœe*ÿ,ExitBt
$aœi*ÿ.
FormCreate
舜m*ÿ.MemoLVSelectItem
è)ˆœq*ÿ.    FormClose
舜u*ÿ. Button1Click
轈œy*ÿ. Button2Click
è݈œ}*ÿ. EraseBtClick
è鈜*ÿ. Button4Click
èõˆœ…*ÿ, ContentList qœ‰*ÿ,
MemoIDList œ*ÿ, MemoNameList ‘œ‘*ÿ, ResoureMemo ¡œ•*ÿcD,€ÿÿÿ @l…$X`Ýc´    qxPanel1|Panel2€    ComboBox1„MemoLVˆMsgLbŒAddBtSaveBt”EraseBt˜ExitBt
FormCreateMemoLVSelectItem    FormClose Button1Click Button2Click EraseBtClick Button4Click TSortMemoForm TSortMemoFormXlSortMemoU‹ì3ÉQQQQQQQQSVW‹Ø3ÀUh¾dÿ0d‰ ‹ƒ€‹ÿ’Ü@t>‹ƒ€‹ÿ’܋ЍMü‹ƒœ‹0ÿV ‹ƒ€‹ÿ’܋ЍMø‹ƒ¤‹0ÿV ëIU싃€èƒ}ìuUè¸Øè‹EèèéñUü‹ƒ€èUø¸ôèÆE÷‹ƒ„‹€ŒèH…À|p@‰Eð3ö‹ƒ„‹€Œ‹Öè‹@ ‹UüèuD‹ƒ„‹€Œ‹Öè‹@Mä3ҋ8ÿW ‹Eä‹UøèuUภè‹EàèëRFÿMðu–€}÷uF‹ƒ„‹€Œè‹ð‹Uü‹Æè‹F‹Uø‹ÿQ8ƒÊÿ‹ƒ€‹ÿ‘à3ҋƒ€è3ÀZYYd‰hōEàºèEìèEøºèÃéëÖ_^[‹å]ðÿÿÿÿˊ8eQ;ŠŠgQ¹[°ÿÿÿÿêLˆ8eQ°ÿÿÿÿ;ŠŠñ]X[(Wǀ¤ÃU‹ìjjS‹Ø3ÀUhŒdÿ0d‰ ‹ƒ„è…ÀtJjUü¸¤è‹Eü· ¸²èƒøt%‹ƒ„èèUø¸Èè‹Eøè3ÀZYYd‰h“EøºèÃéëë[YY]ðÿÿÿÿ/f&T*Rd–dk;ŠŠ?    °ÿÿÿÿ*Rd–Œ[bǀ¤ÃU‹ìjjjjjjjSVW‰Mø‹Ø3ÀUhPdÿ0d‰ ÆE÷‹ƒ¨‹ÿR‹ð‹ƒ„‹€Œè;ðt    ÆE÷銋ƒ¨‹ÿRH…À|z@‰Eð3ö‹ƒ„‹€Œ‹Öè‹@Mì3ҋ8ÿW ÿuìhl‹ƒ„‹€Œ‹Öèÿp EüºèMè‹Ö‹ƒ¨‹8ÿW ‹Eè‹UüètÆE÷ëFÿMðuŒƒ»¤”À"E÷t-jU一è‹Eä·  ²èƒøu‹EøÆë‹EøÆ‹ƒ¨è3ÀZYYd‰hWEäºèEüèÃéëã_^[‹å]ðÿÿÿÿ-->°ÿÿÿÿ\    gîO9e*g2QX[,/f&T>eÄh2QX[    S‹Øjjj‹ÃèP財艃¨[ÃU‹ìjjjjjjjSVW‹ñ‹Ø3ÀUh/dÿ0d‰ ƒÊÿ‹ƒ€‹ÿ‘à3ҋƒ€èMô‹F3ҋ8ÿW ‹EôPUð¸Lè‹UðXètMì‹F3ҋ8ÿW ƒ}ìu‹V ‹ƒ€èë|Mè‹F3ҋ8ÿW ÿuèhdÿv Eüº苃€‹€œ‹ÿRH…À|A@‰Eø3öM䋃€‹€œ‹Ö‹8ÿW ‹Uä‹Eüèu‹Ö‹ƒ€‹ÿ‘àëFÿMøuÅ3ÀZYYd‰h6EäºèEüèÃéëã_^[‹å]°ÿÿÿÿêLˆ8eQ°ÿÿÿÿ-->U‹ì3ÀUh%dÿ0d‰ ÿ3ÀZYYd‰h,Ãéëø]Ã-Ãmí ­­ ±­­­ì
 HâäØÔVªJ¸º¾ŠDÈFÎÐZX\~h´l€¶‚À„†ˆÄŒʎvxz|æ¢^¤¦¨`b¬®dfj¼nprtÚèḛ̂²ÆÒÖÜÞà ­þ"). ½&Ý&é&õBYEIM ±±&­ž" ½,½Æ’½
eô&’½
e*<"*0"½
eô>!%R”½$&$ (² Ý éé"-é
eéö -
1é
eôé$ (Ž õ :Pl*& .6"N
eö<,$& (¦ š 4N
P )8)H”2)
e"F”.) .z"N)$& (x EE¹E ( ¹ Šd½
@"<@(*
8š*ð
 &")0J *ÆND,–:ð
J  î&$L"x J8F ò
9‘Å’*2Ùœ“šú±±±±±±
±  ±"±$±&*(A±().*]±*0.Ú±.½20Z±0Ý42°±2é64º±4õ86б 6±"@±$B±&D±(FµNÁÅZÉ^Í`Ñ`Õb96 ýfjl¦q¥L²ýjlŠøúy‘9P
ýt~¨u    D
ý†Šœèø6ý†è:ýŠø \
ýŠ ø‘ ‚
ýŠ¢øy‘"ýœL`ý¢áå°íñº)‰ý¾Æ LýÆùýР   Ú ÚÞàâLœýèô•ý5!%AB"ýMB&ýMB@ýMBBýMBJýM-1Y5Y9]=eAi9‚ý•EÁ”p½à@pÁ@Á þÁuÉaÁ•þÉ•þÁñÉñÉ    þÙmÙÁþÁ9þÝ@ááþé`í0í˜þí˜í¸þõ@ùùþ€8pN؁þQþqµþ@!!Pþ)À8p-L5L5Õþ=E-þ=þ-=-1þ=1þE  a