Simpler Generator macht Probs <:

[Spiderpig_GER_15]

Also ich hätte da so ein vorschlag:

Delphi-Quellcode:

var: sCodeList: TStringList;
     i: integer;
begin
  sCodeList:= TStringList.create;
  sCodeList.loadfromfile('MeineCodes.txt');

  for i:= 1 to sCodeList.length do
  begin
    Memo1.Lines.Add(sCodeList[i]);
  end;

  sCodeList.Free;
end;

Also lege eine .txt in dem Ordner an in dem dein Projekt gespeichert ist, Der Stringlist wird dann Automatisch dieser Inhalt zugefügt. Und Anschließend werden alle ausgegeben. Hab das grad so runtergeschrieben, ungeprüft, sollte aber gehen.
Wie du das dann zufällig machst ist dann auch nicht mehr so schwer.

Wobei ein KeyGen ja keine Vorgegebenen Codes ausgibt, er GENeriert ja selsbt welche. Das geht anders

Hoffe ich konnte helfen

MfG Spiderpig