[delphi] Kłopot z kursorem

0

Witam.
Robię sobie progsa i zastrzymałem się na takim oto problemie:
kiedy chcę żeby po wciśnięciu "ą" pojawił się inny znaczek to do OnKePress daję coś takiego:

if key=#165 then
SynEdit1.SelText := #161;

i teraz mam taki problem bo razem z nowym znaczkiem pojwia mi się "ą" którego nie chcę no więc do OnChange daję :

1* SynEdit1.Lines.Text:=AnsiReplaceStr(RichEdit1.Lines.Text,'ą','');

i wtedy daje to taki efekt że kiedy piszemy to słówka wychodzą od tyłu bo za każdym razem
gdy wykonuje się funkcja *1 to kursor przenosi się na początek textu.

Pytanie:
Jak zrobić żeby (może da się inaczej niż wyżej) kursor nie przenosił się na początek textu.

0

zrob to prosciej:
if key=#165 then Key:=#161;

i juz. SynEdit tego keya sobie sam wsadzi gdzie trzeba :))

jak koniecznie chcesz sam mu wsadzac ;)) to

if key=#165 then
begin
key:=0;
SynEdit1.SelText:=#161;
end;
i przesun kursor na wlasciwe miejsce przy pomocy SelStart--Pawel {Delphi 6 Personal}

Po pierwsze: naciśnij F1

1 użytkowników online, w tym zalogowanych: 0, gości: 1