Einzelnen Beitrag anzeigen

torud

Registriert seit: 26. Jul 2002
Ort: Sachsen
1.198 Beiträge
 
Delphi XE5 Professional
 
#1

CodeBase64 wirft Fehler auf - Warum?

  Alt 8. Apr 2004, 12:02
Hallo Leute,

ich schreibe mit einer Base64 Routine einen String in eine Datei. Wenn ich diesen dann aber zur Kontrolle auslesen will bekomme ich immer wieder die Meldung, dass das StringFormat unkorrekt ist. Ich lasse mir aber den String vorher anzeigen und kann keinen Fehler festellen.

'1234' ist doch ein gueltiger String, oder?

Hier steigt die Procedure aus:
Wenn ich diesen Bereich aber rausremme, funzt die Ueberpruefung nicht.
Code:
  if (Length(S) mod 4)<> 0 then
    begin
      raise Exception.Create('Base64: Incorrect string format');
    end;
Wer hat eine Idee.

Ich schicke auch gern den gesamten Code, wenns nuetzt.
Danke
Tom
  Mit Zitat antworten Zitat