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