| |
|
|
- Page 1 - |
|
Torsten Rümker | Hi,
The following is my trouble: I have several programs prepares, which in the Registry under HKEY_Current_UserSoftware a Haupteintrag share. means: HKEY_Current_UserSoftwareTRSoftwareProgramm1 HKEY_Current_UserSoftwareTRSoftwareProgramm2 etc.
If I now one Program deinstalliere should it naturally its Spuren from the Registry with Remove. only, How Verify I sure ex, the still one Another Key under TRSoftware present is, so I the entry only Lösche if it too really possible/necessary is?
I have already verschiedenes ausprobiert (z.b. one Sign in the vermerkt is How many programs Entries having) but I have yet nothing hinbekommen, what sure functions.
for each Info grateful Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 09/30/06 ▲ |
|
|
|
|
| |
|
- Page 1 - |
|
Michael Wodrich | Have 2 extensions undertaken: CompileMarkSeparation!
Tvinsert 0,"HKEY_CLASSES_ROOT",$0010
@Sendmessage(Treeview&,$1100,0,Tv_insert#)
Tvinsert 0,"HKEY_CURRENT_USER",$0010
@Sendmessage(Treeview&,$1100,0,Tv_insert#)
Tvinsert 0,"HKEY_LOCAL_MACHINE",$0010
@Sendmessage(Treeview&,$1100,0,Tv_insert#)
Tvinsert 0,"HKEY_USERS",$0010
@Sendmessage(Treeview&,$1100,0,Tv_insert# n>
and CompileMarkSeparation!
If Reg_root$="HKEY_USERS"
Let Reg_error&=@Regopenkeyex($80000003,@Addr(Reg_key$),0,$20019,@Addr(Reg_handle&))
Elseif Reg_root$="HKEY_CURRENT_USER"
Let Reg_error&=@Regopenkeyex($80000001,@Addr(Reg_key$),0,$20019,@Addr(Reg_handle&))
Elseif Reg_root$="HKEY_CLASSES_ROOT"
Let Reg_error&=@Regopenkeyex($80000000,@Addr(Reg_key$),0,$20019,@Addr(Reg_handle&))
Elseif Reg_root$="HKEY_LOCAL_MACHINE"
Let Reg_error&=@Regopenkeyex($80000002,@Addr(Reg_key$),0,$20019,@Addr(Reg_handle&))
Else
Let Reg_error&=2
Endif
can I in the momentum well use, thanks.
with Classes_Root kanns one Weilchen last. by me counts it over 8000 Unterschlüssel.
nice Regards Michael Wodrich |
|
|
| Programmieren, das spannendste Detektivspiel der Welt. | 09/30/06 ▲ |
|
|
|
|
| whether one The need, is Ansichtssache... |
|
|
| |
|
|
|
Torsten Rümker | Jau, so should it weg.
even very simply, over The Number of Unterschlüssel. If amount Unterschlüssel = 0 then wech with TRSoftware
thanks you.
MfG Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 09/30/06 ▲ |
|
|
|
|
Michael Wodrich | me was the local_user important, there there under software most programs verewigt are. |
|
|
| Programmieren, das spannendste Detektivspiel der Welt. | 09/30/06 ▲ |
|
|
|
|
| be MInimalist - is under HKEY_USERS with the string SID the jeweiligen Users auslesbar... |
|
|
| |
|
|
|
Torsten Rümker | so Have now no patience More. APIs find I Real straining. I mach for today schluß and drive my sister visit.
tommorrow denk I once more drüber to How I the for me umgemodelt get
MfG Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 09/30/06 ▲ |
|
|
|
|
Torsten Rümker | [quote:418f29a759=Andreas Hötker]be MInimalist - is under HKEY_USERS with the string SID the jeweiligen Users auslesbar...[/quote:418f29a759] Ähöm, for a Minimalisten write You but integrally beautiful aufwändige Beispielcodes
but time in the serious.
could you me time one Minimal-example create, with the I The spending your Source code for a designed Key (which is me alike) get? sincere said smoking me the head, I a) what APIs angeht somehow begriffsstutzig be and b) Since I it yet never really for something use could so did i so my Problems with the Treeview have
OK, the are sincere said not really The best Reasons, but I go rather step for step to if I what new learn. means first the I acutely use could and later then The Extras
would be Real nice
MfG Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 09/30/06 ▲ |
|
|
|
|
Jörg Sellmeyer | have You Prfellow? there Gibts into Vorlagen nice Examples of Uwe Pascal Niemeyer. You can it you of [...] herunterladen. |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 10/01/06 ▲ |
|
|
|
| |
|
- Page 2 - |
|
|
| so OK: CompileMarkSeparationKonstanten festlegen
Def &HKEY_CLASSES_ROOT $80000000
Def &HKEY_CURRENT_USER $80000001
Def &HKEY_LOCAL_MACHINE $80000002
DEF &HKEY_USERS $80000003
APIs deklarieren
Def @Regopenkeyex(5) !"ADVAPI32","RegOpenKeyExA" Schlüssel öffnen
Def @Regqueryinfokey(12) !"ADVAPI32","RegQueryInfoKeyA"
Def @Regclosekey(1) !"ADVAPI32","RegCloseKey" Schlüssel schließen
Declare Subkeys&,Key$,Handle&
Declare Fehler&
LET KEY$="SoftwareMicrosoftWindowsCurrentVersion" diesen Schlüssel öffnen
Let Fehler&=@Regopenkeyex(&HKEY_CURRENT_USER,@ADDR(KEY$),0,$1,@ADDR(HANDLE&)) Schlüssel öffnen und Handle holen
Let Fehler&=@Regqueryinfokey(Handle&,0,0,0,@Addr(Subkeys&),0,0,0,0,0,0,0) ... den Rest benötigst du nicht => kann also 0 sein...
@Regclosekey(Handle&) Schlüssel schließen
Addstring "Anzahl der Unterschlüssel="+@Str$(Subkeys&)
@Editbox("Rückgaben",12>)
|
|
|
| |
|
|
|
Torsten Rümker | OK, I faith you have my unverständnis half-way eliminating, RegQueryInfoKey becomes means with the whole variables not absolutely something transfer, separate it disembark too Results drin. means z.B. in Subkeys&. The lane was me new, and declared some Codesnipsel The I yet not understood have.
means, thanks for Kurzversion, The declared me so some!
MfG Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 10/05/06 ▲ |
|
|
|
|
| [quote:66cb0b93ad=Torsten Rümker]OK, I faith you have my unverständnis half-way eliminating, RegQueryInfoKey becomes means with the whole variables not absolutely something transfer, separate it disembark too Results drin. means z.B. in Subkeys&. [/quote:66cb0b93ad] this is with many APIs so. |
|
|
| |
|
|
|
Torsten Rümker | [quote:10c8e47fce=Andreas Hötker]this is with many APIs so.[/quote:10c8e47fce] Jep Have I now understood, but on it recognize one time again the it to that understanding one Problemes important is sozusagen from the right direction To think.
Well, therefore Yes my Signatur
MfG Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 10/06/06 ▲ |
|
|
|