Wie gibt man einen Substring aus?

[kagi3624]

Zitat von DieDolly:

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 von kagi3624:

Zitat von DieDolly:

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 von Klaus01:

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. 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 (Grund = )

[kagi3624]

Zitat von haentschman:

Zitat:

Delphi 6

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

Weil gewisse Personen nichts vom Fortschritt halten.

[ghubi01]

@kagi3624

wie wäre es mit dem Klassiker:

Delphi-Quellcode:

procedure TForm1.Test;
var
  e, s: string;
begin
  s:='123456';
  e:=LeftStr(s,2);
  Memo1.Lines.Add(e);
end;

Die Function LeftStr() ist Bestandteil der Unit StrUtils (D6, D7).
Im Aktuellem Delphi: System.StrUtils

[TurboMagic]

Tja, dem OP wird wohl echt nur der Klassiker bleiben, wenn er D6 benutzt.
Denn Stringhelper usw. gab's da noch nicht...

[kagi3624]

Zitat von ghubi01:

@kagi3624

wie wäre es mit dem Klassiker:

Delphi-Quellcode:

procedure TForm1.Test;
var
  e, s: string;
begin
  s:='123456';
  e:=LeftStr(s,2);
  Memo1.Lines.Add(e);
end;

Die Function LeftStr() ist Bestandteil der Unit StrUtils (D6, D7).
Im Aktuellem Delphi: System.StrUtils

Danke, das sieht schon mal besser aus, als was ich hatte

[Stevie]

Zitat von Klaus01:

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.