Simpler Generator macht Probs <:

[Sir Rufo]

Zitat von n1c3h4x0r:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
 var Key: String;
begin
 keys.lines.add('81LC-5U27-2LUU-C7HD-B546');
if keys.text= '81LC-5U27-2LUU-C7HD-B546' then
 keys.Lines.add('XD82-817E-18PE-E175-36CD');
end;

Also dieser Code produziert nach dem ersten Drücken von Button1 folgendes:

Code:

81LC-5U27-2LUU-C7HD-B546
XD82-817E-18PE-E175-36CD

und bei jedem weiteren

Code:

81LC-5U27-2LUU-C7HD-B546
XD82-817E-18PE-E175-36CD
81LC-5U27-2LUU-C7HD-B546

und weiteren

Code:

81LC-5U27-2LUU-C7HD-B546
XD82-817E-18PE-E175-36CD
81LC-5U27-2LUU-C7HD-B546
81LC-5U27-2LUU-C7HD-B546

und so weiter ...
Das sieht noch nicht mal ansatzweise wie ein KeyGen aus, eher wie ein Memo-Vollschreiber

cu

Oliver