Prvni verze
This commit is contained in:
12
_custom/Gornicky/winSvc/mainSvcStart.inc
Normal file
12
_custom/Gornicky/winSvc/mainSvcStart.inc
Normal file
@ -0,0 +1,12 @@
|
||||
datMod.LogInfo (Quick.Logger.etInfo, 'Start sluzby GOR downloadPDF - inverval 10 minut...');
|
||||
{$IFDEF DEBUG}
|
||||
WriteLn ('Start sluzby GOR downloadPDF - inverval 10 minut...');
|
||||
{$ENDIF}
|
||||
gorDownPDFThr:= THeoGorDownPDFThread.Create (ThreadTerminated, self);
|
||||
if (gorDownPDFThr.Started) then
|
||||
begin
|
||||
datMod.LogInfo (Quick.Logger.etInfo, ' OK');
|
||||
{$IFDEF DEBUG}
|
||||
WriteLn (' OK');
|
||||
{$ENDIF}
|
||||
end;
|
||||
Reference in New Issue
Block a user