Einzelnen Beitrag anzeigen

Benutzerbild von Lannes
Lannes

Registriert seit: 30. Jan 2005
Ort: Münster
745 Beiträge
 
Delphi 3 Professional
 
#8

AW: seltext in trichedit imitieren

  Alt 31. Mai 2011, 23:12
hmmmm, man muss ja nicht alles verstehen
... Ich würde dieses Verhalten gerne genauso simulieren, kann mir aber keinen Algorithums vorstellen, ...
...Eigentlich wollte ich ja nur das Verhalten von Trichedit bei shift+ende (Markierung von selstart bis Zeilenende incl. Zeilenumbruch) ändern
was möchtest Du denn nun? nachbauen oder ändern?

So wird das letzte Zeichen wieder aus der Markierung herrausgenommen:
Delphi-Quellcode:
case key of
  VK_END: if ssShift in Shift then
            RichEdit.SelLength := RichEdit.SelLength -1;
  end;
(alternativ auf das erste #10 nach Selstart prüfen und entsprechend markieren)
... aber ob das dein Ziel ist
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
  Mit Zitat antworten Zitat