Forum: Programmieren allgemein
Delphi
by Cici,
20. Jun 2012
Lösung gefunden!
Der Code war in Ordnung.
Es lag an der Art der Installation.
Wenn die ServiceApp mit dem Parameter /INSATLL installiert wird geht es.
Wenn die ServiceApp mit SC.EXE installiert klappt es wie beschrieben nicht.
Dies war die Batch Datei, die mit "run as Admin" aufgerufen wurde.
sc create "ISMAS_TEST" start= auto binpath= "c:\x\Servicetest.exe"
sc description...
Forum: Programmieren allgemein
Delphi
by Cici,
14. Jun 2012
Das ganze unter D2005 probiert.
Selber effekt
Der Service lässt sich nicht installieren.
Das müsste doch wenigsten beepen - oder?
program Servicetest;
uses
SvcMgr,
Unit6 in 'Unit6.pas' {Service6: TService};
Forum: Programmieren allgemein
Delphi
by Cici,
14. Jun 2012
Debug geht, bringt mich aber nicht weiter.
Lande im CPU Fenster bei "NTKernel.dll".
Nach einigen "F7" wird das "Programm" ausgeführt - das wars - nix weiter.
Ich komme nicht an "meinen Code" ran.
Das Problem muss wohl irgenwo "weiter vorne" liegen.
Der Prozess muss manuell gekillt werden.
Forum: Programmieren allgemein
Delphi
by Cici,
14. Jun 2012
Guter TIP - wäre ich nicht drauf gekommen, da ich als Admin angemeldet bin.
Forum: Programmieren allgemein
Delphi
by Cici,
14. Jun 2012
ach ja
wenn ich es mit dem Parameter Bla.exe /INSTALL versuche bekomme ich nach 30 sek. EOSError Code 5
Forum: Programmieren allgemein
Delphi
by Cici,
14. Jun 2012
Erstmal Danke für Eure Antworten.
Das mit dem Logfile habe ich gemacht, da Showmessage nur interativ funktioniert.
Wenn ich das mit Logfile weglasse, geht es auch nicht.
Bis oncreate komme ich erst gar nicht.
Am Anfang habe ich es nur mit "Beep" versucht.
Mit dem Debugger habe ich es auch versucht, sehe aber im "Prozess verbinden Dialog" meinen Prozess nicht.
(Auch nicht mit dem...
Forum: Programmieren allgemein
Delphi
by Cici,
14. Jun 2012
Hallo,
ich habe das gleiche Problem wie der Themenstarter <E1053:>
habe aber keine Lösung.
Versuche auch einen Service mit Delphi XE2 zu erstellen.
Im meiner Verzweifelung habe ich mich an Beispielen gehalten die bei anderen Usern bereits liefen.
Den Service installiere ich mit:
sc create "TEST" start= auto binpath= "c:\x\Servicetest.exe"
sc description "TEST" "TEST Dienst"