Delphi-PRAXiS
Seite 2 von 3     12 3      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Internet Explorer aus Systemdienst starten (https://www.delphipraxis.net/158747-internet-explorer-aus-systemdienst-starten.html)

kuba 1. Mär 2011 12:45

AW: Internet Explorer aus Systemdienst starten
 
Zitat:

Zitat von Assarbad (Beitrag 1085073)
Mal unbesehen des Unsinns eine Instanz des Internet Explorer aus einem Dienst zu starten, bitte stoppe doch mal folgenden Dienst: UI0Detect. Dann probiert dein Programm nochmal. Bin gespannt auf's Ergebnis ;)

Übrigens: %SystemRoot%\System32\config\Systemprofile enthält "Desktop" usw. für das Konto SYSTEM.

Hab ich ausprobiert, bzw. UI0Detect war nicht gestartet. Der Dienst hat keinen Einfluss auf meinen NT-Service, habs ausprobiert. Funktioniert denn RunAs aus einem NT-Service ?? Kennwort ist uninteressant ...

KUBA

Assarbad 1. Mär 2011 12:48

AW: Internet Explorer aus Systemdienst starten
 
Zitat:

Zitat von kuba (Beitrag 1085122)
Funktioniert denn RunAs aus einem NT-Service ??

Ehrlich gesagt noch nie probiert. Meiner Meinung nach spricht aber auch nichts wirklich dagegen. Versuch's doch. Du meinst ShellExecute(Ex) und das Verb "runas"?

kuba 1. Mär 2011 13:14

AW: Internet Explorer aus Systemdienst starten
 
Also mit RunAs funktionierts, allerdings ist das mit dem Passwort nicht ganz unproblematisch. Wenn ich das Kennwort ändere während der Benutzer angemeldet ist funktioniert RunAs nicht.

Wo hat Nebbett denn gezeigt wies ohne Passwort geht ?

Mit Windows 2000/XP gehts auch ohne Passwort ...

KUBA

Assarbad 1. Mär 2011 15:06

AW: Internet Explorer aus Systemdienst starten
 
Zitat:

Zitat von kuba (Beitrag 1085129)
Wo hat Nebbett denn gezeigt wies ohne Passwort geht ?

In der "Windows NT/2000 Native API Reference". Erfordert eben das TCB-Privileg. Aber das haste wenn du als Dienst unterwegs bist.

rollstuhlfahrer 1. Mär 2011 16:21

AW: Internet Explorer aus Systemdienst starten
 
Gibts auch ne Seitenzahl? - Nen Link wirds wohl kaum geben, da das ein Buch ist.

Bernhard

Assarbad 1. Mär 2011 16:43

AW: Internet Explorer aus Systemdienst starten
 
Zitat:

Zitat von rollstuhlfahrer (Beitrag 1085194)
Gibts auch ne Seitenzahl? - Nen Link wirds wohl kaum geben, da das ein Buch ist.

Leider im Moment nicht, da ich das Buch nicht hier habe. Kann aber am Abend nachschauen. Habe auch irgendwo eine elektronische Variante (neben den zwei gekauften physischen Exemplaren) :stupid:

Der Beispielcode war damals allerdings von Newriders noch herunterladbar. Der sollte also allemal auffindbar sein.

kuba 1. Mär 2011 18:43

AW: Internet Explorer aus Systemdienst starten
 
Den Nt-Service habe ich nicht selbst geschrieben sondern aus dem Internet.

Anscheinend funktioniert die Übergabe des Usertoken nicht unter Vista/7. Der Service funktioniert auch nicht unter 64Bit Betriebssystemen, da hab ich aber mittlerweile eine Lösung gefunden damit es doch funktioniert.

Würde mich sehr freuen wenn mir jemand einen Tip geben könnte was da falsch läuft, danke !

KUBA

PS: 64 Bit Anpassung...

Delphi-Quellcode:
function GetShellProcName: String;
var
    Reg : TRegistry;
begin
    if IsWin64 then Reg := TRegistry.Create(KEY_ALL_ACCESS OR KEY_WOW64_64KEY);
    if not IsWin64 then Reg := TRegistry.Create(KEY_READ);
    try
        Reg.RootKey := HKEY_LOCAL_MACHINE;
        Reg.OpenKeyReadOnly('Software\Microsoft\Windows NT\CurrentVersion\WinLogon');
        Result := Reg.ReadString('Shell');
    finally
        Reg.Free;
    end;
end;


function GetShellHandle: THandle;
var
    Pid : THandle;
    ShellProcName : String;
begin
    Result := 0;
    ShellProcName := GetShellProcName;
    if Length(ShellProcName) > 0 then
    begin
        Pid := ProcessIDFromAppname32(ShellProcName);
        if Pid <> 0 then
            Result := OpenProcess(PROCESS_ALL_ACCESS, False, Pid);
    end;
end;

Assarbad 2. Mär 2011 02:11

AW: Internet Explorer aus Systemdienst starten
 
Zitat:

Zitat von rollstuhlfahrer (Beitrag 1085194)
Gibts auch ne Seitenzahl? - Nen Link wirds wohl kaum geben, da das ein Buch ist.

Seite 205 ff.

hathor 2. Mär 2011 06:27

AW: Internet Explorer aus Systemdienst starten
 
Zitat:

Zitat von Assarbad (Beitrag 1085199)
...(neben den zwei gekauften physischen Exemplaren) :stupid: ...

M.Alzheimer ? :stupid:

Assarbad 2. Mär 2011 12:30

AW: Internet Explorer aus Systemdienst starten
 
Zitat:

Zitat von hathor (Beitrag 1085284)
Zitat:

Zitat von Assarbad (Beitrag 1085199)
...(neben den zwei gekauften physischen Exemplaren) :stupid: ...

M.Alzheimer ? :stupid:

HMM? Was meinst du? Es war nicht Vergeßlichkeit weshalb ich zwei habe, wenn das gemeint war. Mittlerweile ist das Buch ausverkauft und kurz nach dem Erscheinen hatte ich mein erstes Exemplar gekauft. Das sieht man diesem auch an - auch wie intensiv es genutzt wurde. Das zweite Exemplar sieht noch relativ unbeschädigt aus ;)


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:15 Uhr.
Seite 2 von 3     12 3      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz