9 ð PznX
kp OldCaseInfoþÙ? <rOldCaseInfo.dfmM\UpOldCaseInfo.pas¥M\U dSystem fstringOª]Ïf UnicodeStringOª]ÏfTObject»<úÎfBooleanúefInteger fÂfChari©?1gTObject.Equalsô\ggTObject.GetHashCodeõ\ggTObject.ToStringö\ggTObject.Dispatchú\ggTObject.NewInstanceü\ggTObject.FreeInstanceý\ggTruevÉøg
|
UTF8EncodeÓøÇ,g
|
UTF8Encodeê'Tf
|
AnsiStringajbgFalsesÉøgExit gPosFþqgPosPÓ×úg@UStrAddRefÙI§ßg @LStrCatNé`pÅg @UStrFromLStr.Ççg @UStrCatNé`pÅg
|
@UStrEqualé`pÅg @UStrCat3²î g@UStrAsgÔB¯,g @UStrArrayClrüg@LStrClr\ª«>g @LStrArrayClrüg@HandleFinallyé`pÅg@UStrClr\ª«>gContinue gTObject.Freeá\ggCopy g @UStrCopy%E gLength g@EnsureUnicodeStringF$lÑ|
|
ì(g@UStrLeno>G¤DfPointerïfPWord!õýfWordNùg@InternalUStrFromLStrFM fPLongintËÉgInc gBreak f PWideCharçèÙúfLongBool;»ég @UStrToPWCharÅÍÃÿg @UStrLAsgÔB¯,g@IsClassõºk&g @CallDynaInsté`pÅg@UStrCatÔB¯,gMkDirISÎg@_IOTesté`pÅcdSysInit cdWindows gMoveFile´ {gWHEEL_DELTAç1g SB_LINEUP¬}ç1gSB_LINEDOWN¯}ç1cdMessages f TWMMouseWheel3g WM_MOUSEWHEELKøò1g
|
WM_VSCROLLlõò1cdSysUtils gIntToStrè±Xzg
|
FileExists$ágFormatÉf TEncoding´í·gTEncoding.GetUTF8ä¨Pg StringReplaceVy2>f:15éÙXgrfReplaceAllb.×ëg
|
RenameFileBüvm A/gExtractFileNameY±LgStrToIntÞ¬
|
Ëg UpperCaseÆ[gDirectoryExists$ácdVariants cdClasses fTShiftState£cìfTStringListá§
ägTComponent.UpdateRegistryÙ§TgTComponent.WriteStateݧTgTComponent.SafeCallExceptionö§TgTPersistent.Assignòg°ÇfTStringsl
|
©g.TStringListÄ{c6gTStringList.Create È|gTComponent.FindComponentë§Tf
|
TComponent
¼gTComponent.GetComponentCount¹§TgTComponent.GetComponent¸§TgTStrings.SetStrictDelimiter¬*¾gTStrings.SetDelimiter¤*¾gTStrings.SetDelimitedText*¾cdGraphics fTGraphicQ\r/fTPenìxE©g TPen.SetColorZAgclBlueÂ^<g TPen.SetWidthZAcdControls gTWinControl.AssignToÄgTWinControl.CanAutoSizeÉgTWinControl.CanResizeÊgTWinControl.ConstrainedResizeÌgTWinControl.CreateHandleÏg#TWinControl.CustomAlignInsertBeforeÓgTWinControl.CustomAlignPositionÔgTWinControl.DestroyWndØg!TWinControl.DockReplaceDockClientÛgTWinControl.GetClientOriginègTWinControl.GetControlExtentsêgTWinControl.GetDeviceContextëgTWinControl.SetParentBackgroundg#TWinControl.SetParentDoubleBufferedgTWinControl.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Ú@ùgTControl.SetTextO@ùfTControlwü*agTControl.SetLeft@ùgTControl.SetTop"@ùgTControl.SetVisible#@ùfTCustomListControlîæcgTControl.SetHeight@ùgTControl.SetWidth$@ùgTControl.SetAlign @ùfTAlignûP`galClient9Nóf TDragModep|éògdmAutomaticì%ç
fTWinControlõ`ùægTControl.WMMouseWheel7@ùgTControl.Performà@ùgTControl.GetTextN@ùfTCaptionOª]ÏgmrOk¯}ç1gmrCancel²}ç1cdForms fTFormåèf
|
TScrollBoxðy?fTCloseAction¿¬þ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.CreateHÉgTCustomForm.CreateNewHÉgTCustomForm.DestroyHÉgTCustomForm.CloseQueryHÉgTCustomForm.DefaultHandlerHÉgTCustomForm.SetFocusHÉgTCustomForm.SetFocusedControl®HÉgTCustomForm.ShowModal°HÉgTCustomForm.WantChildKey±HÉgTCustomForm.AfterConstruction³HÉgTCustomForm.BeforeDestruction´HÉg%TScrollingWinControl.AdjustClientRect|ag&TScrollingWinControl.AutoScrollEnabled~ag%TScrollingWinControl.AutoScrollInViewag.TFormȼßëg.TScrollBoxÓMXgScreen']»fTScreen'D»gTScreen.SetCursorGYSgApplication=;îfTApplication/ÕúígTApplication.ProcessMessageséõfTScrollingWinControlHdL fTControlScrollBaraèá}gTControlScrollBar.SetVisible¬÷cdDialogs gShowMessage
JücdExtCtrls f TNotebookVÛfTPanel þÝf TSplitterN^8fTTimer×rg
|
.TNotebookwm4-g.TPanelÒz/g
|
.TSplitter1Ü;g.TTimerb«PÞgTTimer.SetEnabled©÷$fTCustomPanel([WgTCustomPanel.Createx{l§fTShapeX¾Ég.TShape;§ig TShape.CreateÞÞ¯gTNotebook.SetActivePage¾¹kscdStdCtrls f TGroupBox© &fTMemoÏ#7:fTEditJì®@g
|
.TGroupBoxôÒg.TMemo²÷g.TEdit-ÀfTCustomListBoxÒfLucdCheckLst f TCheckListBoxé®mg.TCheckListBoxÌk¿gTCheckListBox.SetCheckedÏ¢gTCheckListBox.GetCheckedÏ¢cdButtons fTBitBtnåg.TBitBtnÿgê6cdComCtrls f TListViewÖ_®¿g
|
.TListView¹3fTCustomListViewägTCustomListView.GetSelected))ù«f TListItemÑíÿHcdIISUnit g_MsgÍV&gPosEnd¹Ø¨gSplitStringfËx#g_DelTree
JücdIIS_File2Web g
|
dnFile_Get®&ÙÆg HttpErrorø;Ìf
|
THttpErrorêÕêËgExecuteUnZip/BÑcdIIS_ImageProcess g DpiResize3|H¦cdHTTPApp g
|
HTTPEncodecdSBWinCertStorage fTElWinCertStorageòæág.TElWinCertStorageÕVÄ3cdSBX509 fTElX509Certificate/0 cdSBCustomCertStorage fTElMemoryCertStorageþÄ#Ðg.TElMemoryCertStorageá"cdSBSimpleSSL cd SBHTTPSClient fTElHTTPSClientt"Ôg.TElHTTPSClientWöi&cdEnImgScr fTImageScrollBox~úWg.TImageScrollBoxòQØ©gTImageScrollBox.SetAntiAliasedeðgTImageScrollBox.LoadFromFileðgTImageScrollBox.GetGraphicbðgTImageScrollBox.CreateðgTImageScrollBox.SetZoomMode`ðf TZoomModeS|ã g
|
zmFullPageÏ%ágTImageScrollBox.SetMouseModepðf
|
TMouseMode:gmmUseräg#TImageScrollBox.GetDisplayedGraphicdðgzmFitToPageÛ%ácdIniFiles fTIniFileñ`Ä\fTCustomIniFile²eôg .TIniFileÔ4¢®gTCustomIniFile.CreateDÒzcdSBSocket c5OldCaseInfo _¸Ïc5System c5SysInit tc5Windows vc5Messages c5SysUtils c5Variants ¤c5Classes ¦c5Graphics Èc5Controls Ôc5Forms uc5Dialogs Ec5ExtCtrls Mc5StdCtrls c5CheckLst c5Buttons Ác5ComCtrls Íc5IISUnit åc5IIS_File2Web ùc5IIS_ImageProcess c5HTTPApp c5SBWinCertStorage c5SBX509 )c5SBCustomCertStorage 1c5SBSimpleSSL =c5 SBHTTPSClient Ac5EnImgScr Mc5inifiles c5SBSocket c%ISBName hAP5
|
D° ÿÿÿÿ
|
|