AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

AV bei Stringvergleich

Ein Thema von Airblader · begonnen am 6. Nov 2004 · letzter Beitrag vom 7. Nov 2004
Antwort Antwort
Seite 2 von 2     12   
Benutzerbild von Jelly
Jelly

Registriert seit: 11. Apr 2003
Ort: Moestroff (Luxemburg)
3.741 Beiträge
 
Delphi 2007 Professional
 
#11

Re: Problem mit SetLength

  Alt 6. Nov 2004, 20:49
Zitat von Airblader:
old ist ein 'array of HighScore'
Hast du auch Speicher reserviert für dein dynamisches Array, mittels Setlength (old,10) Gruß
  Mit Zitat antworten Zitat
Benutzerbild von Airblader
Airblader

Registriert seit: 29. Okt 2004
Ort: Geislingen an der Steige
742 Beiträge
 
#12

Re: AV bei Stringvergleich

  Alt 6. Nov 2004, 20:53
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<>'0then
                        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
Ingo Bürk
Es nimmt der Augenblick, was Jahre geben.

Johann Wolfgang von Goethe
  Mit Zitat antworten Zitat
TheReaper

Registriert seit: 27. Feb 2003
Ort: chemnitz
90 Beiträge
 
Delphi 2005 Personal
 
#13

Re: AV bei Stringvergleich

  Alt 6. Nov 2004, 22:47
Hallo!

key und pos sind auch Reservierte Bezeichner! Weiß nicht ob es daran liegt aber sollte man nicht verwenden.
  Mit Zitat antworten Zitat
Muetze1
(Gast)

n/a Beiträge
 
#14

Re: Problem mit SetLength

  Alt 6. Nov 2004, 23:24
Moin!

Zitat von Jelly:
Zitat von Airblader:
old ist ein 'array of HighScore'
Hast du auch Speicher reserviert für dein dynamisches Array, mittels 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
  Mit Zitat antworten Zitat
Benutzerbild von Airblader
Airblader

Registriert seit: 29. Okt 2004
Ort: Geislingen an der Steige
742 Beiträge
 
#15

Re: AV bei Stringvergleich

  Alt 7. Nov 2004, 10:58
Hm...danke nochmal

Werde das nun mal ausprobierne

air
/Edit:
Danke funktioniert
Nur wie erwartet stimmt halt die Theorie nicht ganz
Ingo Bürk
Es nimmt der Augenblick, was Jahre geben.

Johann Wolfgang von Goethe
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 2     12   


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 17:39 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz