Ich habe mein eigenes Spiel als Konsolenanwendung geschrieben und es ist erhältlich unter
www.dreamofreality.de.ki und habe ein neues Projekt, jetzt als normales Programm.
Leider gibt es auch hier einige Probleme:
Delphi-Quellcode:
begin
K:=1;
while(K<=10)do
begin
if fileexists(dir+'\DATA\save\'+inttostr(K)+'.sav')
then
begin
{}
assignfile(figdat, dir+'\DATA\save\'+inttostr(K)+'.sav');
reset(figdat);
read(figdat, FIG);
closefile(figdat);
{}
Laden1.Chara.Items.Add(FIG.PER.NI+', Level '+inttostr(FIG.DAT.LVL));
end;
K:=K+1;
end;
end;
end;
Dieser Code soll die einzelnen Savegames in eine ComboBox eintragen (Laden1.Chara) und funktioniert leider nur einwandfrei, wenn vorher ein neues Savegame angelegt wurde. Ich verstehe das beim besten Willen nicht.