Forum: Win32/Win64 API (native code)
Delphi
by Luckie,
18. Nov 2004
OK. Ich habe es jetzt so:
uses MpuWinNT;
function CreateProcessAsLogon(const User, PW, Application, CmdLine: WideString):
Boolean;
var
si : TStartupInfoW;
pif : TProcessInformation;
begin
ZeroMemory(@si, sizeof(TStartupInfo));
Forum: Win32/Win64 API (native code)
Delphi
by Luckie,
18. Nov 2004
Geht prima:
uses MpuWinNT;
function CreateProcessAsLogon(const User, PW, Application, CmdLine: WideString):
Boolean;
var
si : TStartupInfoW;
pif : TProcessInformation;
begin
si.cb := SizeOf(TStartupInfoW);
Forum: Win32/Win64 API (native code)
Delphi
by Luckie,
18. Nov 2004
So geht es:
uses MpuWinNT;
function CreateProcessAsLogon(const User, PW, Application: WideString):
Boolean;
var
si : TStartupInfoW;
pif : TProcessInformation;
begin
si.cb := SizeOf(TStartupInfoW);
Forum: Win32/Win64 API (native code)
Delphi
by Luckie,
18. Nov 2004
Für mich ist damit mein Problem aber immer noch nicht geklärt.
Forum: Win32/Win64 API (native code)
Delphi
by Luckie,
18. Nov 2004
Ich habe den Code etwas umgebaut und sieht jetzt so aus:
uses MpuWinNT;
function CreateProcessAsLogon(const User, PW, Application: string):
Boolean;
var
s : string;
si : TStartupInfoW;
pif : TProcessInformation;
wUser : PWideChar;