Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
 
Delphi 12 Athens
 
#7

AW: Markierung verschiebt sich in jeder Zeile

  Alt 16. Mai 2017, 15:13
Delphi-Quellcode:
procedure TForm1.addZeile(sUeberschrift, sText: String);
begin
  memoMessage.SelAttributes.Style := [fsBold];
  memoMessage.SelText := sUeberschrift + ' ';
  memoMessage.SelAttributes.Style := [];
  memoMessage.SelText := sText + #13;
end;
Ich hätte aber erwartet, dass noch wenigenst zwei SelStart/SelLength dort drin fehlen.

Meinem Versändis nach wird alles aktuell Markierte so durch die sUeberschrift überschreiben
und der sText überschreibt/löscht danach auch nochmal die sUeberschrift.
$2B or not $2B
  Mit Zitat antworten Zitat