Forum: Sonstige Fragen zu Delphi
Delphi
by marabu,
12. Jul 2006
Hi Mackhack,
du hast es eigentlich schon herausgefunden - es handelt sich um eine Abbildungsfunktion f(False) = -1 und f(True) = 1. Ich steuere damit die Bewegung des Carets vorwärts (forth = altenglisch für forward) oder rückwärts (not forth).
Grüße vom marabu
Forum: Sonstige Fragen zu Delphi
Delphi
by marabu,
11. Jul 2006
Hallo Orhan,
vielleicht hast du es garnicht bemerkt, aber mein Code in Beitrag #10 ist schon angepasst um die Farben zu wechseln. Du musstest ihn nur noch in das Beispielprojekt an die Stelle der alten Prozedur setzen um deine roten Buchstaben aufleuchten zu sehen. Ich habe das Projekt in geänderter Form nocheinmal für dich angehängt.
Grüße
marabu
Forum: Sonstige Fragen zu Delphi
Delphi
by marabu,
10. Jul 2006
Hallo Orhan,
genau dieses Verhalten zeigt die Methode MoveCaret() nach meiner letzten Änderung, wenn ich sie in das Beispielprogramm einsetze. Was funktioniert denn bei dir nicht?
Zur generellen Funktionsweise: Würde es nicht ausreichen, wenn der jeweilige Buchstabe hervorgehoben wird? Wozu wird der automatisch bewegte Cursor denn zusätzlich gebraucht?
Und das bei einer über den...
Forum: Sonstige Fragen zu Delphi
Delphi
by marabu,
10. Jul 2006
Hallo Orhan,
das Zeichen rechts neben dem Caret rot zu färben ist kein Problem:
function TDemoForm.MoveCaret(e: TRichEdit; forth: Boolean): Boolean;
var
iPos, iDelta: Integer;
begin
with e do
Forum: Sonstige Fragen zu Delphi
Delphi
by marabu,
9. Jul 2006
Hallo Orhan,
bei Multiline Edit Controls gibt es eine Besonderheit: du musst über den Zeilentrenner sLineBreak (#13#10) hinweg springen, mitten hinein funktioniert nicht.
function TDemoForm.MoveCaret(e: TRichEdit; forth: Boolean): Boolean;
var
iPos, iDelta: Integer;
begin
with e do
Forum: Sonstige Fragen zu Delphi
Delphi
by marabu,
9. Jul 2006
Hallo Orhan,
du kannst die Eigenschaft SelStart eines Text-Controls manipulieren, um das Caret zu bewegen. Die angehängte Demo zeigt dir wie es geht.
Grüße vom marabu