Einzelnen Beitrag anzeigen

Benutzerbild von benniwm
benniwm

Registriert seit: 2. Nov 2003
Ort: Monheim/Bayern
14 Beiträge
 
Delphi 7 Enterprise
 
#13

Re: [LISTBOX]Immer die ersten 10 Zeichen eines eintrags färb

  Alt 8. Mai 2005, 11:22
glaube ich nicht weil ich ja nen ganzen string habe, und somit ja nicht weiß wann der name aufhört und der text anfängt.
außer ich sende die länge des nicks immer mit:
z.b nickname=Peter
dann würde die nachrihct so aussehen:
5[11:18:03]Peter:NAchricht....
dann könnte ich das erste zeichen aus dem string entfernen und dann so weiter machen:
Delphi-Quellcode:
//Uhrzeit
    richedit1.SelStart := 0;
    richedit1.SelLength := 10;
    richedit1.SelAttributes.Color := clBLue;
//Name
    richedit1.SelStart := 11;
    richedit1.SelLength := 11+Die Zahl die vom string entfernt wurde;
    richedit1.SelAttributes.Color := clRed;
//Text
    richedit1.SelStart := richedit1.SelLength := 11+Die Zahl die vom string entfernt wurde;
    richedit1.SelLength := Length(RichEdit1.Text);
    richedit1.SelAttributes.Color := clBLue;
nur weiß ich nicht wie ich die Zahl wegnehmen kann...
thx!!
  Mit Zitat antworten Zitat