.Net Service und Win32 Problem

[JMSchneider]

Hallo zusammen,


Ich habe einen kleinen Dienst unter delphi .net erstellt welches
ein delphi win32 programm starten.

Das win32-programm funktioniert auch ohne problem wenn es eigenständig gestartet wird.

Wird das win32-Programm allerdings über den service gestarten wird
die onCreate funktion nicht ausgeführt.


Für den Aufruf im Service Programm habe ich folgenden code benutzt:

procedure TWindowsService.OnStart(args: array of string);
var Reader: BDPDataReader;
Value: string;
Command: BDPCommand;
begin
inherited;
InitializeComponent;
BdpConnection1.Open;
BdpDataAdapter1.Active:=True;
Command := BdpConnection1.CreateCommand;
Command.CommandText := 'SELECT ServicePath FROM System';
Reader := command.ExecuteReader;
while reader.Read do
begin
Value := Reader.GetString(0);
end;
Reader.Free;
BdpDataAdapter1.Active:=false;
BdpConnection1.Close;

NewProcess := Process.Create;
NewProcess.StartInfo.FileName:= value;
NewProcess.StartInfo.WindowStyle := ProcessWindowStyle.hidden;
NewProcess.Start;
end;


Hat jemand eine Idee?


Besten Dank,
Jürgen

[Bernhard Geyer]

Welche DB und wie ist der Connection-String?