Delphi-PRAXiS
Seite 2 von 3     12 3      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Delphi RunAs unter Win7 (ohne UAC) (https://www.delphipraxis.net/167163-runas-unter-win7-ohne-uac.html)

Bummi 16. Mär 2012 13:51

AW: RunAs unter Win7 (ohne UAC)
 
Du könntest über Findwindow ein gegf. vorhandenes Programm ohne UAC, vor der Mutxprüfung suche und per Message einen Befehl zum beenden senden.

jaenicke 16. Mär 2012 14:10

AW: RunAs unter Win7 (ohne UAC)
 
Zitat:

Zitat von Dalai (Beitrag 1156919)
Beim Klick auf Button2 bekomme ich die Meldung 'runasuser', und danach kommen parallel die Dialoge "Ausführen als" (Windows) und 'OK' (von meinem Programm) und zum Schluss wieder das Handle.

Ok, das hatte ich nicht so verstanden. Ich dachte es ginge um das Warten auf den Prozess oder so.

Dennoch könntest du ein Handle (z.B. ein Fensterhandle) als Parameter mitgeben, über das das gestartete Programm z.B. eine Windows Message schicken kann als Antwort.

Ich schaue mir aber mal an was es sonst noch für Möglichkeiten geben könnte...

Dalai 16. Mär 2012 14:57

AW: RunAs unter Win7 (ohne UAC)
 
Zitat:

Zitat von jaenicke (Beitrag 1156931)
Dennoch könntest du ein Handle (z.B. ein Fensterhandle) als Parameter mitgeben, über das das gestartete Programm z.B. eine Windows Message schicken kann als Antwort.

Das bringt mir nichts. Das Programm benutzt ein Mutex, um mehrfache Instanzen zu verhindern. Ich muss also die laufende Instanz sofort nach (einem erfolgreichen) ShellExecuteEx schließen, damit die neue Instanz die Chance hat, zu starten. Da die Funktion ShellExecuteEx im Falle von 'runasuser' sofort die Kontrolle an das Programm zurückgibt, beendet sich das Programm und das war's; es wird keine neue Instanz gestartet und die laufende beendet sich.

Nebenbei bemerkt ist ShellExecuteEx bei 'runasuser' immer erfolgreich, auch wenn man im "Ausführen als"-Dialog gar nichts macht (ihn also stehenlässt). Man kann also gar nicht unterscheiden, wie der Nutzer den "Ausführen als"-Dialog verlässt. Ich hoffe, nun ist klar, wo das Problem liegt.

Ich habe mir die Sache mal mit AutoIt angeschaut und dort verhält sich Windows exakt genauso. Es liegt also wohl am Win7 selbst - ob von MS beabsichtigt oder nicht, bleibt offen.

MfG Dalai

jaenicke 16. Mär 2012 15:34

AW: RunAs unter Win7 (ohne UAC)
 
Zitat:

Zitat von Dalai (Beitrag 1156943)
Das Programm benutzt ein Mutex, um mehrfache Instanzen zu verhindern. Ich muss also die laufende Instanz sofort nach (einem erfolgreichen) ShellExecuteEx schließen, damit die neue Instanz die Chance hat, zu starten.

Ich mache das in meiner Updaterunit ähnlich, aber die macht die Synchronisation der Starts per IPC.

Ich starte, wenn ich noch keine Adminrechte habe, eine Instanz mit Adminrechten. Diese Instanz benennt die aktuellen Dateien um und kopiert die neuen Dateien ins Verzeichnis. Dann startet sie die ggf. neue Exe, die dann auch Adminrechte hat, sagt der ersten Instanz Bescheid und beendet sich selbst.
Die erste Instanz startet die neue Exe im selben Kontext wie die ursprüngliche Exe (also z.B. ohne Adminrechte) und beendet sich. Die neu gestartete Exe sagt der neuen Admin-Instanz Bescheid und wartet.
Die neue Admin-Instanz löscht nun die zuvor gesicherten Dateien, wenn das Update bis hierhin gekommen ist, meldet den Erfolg des Aufräumens an die neue Instanz im Benutzerkontext und beendet sich.
Die neue Instanz im Benutzerkontext lädt den Zustand der ersten Instanz wieder und sagt dann dem Benutzer Bescheid, dass das Update fertig ist.
Dazu kommt noch die Kommunikation für die Fortschrittsanzeige.

Das funktioniert so sehr gut und ich denke, dass das bei dir auch gehen würde. Deine neue Instanz merkt am Parameter, dass da noch eine alte Instanz beendet werden muss. Dann meldet diese der ersten Instanz, dass sie erfolgreich gestartet ist und wartet bis sich die erste Instanz beendet hat (der Mutex also reserviert werden konnte).
Die erste Instanz wartet nach dem Start bis die Antwort der neuen Instanz kommt und beendet sich dann.

Das sollte doch funktionieren, oder?

Dalai 16. Mär 2012 21:06

AW: RunAs unter Win7 (ohne UAC)
 
Zitat:

Zitat von jaenicke (Beitrag 1156957)
Deine neue Instanz merkt am Parameter, dass da noch eine alte Instanz beendet werden muss. Dann meldet diese der ersten Instanz, dass sie erfolgreich gestartet ist und wartet bis sich die erste Instanz beendet hat (der Mutex also reserviert werden konnte).
Die erste Instanz wartet nach dem Start bis die Antwort der neuen Instanz kommt und beendet sich dann.

Das sollte doch funktionieren, oder?

Ich werd mir das mal anschauen. Das Nervige an der Sache ist, dass ich mal wieder mehr Aufwand treiben muss, weil MS zu doof/faul/whatever ist, um auf allen Systemen ein konsistentes Verhalten hinzubekommen. Schließlich funktioniert es bei Win2k/XP problemlos, und ShellExecuteEx wartet auch dann, wenn fMask gar nicht gesetzt (und damit 0) ist.

MfG Dalai

Dalai 16. Mär 2012 22:14

AW: RunAs unter Win7 (ohne UAC)
 
Mmh, ich habe jetzt drei funktionierende Methoden ausmachen können, weiß aber nicht so recht, welche davon man benutzen sollte.
  • Fenster finden und Nachricht zum Schließen senden (falls der Parameter 'runas' übergeben wurde)
    Delphi-Quellcode:
    hWindow:= FindWindow('TMainForm', PChar(sApplicationTitle));
    if hWindow > 0 then
        SendMessage(hWindow, WM_CLOSE, 0, 0);
  • Bestimmte Nachricht registrieren und darauf reagieren
    Delphi-Quellcode:
    RunAsUserMsg:= RegisterWindowMessage('RunAsUser');
    und falls der Parameter 'runas' angegeben wurde, wird die Nachricht gesendet:
    Delphi-Quellcode:
    SendMessage(HWND_BROADCAST, RunAsUserMsg, 0, 0);
    Die Nachrichtenverarbeitungsroutine ist dann diese:
    Delphi-Quellcode:
    procedure TMainForm.WndProc(var Msg: TMessage);
    begin
        if Msg.Msg = RunAsUserMsg then
            Self.Close;
        inherited;
    end;
  • Ähnlich wie Variante 1: Handle der ersten Instanz an die zweite übergeben (statt es zu suchen) und Nachricht zum Schließen senden.
Es gibt sicher noch andere Varianten, aber ich denke, das sind die einfachsten. Aber welche ist zu bevorzugen bzw. von welcher/welchen sollte man besser Abstand nehmen?

MfG Dalai

himitsu 17. Mär 2012 01:57

AW: RunAs unter Win7 (ohne UAC)
 
Dieser Passwortdialog ist halt ein interner Teil des UAC, welcher sich von extern scheinbar nicht ansprechen läßt, vorallem dann nicht, wenn das UAC nicht läuft.

Ich glaube ich hatte vor sehr vielen Jahren auch mal hier nach sowas gefragt.

Der eigene Dialog ist ja nicht das Problem, aber diesen dann auch noch in einer sicheren Umgebung (eigener Desktop) anzuzeigen, so wie es das UAC macht, damit kein Programm da so einfach automatisch die Anmeldedaten eintragen kann.

Dalai 17. Mär 2012 20:53

AW: RunAs unter Win7 (ohne UAC)
 
Zitat:

Zitat von himitsu (Beitrag 1157018)
Dieser Passwortdialog ist halt ein interner Teil des UAC, welcher sich von extern scheinbar nicht ansprechen läßt, vorallem dann nicht, wenn das UAC nicht läuft.

Nein, er ist kein Teil der UAC. Das Ding lässt sich auch aufrufen, wenn die UAC komplett abgeschaltet ist. Teste es selbst, indem du - bei ausgeschalteter UAC - Shift+Rechtsklick auf eine Verknüpfung (oder eine EXE) auf deinem System machst und "Als anderer Benutzer ausführen" wählst. Eben deswegen bin ich ja so daran interessiert, den Dialog zu nutzen.

Ich habe mich vorerst für die o.g. Variante 3 entschieden, das Handle also via Parameter an die andere Instanz zu übergeben. Das hat den Vorteil, dass ich nicht mit beiden Instanzen dieselbe Message registriere (Variante 2), ich kein Fenster suchen muss (Variante 1; IMO potentiell fehlerträchtig) und nicht alle anderen Fenster mit einem Broadcast nerve (Variante 2).

MfG Dalai

jaenicke 17. Mär 2012 22:29

AW: RunAs unter Win7 (ohne UAC)
 
Liste der Anhänge anzeigen (Anzahl: 1)
Als weitere Möglichkeit blieben noch andere Möglichkeiten der Interprozesskommunikation wie z.B. Semaphore, siehe Anhang. ;-)

himitsu 17. Mär 2012 22:30

AW: RunAs unter Win7 (ohne UAC)
 
Zitat:

Das Ding lässt sich auch aufrufen
Hmm, dann müßte man nur noch die API dafür finden.

Das ding wird aber nicht in einem eigenem Desktop ausgeführt.
Es sieht auch irgendwie ein bissl so aus, wie der neue Vista-TaskDialog.

[add]
Die Fensterklasse von dem Ding ist Bei Google suchenDirectUIHWND.


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

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