Ersten Buchstaben eines Strings aus einer Stringlist

[chris.]

Hallo,
ich arbeite ein wenig mit Stringlisten und habe folgendes Problem: Gibt es eine Möglichkeit aus einem String aus einer stringlist das erste Zeichen auszugeben??? Ich kann zwar einen String aus einer Stringlist auswählen, aber von dem String nicht das erste zeichen....

Danke schon einmal im voraus...

grüße chris.

[FAlter]

Hi,

geht schon, aber nur über [X][1], denn [X, 1] funktioniert hier nicht.

Delphi-Quellcode:

  ShowMessage(Memo1.Lines[0][1]);

Mfg
FAlter

[shmia]

Es gibt ja im Prinzip 2 Möglichkeiten a.) man holt über den []-Operator ein bestimmtes Zeichen oder b.) man kopiert einen Teilstring der Länge 1.
Bei a.) gibt es aber einen Zugriffsfehler, wenn der String zu kurz (oder leer) ist.
Deshalb bevorzuge ich b.):

Delphi-Quellcode:

var
  Zeichen_1:string;
begin
  zeichen_1:= Copy(stringlist[3], 1, 1);  // 1. Zeichen kopieren

[FAlter]

Hi,

wenn er es jedoch einem Char zuweisen möchte, bringt deine Variante auch nichts.

Delphi-Quellcode:

function GetFirstCharDef(const S: String; Default: Char = #0): Char;
begin
  if S = '' then
    Result := Default
  else
    Result := S[1];
end;

//im Code
MyChar := GetFirstCharDef(MyStringList[I]);

Mfg
FAlter