Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TEdit без курсора ? [D6, WinXP]


@Lex ©   (2002-09-02 01:01:00) 

Как из TEdit убрать курсор?


@Lex   (2002-09-02 21:40:00) [1]

Спасибо!


Юрий Зотов   (2002-09-02 06:43:00) [2]

HideCaret(Edit1.Handle)


Billy   (2002-09-02 02:31:00) [3]

Ну, во-первых, можно сделать Enabled:=false :), но это наверное тебе не подойдет. Другой вариант не такой простой и не очень красивый. Итак, сначала добавляем на форму Edit у которого ширина = высота = 0. Для нашего (безкурсорного) едита в событии OnEnter пишем EditHidden.SetFocus, где EditHidden - это наш 0х0 едит. Потом ставим форме KeyPreview в true и в OnKEyPressed для формы же пишем: MyEdit.Text:=MyEdit.Text+Key. Наверняка можно проще, но думать не хочатся


Наверх

Титульная страница Поиск, карта сайта Написать письмо