datei kodieren und speichern

[maluprog]

hallo,

der hinweis war der richtige, habe darüber vorher keinen gedanken darüber verschwendet, da es ohne speichern
voll funktionstüchtig war!
habe mal mit einer "keyconst" gearbeitet - alles andere gelassen - und nur daraus folgendes neu abgeleitet:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var i :integer;
begin
     for i := 1 to high(superkey) do superkey[i]:=random(255);
     i := keyconst;

end;

funktioniert in jeder variation bestens, mit der code-darstellung ist schon ok!

danke
malu