Hallo,

ich möchte von einem String in meinem fall z.B. '#99Karl' die ersten 3 Buchstaben wegstreichen, sodass dann in einer Memo oder Listbox nur Karl angezeigt wird. Mit welchem Befehl ist dies realisierbar?

Gruß, htxmlx

Delete()

Ich denke, hier wäre es einfacher, anstatt mittels Delete() die ersten 3 Buchstaben wegzustreichen einfach mit Copy() alles ab dem 4. Zeichen ins Memo zu kopieren.

Hi, danke erstmal für deine antwort, aber kannste mir den Code mal am Beispiel zeigen also:

var Text: STring;

Text := '#99Karl'

und jetzt bitte von dem String Text die ersten 3 buchstaben wegdeleten, wie geht das ?

PS: zu fußball-robby: woher weiss ich denn wie lange der string ist also mit Copy muss ich angeben von wann also 4 bis wohin...

Gruß, htxmlx

zusammenfalten · markieren

Delphi-Quellcode:

var
  Text: STring;
begin

  Text := '#99Karl' ;

  Delete(Text, 1, 3);
  
  Label1.Caption := Text;

end;

ah genau sowas hab ich gesucht dankeschön an alle die mir hier in so schneller zeit gezeigt haben wies geht..

Gruß, htxmlx

Text := Delete( Text, 1, 3);

Zitat von mkinzler:

Text := Delete( Text, 1, 3);

Delete() ist im Gegensatz zu Copy() eine Prozedur, keine Funktion.

Zitat von toms:

Zitat von mkinzler:

Text := Delete( Text, 1, 3);

Delete() ist im Gegensatz zu Copy() eine Prozedur, keine Funktion.

//Lernmodus ein:

Was ist der Vor/Nachteil?

//Lernmodus aus:

Zitat von toms:

Zitat von mkinzler:

Text := Delete( Text, 1, 3);

Delete() ist im Gegensatz zu Copy() eine Prozedur, keine Funktion.

Und genau deswegen würde ich Copy nehmen, da man Delete z.B. nicht auf Memo.Lines[i] anwenden kann, da dies keine Variable ist.

Beispiel mit Copy:

markieren

Delphi-Quellcode:

s := '#99Karl';
Memo1.Lines.Add(Copy(s, 4, Length(s) - 3);

In diesem Beispiel spart man sich mit Copy anstatt Delete sogar eine ganze Zeile Code