Zeichenlänge eines Memo zu klein

[himitsu]

Zitat:

s.Text := StringReplace(rawText, #13, #13#10, [rfReplaceAll]);

Das StringReplace kann ganz beruhigt weg, da die TStringList mit allen Zeilenumbrüchen klarkommen wird. (#13#10, #10 und #13)

Zitat:

For i := 1 to s.Count - 1 do

0 bis count-1

Delphi-Quellcode:

var
  s: TStringList;
  line: String;
begin
  url := 'http://www.xxx.com/daten.txt';

  s := TStringList.Create;
  try
    try
      s.Text := IdHTTP1.Get(url);
    except
      on e: Exception do
        raise Exception.CreateFmt('Fehler beim Download von "%s": %s', [url, e.Message]);
    end;
    for i := 0 to s.Count - 1 do
      begin
        //Application.ProcessMessages;
        line := s[i];
        try
          ...
        except
          on e: Exception do
            raise Exception.CreateFmt('Fehler beim Verarbeiten von Zeile %d der Datei "%s": %s %s', [i, url, s[i], sLineBreak + e.Message]);
        end;
      end;
  finally
    s.Free;
  end;
end;

[Medium]

Zitat von himitsu:

Das StringReplace kann ganz beruhigt weg, da die TStringList mit allen Zeilenumbrüchen klarkommen wird. (#13#10, #10 und #13)

Seit welcher Version? Ich meine, dass die D7 StringList das noch nicht tat, kann mich aber irren. (Der TE hat seine Version nicht angegeben, daher bin ich mit meiner mutmaßlichen Erinnerung auf Nummer Sicher gegangen.)

Zitat:

0 bis count-1

Wenn man alle Zeilen durchgehen will ja, aber der TE hat irgendwo hier erwähnt, dass er wirklich erst ab Zeile 1 anfangen will

[himitsu]

Zitat von Medium:

Seit welcher Version? Ich meine, dass die D7 StringList das noch nicht tat, kann mich aber irren.

Ich wollte vorhin nachsehn, wie es in D7 aussieht, aber mir ist grade eben der Server abgeraucht und ich komm an die D7-VM nicht ran.
Also nächste Woche dann mal.

Zitat von Medium:

Zitat:

0 bis count-1

Wenn man alle Zeilen durchgehen will ja, aber der TE hat irgendwo hier erwähnt, dass er wirklich erst ab Zeile 1 anfangen will

Na dann

[himitsu]

Ein Blick in den Delphi7-Quellcode (TStrings.SetTextStr) sagt mir, daß .Text mit Allem (#13#10, #10 und #13) zurecht kommt.

[Medium]

Dann war's nur meine Verwirrtheit Danke für die Aufklärung!

Edit: Wenn das schon in TStrings enthalten ist, wirft das natürlich die Frage auf, was nun das Problem beim TE wirklich ist... Weil dann sollte auch das Memo dies berücksichtigen, und das Abstellen von WordWrap zum Ziel führen (wenn auch mit dem Overhead der grafischen Ausgabe bzw. Nutzen eines WinControls für Aufgaben, für die es nicht gedacht ist.)