AV bei Stringvergleich

[Jelly]

Zitat:

Zitat von Airblader

old ist ein 'array of HighScore'

Hast du auch Speicher reserviert für dein dynamisches Array, mittels

Delphi-Quellcode:

Setlength (old,10)

Gruß

[Airblader]

Zitat:

Zitat von Christian Seehase

Moin Airblader,

probier's mal damit:

Delphi-Quellcode:

for i := 0 to high(old) do // 0..9 
...
old[high(old)-i].username := '-';

Bringt leider auch nichts :(

Hier nochmal die komplette Schleife:

Delphi-Quellcode:

for i := 0 to 9 do // 0..9
        begin
                old_p_test := ini.ReadString('Score','Name'+IntToStr(i),'0');
                ShowMessage('1');
                if (old_p_test = '0') then
                begin
                        ShowMessage('2');
                        old[9-i].username := '-';
                        ShowMessage('3');
                end else
                        old[9-i].username := Form3.XORString(old_p_test,key);

        
                old_p_test := ini.ReadString('Score','Punkte'+IntToStr(i),'0');
                if old_p_test<>'0' then
                        old[9-i].punkte := StrToInt(Form3.XORString(old_p_test,key))
                else
                        old[9-i].punkte := 0;
        end;    // 0..9

und hier meine vars:

Delphi-Quellcode:

var
        key: string; // XOR KEY
        i: integer; // Schleifen
        old: array of HighScore;
        Pos: integer;
        user_punkte: integer;
        old_p_test: string;

Und hier definier ich die für die schleife wichtigen:

Delphi-Quellcode:

// Key
        key := 'xxxxxxxxxxxxxxxxxxxxxxxx';
        // Punkte
        user_punkte := StrToInt(Form3.Edit1.Text);
        // INI Handle
        ini := TIniFile.Create(ExtractFilePath(Application.ExeName) + 'highscore.txt');

das 'xxxxxxxxxxxxxxxxxxxxxxxxxx' stimmt natürlich nicht :)

[TheReaper]

Hallo!

key und pos sind auch Reservierte Bezeichner! Weiß nicht ob es daran liegt aber sollte man nicht verwenden.

[Muetze1]

Moin!

Zitat:

Zitat von Jelly

Zitat:

Zitat von Airblader

old ist ein 'array of HighScore'

Hast du auch Speicher reserviert für dein dynamisches Array, mittels

Delphi-Quellcode:

Setlength (old,10)

Gruß

Ich würde vor allem erstmal Jelly's Beitrag abwarten und schauen ob es nicht daran liegt (bin ich mir ziemlich sicher)...

MfG
Muetze1

[Airblader]

Hm...danke nochmal :dp:

Werde das nun mal ausprobierne

air
/Edit:
Danke funktioniert :)
Nur wie erwartet stimmt halt die Theorie nicht ganz :(