Wie frage ich die Registry eines Netzwer-Rechners ab?

[Rene Landscheidt]

Hallo,

wie kann ich die Registry eines Rechners Abfragen der sich im Netzwerk befindet?

Es soll möglichst so funktionieren das ich auf den Abzufragendem Rechner kein Zusatz Delphi Programm installieren muss.

WMI & ADSI sind auf den Rechnern installiert.

Vielen Dank schonmal im Vorraus.

MfG

René L

[Andreas Kosch]

Hallo,

dazu reicht das Win32-API vollständig aus. Der folgende Auszug demonstriert den Aufruf der Win32-API-Funktion <b>RegConnectRegistry</b>:
<pre>
...
try
lRetVal := RegConnectRegistry(PChar(EditPC.Text), HKEY_LOCAL_MACHINE,
aRemoteHandle);
if lRetVal <> ERROR_SUCCESS then
RaiseLastWin32Error;
try
lRetVal := RegCreateKeyEx(aRemoteHandle, szKeyEntry, 0, '',
REG_OPTION_NON_VOLATILE,
KEY_READ or KEY_WRITE or KEY_SET_VALUE,
nil, aHandle, @dwDisposition);
if lRetVal <> ERROR_SUCCESS then
RaiseLastWin32Error;
lRetVal := RegSetValueEx(aHandle, 'Test', 0, REG_MULTI_SZ,
@szMULTI, dwDataSize);
if lRetVal <> ERROR_SUCCESS then
RaiseLastWin32Error;
finally
RegCloseKey(aHandle);
end;
finally
RegCloseKey(aRemoteHandle);
end;
...
</pre>
Das vollständige Projekt ist auf der CDROM zu meinem Buch <i>Delphi Win32-Lösungen</i> im Verzeichnis <i>Kapitel Registry\RegConnectRegistry</i> zu finden

[Rene Landscheidt]

Hallo,

danke nochmal für deine Hilfe.

hättest du für mich einen Code-Schnipsel wie ich über diese Funktion die Installierte Software aus dem Reg-Key: HKEY_LOCAL_MASCHINE\Software\Microsoft\Windows\Cur rentVersion\Uninstall auslesen kann?
Ich habs versucht kriege es aber nicht hin.

MfG

René L

[Rene Landscheidt]

Hallo,

ich brauche dringend Hilfe bis Mittwoch soll das Programm fertig sein. Und ich hab das Buch leider nicht *steht aber inzwischen auf meiner Bücherkauf liste ganz oben* kann mir jemand der das Buch hat, bitte das Beispiel aus dem <i>Kapitel Registry\RegConnectRegistry</i> von der CD per Mail schicken.

Mail: <b>[email protected]</b>

Danke schon mal für die HIlfe

MfG

*derschonverzweifelde* René L

[Andreas Kosch]

Ausnahmsweise :-

[Rene Landscheidt]

<b>Danke!!!!</b>
<br>
Das buch ist schon so gut wie gekauft! ;-) Muss es nur noch Bestellen!

MfG

René L