ich versuche in meiner Anwendung den Ansistring zu ersetzen, scheitere gerade an diesem Problem

zusammenfalten · markieren

Delphi-Quellcode:

Type AnsiStringNextGeneration = array of Byte;


function TrimPos (const aString : AnsiStringNextGeneration; ) : TStringPosition;
var
  I, L: Integer;
begin
  L := OldPosition.len;
  I := 1;
  while (I <= L) and (aString[I+Integer(OldPosition.start)-1] <= ' ') do Inc(I);
  if I > L then

solange an die function aString als AnsiString übergebn wurde funktionierte die Abfrage (aString[I+Integer(OldPosition.start)-1] <= ' ' , jetzt bekomme ich hier eine Fehlermeldung

[DELPHI][dcc32 Error] Position.unix.pas(77): E2008 Incompatible types[/DELPHI]

Wie muss ich die Abfrage oben anändern ?

Hmm..

Du Vergleichst in deiner Function mit = ' ', also einem Char, jedoch ist AnsiStringNextGeneration als array of Byte deklariert.
Und ein Byte ist eine Zahl, kein Zeichen.

Entweder vergleichst Du mit = 32 oder änderst 'AnsiStringNextGeneration als array of AnsiChar' (Wenn es AnsiChar unter Linux gibt...)

Hmm..

Gibt es da nicht den RawByteString, oder so ähnlich für so etwas?

a) ich hatte einen Cast via Char( AnsiStringNextGeneration [i]) schon versucht dies mag der Compiler aber auch nicht
b) der andere Weg über : https://github.com/rogerinnova/Delph...iler-Utilities
funktioniert bei mir auch nicht, die unit kann ich nicht unter LINUX compilieren

Zitat von HolgerX:

Wenn es AnsiChar unter Linux gibt...

nicht in Tokyo.

funktioniert
while (I <= L) and (aString[I+Integer(OldPosition.start)-1] <= ord(' ') ) do Inc(I); _
und
_
Charval := ord(AUcode.chars[0]); ?

kann jamand diese unit https://github.com/rogerinnova/Delph...iler-Utilities mit einem NEXTGEN compiler übersetzen ?
ich scheitere leider