String-Ende mit while finden

[Caps]

Genau, es ist nur Text.
Und den Aufruf von length wollte ich vermeiden.

Wenn lange Strings max. 2GB lang sein können, müsste LongWord als Typ für die Länge reichen, oder?
Das war meine anfängliche Sorge...

[KodeZwerg]

LongWord/Cardinal wäre passend.

[TiGü]

Zitat von Caps:

Genau, es ist nur Text.
Und den Aufruf von length wollte ich vermeiden.

Warum? Akademisches Interesse?

[Caps]

Zitat von TiGü:

Zitat von Caps:

Genau, es ist nur Text.
Und den Aufruf von length wollte ich vermeiden.

Warum? Akademisches Interesse?

Ja ^^

[KodeZwerg]

Zitat von TiGü:

Zitat von Caps:

Genau, es ist nur Text.
Und den Aufruf von length wollte ich vermeiden.

Warum? Akademisches Interesse?

hmm ich grübel gerade, eigentlich sollten es zwei unterschiedliche ergebnisse haben.
"Length(Text)" und "While not #0 inc(i)"
Length liefert länge vom text, incremental count liefer zusätzlich auch alles nicht-sichtbare.
Beispiel Zeilenumbrüche = 2 bytes

[Caps]

Length liefert NICHT die Zeilenumbrüche mit?
Das würde mich jetzt aber aus der Bahn werfen...

[Delphi.Narium]

Zitat von Caps:

Length liefert NICHT die Zeilenumbrüche mit?
Das würde mich jetzt aber aus der Bahn werfen...

Schonmal ausprobiert?

Delphi-Quellcode:

var
  s : String;
begin
  s := '>' + #13#10#13#10#13#10 + '<';
  ShowMessage(Format('%s ist %d Zeichen lang.',[s,Length(s)]));
end;

Was kommt denn dabei jetzt raus?

Code:

---------------------------
Editor
---------------------------
>


< ist 8 Zeichen lang.
---------------------------
OK   
---------------------------

[Uwe Raabe]

Nur nochmal zur Klärung: Strings und AnsiStrings in Delphi enthalten immer ein abschließendes 0-Zeichen. Daher ist eine Umwandlung in PChar bzw. PAnsiChar nicht nötig. Allerdings muss man aufpassen, wenn man den String an diesem Punkt indiziert, da das 0-Byte bzw. 0-Word außerhalb des gültigen Bereichs liegt. Zur Not kann man dann aber die Bereichsprüfung abschalten.

Lange String-Typen

[himitsu]

Ja, es zählt die Zeichen, und sollte ein Zeilenumbruch 2 Zeichen lang sein, dann sind das eben auch 2 Zeichen und nicht 1.
Man darf vorher gern #13#10 durch #10 ersetzen, oder man muß die Zählfunktion anpassen.

Zitat von Uwe Raabe:

Daher ist eine Umwandlung in PChar bzw. PAnsiChar nicht nötig.

Ja, aber wenn du über S[x] zugreifst und die Indexprüfung aktiv ist, dann raucht es, sobald du auf diese impliziten #0 zugreifen willst.

[Caps]

Zitat von Delphi.Narium:

Zitat von Caps:

Length liefert NICHT die Zeilenumbrüche mit?
Das würde mich jetzt aber aus der Bahn werfen...

Schonmal ausprobiert?

Delphi-Quellcode:

var
  s : String;
begin
  s := '>' + #13#10#13#10#13#10 + '<';
  ShowMessage(Format('%s ist %d Zeichen lang.',[s,Length(s)]));
end;

Was kommt denn dabei jetzt raus?

Code:

---------------------------
Editor
---------------------------
>


< ist 8 Zeichen lang.
---------------------------
OK   
---------------------------

Das ist genau das Verhalten, was ich erwarten würde; Length zählt die Umbrüche mit.
Etwas anderes hätte mich gewundert.

lg Caps