String zu Byte-Array konvertieren und umgekehrt

[knaeuel]

ich hab noch einen Fehler gefunden, der das Problem löst...

dieses Code-Fragment:

Delphi-Quellcode:

{$IFDEF MSWINDOWS}
  for i:=1 to length(input) do
{$ELSE} //auf iOS und Android sind die Strings 0-basiert...
  for i:=0 to length(input)-1 do
{$ENDIF}
  begin
    if i mod 2 = 0 then

sollte so aussehen:

Delphi-Quellcode:

{$IFDEF MSWINDOWS}
  for i:=1 to length(input) do
  begin
    if i mod 2 = 0 then
{$ELSE} //auf iOS und Android sind die Strings 0-basiert...
  for i:=0 to length(input)-1 do
  begin
    if (i+1) mod 2 = 0 then
{$ENDIF}