Kto pyta, nie błądzi. Szukałem nie znalazłem....A więc czy ktoś wie jak pobrać key Win do edita ??
Ewentualnie key Office .. HELP ME masters :-/
0
0
Keye win 9x/me/2000 mozesz pobrac z rejstru z stad:
HKEY LOCAL MACHINE\Software\Microsoft\Windows\CurrentVersion i ProductKey
w XP key jest zaszyfrowany w DigitalProductId
0
Dobra dam procke:
procedure button1.Click(sender: TObject);
var
reg: Tregistr;
s: string;
begin
reg:= TRegistr.Create;
reg.RootKey:=HKEY_LOCAL_MACHINE;
reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\',true);
s:=reg.ReadString('ProductKey');
showMessage(s);
end;
Jak chcesz do XP to użyj np. ViewKeyXP</delphi>
0
Dobra dam procke:
procedure button1.Click(sender: TObject);
var
reg: Tregistr;
s: string;
begin
reg:= TRegistr.Create;
reg.RootKey:=HKEY_LOCAL_MACHINE;
reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\',true);
s:=reg.ReadString('ProductKey');
showMessage(s);
end;
Jak chcesz do XP to użyj np. ViewKeyXP