Wie gibt man einen Substring aus?

[kagi3624]

Hallo,

wieder mal scheinbar was einfaches, wozu ich aber keine Informationen finde:

Wie kann man sich einen Substring von einem String ausgeben lassen? In meinem konkreten Fall möchte ich nur die ersten beiden Elemente des Strings haben.
Dankeschön. Edit: Der triviale Zugriff über die Indices ist mir schon klar, aber gibt da etwas eleganteres?

[SebastianZ]

Eine einfache Möglichkeit wäre hier der Copy - Befehl.

http://docwiki.embarcadero.com/Libra...en/System.Copy

[DieDolly]

Oder so

Delphi-Quellcode:

var
 s: string;
begin
 s := '12345';
 showmessage(s.Substring(0, 2));

[kagi3624]

Zitat:

Zitat von DieDolly (Beitrag 1459223)

Oder so

Delphi-Quellcode:

var
 s: string;
begin
 s := '12345';
 showmessage(s.Substring(0, 2));

Warum 0? Fängt bei Delphi der String nicht mit 1 an?

[Klaus01]

Zitat:

Zitat von kagi3624 (Beitrag 1459224)

Zitat:

Zitat von DieDolly (Beitrag 1459223)

Oder so

Delphi-Quellcode:

var
 s: string;
begin
 s := '12345';
 showmessage(s.Substring(0, 2));

Warum 0? Fängt bei Delphi der String nicht mit 1 an?

UniCode String fangen bei 0 an.
AnsiStrings bei 1 in der 0. Position ist die Länge des Strings gespeichertt.

Grüße
Klaus

[kagi3624]

Zitat:

Zitat von Klaus01 (Beitrag 1459226)

UniCode String fangen bei 0 an.
AnsiStrings bei 1 in der 0. Position ist die Länge des Strings gespeichertt.

Grüße
Klaus

Delphi 6 müsste ja nur AnsiStrings haben? Oder wie merkt man welchen man da grade hat?

[haentschman]

Zitat:

Delphi 6

...das fand ich als einen Witz/Scherz. :shock: Warum nicht die aktuelle Community Edition?

[DieDolly]

Zitat:

Warum nicht die aktuelle Community Edition?

Falls dem wirklich so ist, ist der Grund doch klar!

Wegen der Dateigröße :thumb: (Grund = :wall: )

[Stevie]

Zitat:

Zitat von Klaus01 (Beitrag 1459226)

UniCode String fangen bei 0 an.
AnsiStrings bei 1 in der 0. Position ist die Länge des Strings gespeichert.

Falsch, beide fangen bei 1 an - außer, es ist die Direktive $ZEROBASEDSTRINGS gesetzt.
Allerdings arbeiten alle Methoden von System.SysUtils.TStringHelper mit 0-basierten Indizes.

[kagi3624]

Zitat:

Zitat von haentschman (Beitrag 1459230)

Zitat:

Delphi 6

...das fand ich als einen Witz/Scherz. :shock: Warum nicht die aktuelle Community Edition?

Weil gewisse Personen nichts vom Fortschritt halten.