![]() |
in die Registry schreiben
Hallo,
möchte was in die Registry schreiben, was soweit auch funktioniert.:? Nur für ca. 30sec. kommt immer die Meldung in der Form1 (Keine Rückmeldung) ??? Warum? Bin als Administrator angemeldet!
Delphi-Quellcode:
procedure TForm1.Reg1Click(Sender: TObject);
var reg : TRegistry; s : String; begin if InputQuery('Caption', #31 + 'Bitte geben Sie das Passwort ein', s ) then begin if s = 'test' then begin reg := tregistry.create; with reg do begin RootKey := HKEY_LOCAL_MACHINE; OpenKey('Software\Microsoft\Windows\CurrentVersion\Run', true); WriteString('LogUser', paramstr(0)); CloseKey; free; end; end; end; end; |
AW: in die Registry schreiben
Das Programm muß soweit ich weiß ab Vista dann mit Adminrechren gestartet werden.
|
AW: in die Registry schreiben
Zitat:
D.h. schreiben unter HKEY_LOCAL_MACHINE wird nicht gehen da hierfür der Prozess Adminrechte benötigt. Und solche Schlüssel wie "Run" werden auch gerne zusätzlich von Virenscanner geschützt so das hier das Schreiben (auch wenn es Windows-Rechte-Technisch evtl. klappen müsste) es nicht geht - Vor ca. 2 Jahren mit dem Autostart-Eintrag von Windows im Userprofil den Fall gehabt. |
AW: in die Registry schreiben
OpenKey hat einen Rückgabewert. Mit einer gescheiten Fehlerbehandlung wüsstest du warum es nicht funktioniert.
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:56 Uhr. |
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 by Thomas Breitkreuz