Forum: Netzwerke
Delphi
by DeddyH,
3. Feb 2010
Nun verlink schon Dein komisches himxml, damit es Ruhe hat :tongue:
Forum: Netzwerke
Delphi
by DeddyH,
3. Feb 2010
Abgesehen davon, dass Du u.U. auf eine nicht existente Zeile zugreifst, ersetzt Du hier den ganzen Text des Memos mit der einen Zeile.
Forum: Netzwerke
Delphi
by DeddyH,
3. Feb 2010
Dann zeig doch einmal den aktuellen Code.
Forum: Netzwerke
Delphi
by DeddyH,
2. Feb 2010
Memo.Text := AnsiReplaceText(Memo.Text,'<',sLineBreak + '<');
Memo.Text := AnsiReplaceText(Memo.Text,'>','>' + sLineBreak);
Oder alles auf einmal:
Memo.Text := AnsiReplaceText(AnsiReplaceText(Memo.Text,'<',sLineBreak + '<'),'>','>' + sLineBreak);
Forum: Netzwerke
Delphi
by DeddyH,
1. Feb 2010
2 Verbesserungsvorschläge:
Memo.Text := {StrUtils.}AnsiReplaceText(Memo.Text,'<',sLineBreak + '<');
for i := Memo.Lines.Count - 1 DownTo 0 do
if (Trim(memo.lines) = '') or (Trim(memo.lines) = '<') then
memo.lines.Delete(i);
Auch nur heruntergetippt und nicht getestet.