[Delphi] zaznaczanie textu w edit (jak wyłączyć?)

no to kurna pytanie jest w temacie ;-)
wiem że to głupie jet ale bardzo to potrzebuje a za japonie nie wiem jak to wyłączyć, czyżby gdzieś w properties ?? ale tam szukałem i znaleźć nie moge

Jest taka jedna właściwość CanFocus, ale jak się da na false to kompil wywala jakiś błąd "Left side cannot itd.."
Wiec spróbuj taki kod:
Wrzuć sobie timer i ustaw interval na 1.
Potem wklep kod:

if Edit1.Focused then
begin
Edit1.SelStart:=0;
end;

Taki dziwny ale skuteczny ... :-)

hmm to raczej nie zdaje egzaminu ;-| są jakieś inne pomysły ? ale dzięki bo dzięki tobie poznałem nowy bardzo przydatny komponent - timer. dzienx :-)

no to kurna pytanie jest w temacie ;-)
wiem że to głupie jet ale bardzo to potrzebuje a za japonie nie wiem jak to wyłączyć, czyżby gdzieś w properties ?? ale tam szukałem i znaleźć nie moge

hmmmmm... a może po prostu:

procedure TForm1.Edit1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
Edit1.SelLength := 0;
end;

procedure TForm1.Edit1Enter(Sender: TObject);
begin
Edit1.SelLength := 0;
end;