<div dir="ltr">Hi,<div><br></div><div style>I'm reading this article about services:</div><div style><a href="http://wiki.freepascal.org/Daemons_and_Services">http://wiki.freepascal.org/Daemons_and_Services</a><br></div>
<div style><br></div><div style>I have created onStart event which should create text file in my home directory but nothing happens:</div><div style><br></div><div style>procedure TDaemon1.DataModuleStart(Sender: TCustomDaemon; var Ok: Boolean);</div>
<div style>var</div><div style> sl: TStringList;</div><div style>begin</div><div style> sl := TStringList.Create;</div><div style> try</div><div style> sl.Add('test');</div><div style> sl.SaveToFile('/home/dibo/test.txt');</div>
<div style> finally</div><div style> sl.Free;</div><div style> end;</div><div style>end;</div><div style><br></div><div style>My run script return: Starting test Service: [OK]</div><div style>And I see my service by command: ps aux</div>
<div style>I also created DaemonDef for my TDaemon1 class. What I'm missing?</div><div style><br></div><div style>Lazarus stable release 1.0.6</div><div style>FPC stable 2.6.0</div><div style>Linux Mint (debian) 64bit</div>
</div>