AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Installationskey auslesen

Ein Thema von Mackhack · begonnen am 22. Nov 2006 · letzter Beitrag vom 1. Dez 2006
Antwort Antwort
Seite 2 von 3     12 3      
Namenloser

Registriert seit: 7. Jun 2006
Ort: Karlsruhe
3.724 Beiträge
 
FreePascal / Lazarus
 
#11

Re: Installationskey auslesen

  Alt 23. Nov 2006, 15:33
Ich habe die Unit aus Interesse mal getestet. Allerdings entspricht der ausgegebene Code nicht dem, der auf meinem PC steht. Kann das daran liegen, dass es sich um ein oem-gerät handelt?

ich benutze winxp home...
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#12

Re: Installationskey auslesen

  Alt 23. Nov 2006, 15:44
Zitat von NamenLozer:
Ich habe die Unit aus Interesse mal getestet. Allerdings entspricht der ausgegebene Code nicht dem, der auf meinem PC steht. Kann das daran liegen, dass es sich um ein oem-gerät handelt?

ich benutze winxp home...
Bei mir ist gleiches der Fall. OEM und winxp home.
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat
Benutzerbild von ste_ett
ste_ett

Registriert seit: 10. Sep 2004
Ort: Dülmen
464 Beiträge
 
Delphi 7 Professional
 
#13

Re: Installationskey auslesen

  Alt 23. Nov 2006, 16:07
Habt ihr den Code so benutzt, wie er oben steht?
Bei mir gibt's da eine Arraygrenzenüberschreitung.

Delphi-Quellcode:
var
  Reg: TRegistry;
  binarySize: INTEGER;
  HexBuf: array[0..28] of BYTE;
  temp: TStringList;
  KeyName, KeyName2, SubKeyName, PN, PID, DN: string;



// muss heissen

  HexBuf: array[0..163] of BYTE;
"binarySize" hat, zumindest beim WinXP-Key, den Wert 164, also ist der Array viel zu klein.
Stefan
"Geht nicht!" ist keine Fehlerbeschreibung und "Hab ich schon versucht!" keine Antwort!

Hey, it compiles! Ship it!
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#14

Re: Installationskey auslesen

  Alt 23. Nov 2006, 16:46
ich hab für den Registrybuffer ein dynamisches Array genommen.
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat
Benutzerbild von Mackhack
Mackhack

Registriert seit: 29. Nov 2003
Ort: San Diego, CA/USA
1.446 Beiträge
 
Delphi 2006 Architect
 
#15

Re: Installationskey auslesen

  Alt 23. Nov 2006, 19:34
Hi,

bei meinem System Windows XP MCE 05, English, als Admin eingelogged funzt die Unit tadellos!

Danke!

\\Edit: Ich hab noch eine weitere Frage. Wenn ich eine 2.5" HDD (die ein OS installiert hat) per Externem Gehaeuse an einen PC anschliesse kann ich dann mit diesem Code auch auf die Registry zugreifen und den Code auslesen? Denn das ist/war mein Hauptaugenmerk zu diesem Thread!

Nochmals, vielen Dank!
Um etwas Neues zu schaffen muss man seine Ohren vor den Nein-sagern verschliessen um seinen Geist öffnen zu können.
(George Lukas)
  Mit Zitat antworten Zitat
Balu der Bär
(Gast)

n/a Beiträge
 
#16

Re: Installationskey auslesen

  Alt 23. Nov 2006, 19:48
Bei mir ebenfalls, konnte keinen Fehler erkennen.
  Mit Zitat antworten Zitat
Benutzerbild von Mackhack
Mackhack

Registriert seit: 29. Nov 2003
Ort: San Diego, CA/USA
1.446 Beiträge
 
Delphi 2006 Architect
 
#17

Re: Installationskey auslesen

  Alt 23. Nov 2006, 22:49
Weis jemand wie man solch eine Berechnung reverse-engenieeren kann? Ich meine MS sollte doch nicht etwa das Verfahren offengelegt haben oder?
Um etwas Neues zu schaffen muss man seine Ohren vor den Nein-sagern verschliessen um seinen Geist öffnen zu können.
(George Lukas)
  Mit Zitat antworten Zitat
Benutzerbild von MaBuSE
MaBuSE

Registriert seit: 23. Sep 2002
Ort: Frankfurt am Main (in der Nähe)
1.838 Beiträge
 
Delphi 10 Seattle Enterprise
 
#18

Re: Installationskey auslesen

  Alt 24. Nov 2006, 08:50
Zitat von Mackhack:
Weis jemand wie man solch eine Berechnung reverse-engenieeren kann? Ich meine MS sollte doch nicht etwa das Verfahren offengelegt haben oder?
Debugging
(°¿°) MaBuSE - proud to be a DP member
(°¿°) MaBuSE - proud to be a "Rüsselmops" ;-)
  Mit Zitat antworten Zitat
Benutzerbild von Mackhack
Mackhack

Registriert seit: 29. Nov 2003
Ort: San Diego, CA/USA
1.446 Beiträge
 
Delphi 2006 Architect
 
#19

Re: Installationskey auslesen

  Alt 25. Nov 2006, 17:49
Zitat von MaBuSE:
Zitat von Mackhack:
Weis jemand wie man solch eine Berechnung reverse-engenieeren kann? Ich meine MS sollte doch nicht etwa das Verfahren offengelegt haben oder?
Debugging
Stimmt!
Um etwas Neues zu schaffen muss man seine Ohren vor den Nein-sagern verschliessen um seinen Geist öffnen zu können.
(George Lukas)
  Mit Zitat antworten Zitat
Benutzerbild von Garfield
Garfield

Registriert seit: 9. Jul 2004
Ort: Aken (Anhalt-Bitterfeld)
1.335 Beiträge
 
Delphi XE5 Professional
 
#20

Re: Installationskey auslesen

  Alt 26. Nov 2006, 14:14
Zitat von NamenLozer:
Ich habe die Unit aus Interesse mal getestet. Allerdings entspricht der ausgegebene Code nicht dem, der auf meinem PC steht. Kann das daran liegen, dass es sich um ein oem-gerät handelt?
Zitat von Mackhack:
bei meinem System Windows XP MCE 05, English, als Admin eingelogged funzt die Unit tadellos!
Ich habe so eine Routine auch schon mal getestet und sie hat bei mir nicht funktioniert. Irgendwo habe ich dann den Hinweis gefunden, dass die Verschlüsselung von der Sprachversion abhängig sein soll.
Gruss Garfield
Ubuntu 22.04: Laz2.2.2/FPC3.2.2 - VirtBox6.1+W10: D7PE, DXE5Prof
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 3     12 3      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:20 Uhr.
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