Thema: Delphi Registry: HKEY wichtig?

Einzelnen Beitrag anzeigen

MathiasSimmack
(Gast)

n/a Beiträge
 
#2

Re: Registry: HKEY wichtig?

  Alt 25. Apr 2004, 13:26
Da wirst du wohl oder übel "parsen" müssen. Sprich: Nach den bekannten Schlüsselnamen und evtl. auch ihren Kurzformen suchen (die ja nur am Anfang des Strings stehen können und dürfen), diese dann entfernen und intern den passenden HKEY-Wert benutzen.

Ansonsten: mit VBS ginge das.
Hier ein kleiner "alte Projektdateien-Löscher"
Code:
On Error Resume Next

' Usage:
'
'   bdr.vbs
'   bdr.vbs Delphi\7.0
'   bdr.vbs Delphi\5.0
'
' The optional 1st parameter identifies the registry key of your
' Delphi version. The default (= no parameter) is Delphi 8.


Const strBorland = "HKEY_CURRENT_USER\Software\Borland\{DelphiVer}"
Const strCP = "\Closed Projects"
Const strCF = "\Closed Files"

Dim strDelphiVer, strRegKey


If WScript.Arguments.Count = 0 Then
   strDelphiVer = "BDS\2.0"
Else
   strDelphiVer = WScript.Arguments.Item(0)
End If

strRegKey = Replace(strBorland, "{DelphiVer}", strDelphiVer)


If MsgBox ("Delete all projects and files in """ & strRegKey & """?", vbYesNo) = vbYes Then
   Dim Delphi
   Set Delphi = CreateObject ("WScript.Shell")

   Delphi.RegDelete strRegKey & strCP & "\"
   Delphi.RegDelete strRegKey & strCF & "\"
End If
  Mit Zitat antworten Zitat