Thema: Delphi asci in Integer!!

Einzelnen Beitrag anzeigen

Benutzerbild von leddl
leddl

Registriert seit: 13. Okt 2003
Ort: Künzelsau
1.613 Beiträge
 
Delphi 2006 Professional
 
#3

Re: asci in Integer!!

  Alt 17. Sep 2007, 16:05
Zitat von sirius:
Was ist denn das für eine Berechnungsvorschrift/etc.
575053575748505553 --> 925990275
Immer 2 Ziffern als ASCII-Codierung für ein Zeichen

//Edit:
Ungetestet (da kein Delphi hier auf der Arbeit) und nur gschwind runtergeschludert:
Delphi-Quellcode:
function ASCIIToString(String s) : String;
var i : Integer;
Begin
  i := 0;
  result := '';
  while i < length(s) do
  begin
    temp := Copy(s,i,2);
    result := result + Chr(StrToInt(temp));
    inc(i,2);
  end;
end;
Keine Ahnung, ob das passt, sollte es aber eigentlich... Wobei, üblicherweise verstecke ich immer mindestens 2 Fehler in solchen Codestückchen
Wichtig ist hier auch, dass der ASCII-String natürlich eine gerade Anzahl Zeichen haben muss, sonst knallts Musst also evtl. noch etwas daran arbeiten
Axel Sefranek
A programmer started to cuss, cause getting to sleep was a fuss.
As he lay there in bed, looping round in his head
was: while(!asleep()) ++sheep;
  Mit Zitat antworten Zitat