Jak usunąć z Memo kursor i możliwość zaznaczenia tekstu ?
Chodzi mi o taki efekt jak przy Enabled := False ale bez
zmiany koloru liter na szary.
Chyba się nie da (mi się nie udało :-) ) Natomiast jeśli w Memo WordWrap=False to można to zrobić tak:
Na komponent TMemo wrzucasz TStaticText tak aby zakrywał go prawie w całości (tylko ramki na wierzchu) i ustawiasz:
AutoSize:=False;
Color:=clWhite;
a w TMemo.OnChange piszesz:
StaticText1.Caption:=Memo1.Text;
i wszystko gra - ustawiasz sobie tekst tylko w Memo a text sam się zmienia
do admina: Trochę zmieniłem post żeby nie był taki do niczego
Da sie :)
ReadOnly:=true;
Tło = jakie chcesz
Kursor =arrow;
teraz obsługujesz zdarzenie gdy myszka klika w memo i dajesz wtedy <font size="18">np:</span>
Button1.SetFocus;
<font color="green">ReadOnly:=true;
Tło = jakie chcesz
Kursor =arrow;
teraz obsługujesz zdarzenie gdy myszka klika w memo i dajesz wtedy np:
Button1.SetFocus;</span>
:):) Lofix, w życiu bym nie dał takiego czegoś do mojego programu ... :-/ ktoś sobie niechcąco kliknie i BACH... wyjechało mu na button :p
:):) Lofix, w życiu bym nie dał takiego czegoś do mojego programu ... :-/ ktoś sobie niechcąco kliknie i BACH... wyjechało mu na button :p
Detox... Button jest tu tylko przykładem..ale po co ja to mówię.. [glowa] [glowa] [glowa] [glowa] ;-( [glowa]
<font color="green">Detox... Button jest tu tylko przykładem..ale po co ja to mówię...</span>
Wiem, ale raczej IMHO to rozwiązanie jest do tzw. d**y (bez obrazy of kors), proponuje użyć innego podobnego komponentu, jeśli już naprawdę nie możeby zaznaczenia. SynMemo chyba ma taką opcję, a można go tak poustawiać, że niczym nie bedzie sie różnić :)
Rozwiazanie dla zaznaczenia tekstu i RichEdit - moze sie przyda:
http://4programmers.net/Forum/viewpost.html?id=84128
Wrzuć memo na panel i panel.enabled := false;
Wrzuć memo na panel i panel.enabled := false;
nooo @~~ rozwiązania jak na razie najprostsze i najlepsze
dzięki...