Viewing file:  uBaseModule.dcu (5.01 KB) -rw-rw-rw-
Select action/file-type:
 (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) |
K B - uBaseModule <puBaseModule.pasϤEB dSystem fTObjecty{fBoolean8bfByte&f
UnicodeString, fstring, g@AbstractError`pgTObject.EqualsKgTObject.GetHashCodeLgTObject.ToStringMgTObject.SafeCallExceptionNgTObject.AfterConstructionOgTObject.BeforeDestructionPgTObject.DispatchQgTObject.DefaultHandlerRgTObject.NewInstanceSgTObject.FreeInstanceTg.TObjectWg @UStrAddRef9ug
@UStrArrayClrg@HandleFinally`pg@UStrClr\>gTObject.Create5gFalse*g @ClassCreate;{g@AfterConstructionWqg TObject.Free6gTObject.DestroyUg@BeforeDestruction:g
@ClassDestroyXcdSysInit cd
gnugettext cdSystem.Classes fTList# |g.TList߉cd Vcl.ExtCtrls fTPanelqW"cd Vcl.StdCtrls fTLabel"dcd Vcl.Buttons fTBitBtn)pPgTBitBtn.SetGlyphYe&gTBitBtn.GetGlyphZe&cdSystem.SysUtils cduTools ftLogTypeBCcd uServices fTServiceStatusjgGetServiceStatusU?g ssRunningg ssStoppedceuMain gfMain8Ng
TfMain.AddLog=ce Vcl.ImgList gTCustomImageList.GetBitmap$<c5 uBaseModule _c5System 5SysUtils Zc5Classes Dcc5SysInit @c5
GnuGettext Bc5Classes Dc5ExtCtrls Jc5StdCtrls Nc5Buttons Rc5SysUtils Zc5uTools \c5 uServices `c& .tBaseModule 8ݟ * tBaseModule dM(tBaseModule.Start
!Self c (tBaseModule.Stop
!Self c (tBaseModule.Admin
!Self c (tBaseModule.UpdateStatus
!Self c (tBaseModule.ServiceInstall
!Self c ( tBaseModule.ServiceUnInstall
!Self c 7.2F 5uMain jc(tBaseModule.AddLog !Self !modulef !logf !LogType& c (tBaseModule.CheckIsService !Self ! ServiceNamef
ServiceStatus c (tBaseModule.Create !Self
!. !
pbbService ! pStatusPanel& 0! pPIDLabel& (!
pPortLabel& !pStartStopButton& ! pAdminButton& c (tBaseModule.Destroy X1 !Self !. c ( tBaseModule.SetServiceButton !Self !isActive c ( Finalization `p ! c( uBaseModule ! cG !F^ " P %? , bbService ,pStatus ,lPID ,lPort ,
bStartStop ( ,bAdmin 0 , AutoStart 8 ,oldIsRunningByte : , isRunning < , isService > ,PIDList @ ,
ModuleName H .Start .Stop .Admin . UpdateStatus .ServiceInstall .ServiceUnInstall
.SetServiceButton .CheckIsService
.AddLog /Create 0Destroy 1 c@ D A lX p , $ bbService pStatus lPID lPort
bStartStop bAdmin AutoStart oldIsRunningByte isRunning isService PIDList $
ModuleName 2 W B # B f B D a M tBaseModule% Start Self $ Stop Self % Admin Self , UpdateStatus Self . ServiceInstall Self 0 ServiceUnInstall Self B SetServiceButton Self isActive C CheckIsService Self ServiceName T AddLog Self module log LogType Create Self
pbbService pStatusPanel pPIDLabel
pPortLabel pStartStopButton pAdminButton ' Destroy Self tBaseModuleX uBaseModule UMUE E 3Uh\ d0d EP MU 3ZYYdhc E YY] UQVUE 3UhO d0d E ,V 3ZYYdhV E ^Y]USVWt ڋ G G G wEGEG EGE GEGG G DŽt d _^[] SV ڋF "Ӌ ~ ^[SVڋ3ҋF t!F ȡ L u!F ȡ L
^[ Ã- m) & "$ "T*L&P P"T,T$*
8**F&20("&"("6":">"> *: 0* ^(* T(L,P&P(T4T2, "4 (( ln* , ( d". , 4H
0~6. <8:> VXl$rXl$r
2 4 6 8 < > B D H J La
|