ich hab nun
Delphi-Quellcode:
for i := 0 to 9 do // 0..9
begin
old_p_test := ini.ReadString('Score','Name'+IntToStr(i),'0');
ShowMessage('s');
if (old_p_test = '0') then
begin
ShowMessage('s');
old[9-i].name := '-';
ShowMessage('s');
end else
old[9-i].name := Form3.XORString(old_p_test,key);
[...]
probiert.
nun werdn die ersten zwei messages ausgegeben, das 3. nicht.
d.h. der fehler ist hier !?
old[9-i].name := '-';
old ist ein 'array of HighScore', wobei HighScore so aussieht:
Delphi-Quellcode:
type
HighScore = record
name: string;
punkte: integer;
end;
TForm...