Delphi Tips & Tricks

softsale > Delphi Tips & Tricks

następna rada >

< poprzednia rada

Jak zaznaczyć całą zawartość memo poprzez CTRL +A? na zdarzeniu OnKeyDown komponentu memo ..... if (Key = Ord('A')) and (ssCtrl in Shift) then begin TMemo(Sender).SelectAll; Key := 0; end;

SOFTSALE - Oprogramowanie i Szkolenia softsale@softsale.com.pl 03-565 Warszawa , ul. Borzymowska 43 lok. 301C tel/fax:4084840,0607612428