StringList und LineEnding

Für Fragen zur Programmiersprache auf welcher Lazarus aufbaut
Antworten
Mathias
Beiträge: 6162
Registriert: Do 2. Jan 2014, 17:21
OS, Lazarus, FPC: Linux (die neusten Trunk)
CPU-Target: 64Bit
Wohnort: Schweiz

StringList und LineEnding

Beitrag von Mathias »

Kann man es bei der StringList unterbinden, das am Schluss ein LineEnding kommt ?
Ich meine das Zeichen hinter 51.
Oder bleibt mit da nur den Umweg über einen String, und es mit Copy oder Delete zu lösen ?

Code: Alles auswählen

var
  sl: TStringList;
  i: integer;
begin
  sl := TStringList.Create;
  sl.Add('abc');
  sl.Add('123');
 
  for i := 1 to Length(sl.Text) do begin
    Write(byte(sl.Text[i]): 4);
  end;


Ausgabe:

Code: Alles auswählen

97 98 99 10 48 50 51 10
Mit Lazarus sehe ich grün
Mit Java und C/C++ sehe ich rot

wp_xyz
Beiträge: 4869
Registriert: Fr 8. Apr 2011, 09:01

Re: StringList und LineEnding

Beitrag von wp_xyz »

Code: Alles auswählen

sl.SkipLastLineBreak := true;

Mathias
Beiträge: 6162
Registriert: Do 2. Jan 2014, 17:21
OS, Lazarus, FPC: Linux (die neusten Trunk)
CPU-Target: 64Bit
Wohnort: Schweiz

Re: StringList und LineEnding

Beitrag von Mathias »

Danke, das war die Lösung. 8)
Mit Lazarus sehe ich grün
Mit Java und C/C++ sehe ich rot

Antworten