![]() |
HighScore liste schon wieder *g*
hi :)
Ich muss schon wieder nerven *seufz* Also..nach meinem AV-Problem nun ein neues. Ich verschlüssel mit XOR (mit key). Meine Punkte in der Liste werden gespeichert. Für die Namen allerdings bekomm ich nur diese Vierecke wie sie bei einer Schriftart kommen , wenn die Schriftart das Zeichen nicht kennt. Ich hab die XOR-Funktion (von delphi-source.de)
Delphi-Quellcode:
Mein Schlüssel sieht in etwa so aus (natürlich nicht genau so :zwinker: )
function TForm3.XORString(Text, Schluessel: String): String;
var i, q: integer; begin q:=1; if Trim(Schluessel)='' then Schluessel:='asdlkfjöalskjdfölaksdjfölaksjfd'; for i:=1 to Length(Text) do begin Text[i]:=Chr(Ord(Text[i]) XOR Ord(Schluessel[q])); inc(q); if q>length(Schluessel) then q:=1; end; Result:=Text; end; Zitat:
Ich hätte nun daran gedacht, dass evtl. das ganze Alphabet+Nummern vorhanden sein muss. Kann das sein :?: air |
Re: HighScore liste schon wieder *g*
Lass mal ein bisschen mehr Code sehen, wie du die Funktion aufrufst usw. ...
|
Re: HighScore liste schon wieder *g*
hm naa...also ich rufe die funktion zum speichern des namens gneau gleich auf wie die zum speichern der punkte.:
Delphi-Quellcode:
dabei enthält old[i].username z.b. 'airblader'.
for i:=0 to 9 do
begin ini.WriteString('Score','Name'+IntToStr(i),Form3.XORString(old[i].username,key)); ini.WriteString('Score','Punkte'+IntToStr(i),Form3.XORString(IntToStr(old[i].punkte),key)); end; bau ich übrigens vor dem speichern:
Delphi-Quellcode:
ein, bekomm ich nur das:
ShowMessage(old[i].username + ' - ' + Form3.XORString(old[i].username,key));
Zitat:
|
Re: HighScore liste schon wieder *g*
hm mal ganz abgesehen vom problem würde ich an deiner stelle die ganze ini auf einmal xoren und entxoren, nicht jeden eintrag einzeln. und wo liegt das problem wenn in der verschlüsselten datei nur 4 ecke sind, solnge beim entschlüsseln das richitge rauskommt :gruebel:
|
Re: HighScore liste schon wieder *g*
Zitat:
Wie im Beispiel mit showmessage ist es bei der ausgabe: da ist nix. aber evtl. stelle ich mal um auf ales xor'en....hatte genug stress mit dieser xor'erei :mrgreen: |
Alle Zeitangaben in WEZ +1. Es ist jetzt 03:42 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz