Einzelnen Beitrag anzeigen

nahpets
(Gast)

n/a Beiträge
 
#9

Re: TWebbrowser Werte in Lable.Caption darstellen

  Alt 1. Feb 2010, 12:01
Hallo,

Zeichenfolgen ersetzen geht z. B. mit:memo.text := AnsiReplaceText(Memo.Text,'<',#13 + '<') Damit hast Du aus dem < einen Zeilenvorschub plus < gemacht.

Zeilen Löschen könnte in etwa so gehen:
for i := Memo.Lines.Count - 1 DownTo 0 do if Copy(memo.lines[i],1,1) = '<then memo.lines.Delete(i); Wenn Du statt des Memos eine TStringList (oder Nachfahren) benutzt, dann kannst Du die Zeile mit dem Text ErrorCode überPosition := Stringliste.IndexOf('ErrorCode') erhalten und den ErrorCode selbst dann mitErrorCode := Stringliste.IndexOf('ErrorCode') + 1 Alles ungetestet nur hingedaddelt.
  Mit Zitat antworten Zitat