![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите вернуть курсор...... [D7, NT4, Win2k, WinXP]
aleshap © (2006-03-07 16:06:00)Всем добрый день! И с праздником женскую половину (если такая имеется)
Есть проблема.
Форма на которой расположены около 10-ти полей TEdit. В действии OnExit одного из них (пусть Edit1) написан следующий код:
procedure TForm1.Edit1Exit(Sender: TObject);
begin
WAIT.Show;
sleep(400); // ... неважно...
WAIT.Hide;
end;
WAIT - форма типа "Ждите" (без элементов управления - да это и не важно)
И как только я перехожу с данного поля на любое другое, то теряется курсор (не мыши), и не обрабатывается событие OnEnter поля на которое перехожу, хотя при вводе с клавиатуры буковки появляются.
Помогите вернуть курсор.
Заранее благодарен!
Джо (2006-03-07 16:41:00) [21]> запускаете и пробуете перейти с одного поля на другое
И пробовать не буду. Зачем? Я и так знаю, что фокус ввода будет на каком-то из контроллов формы2. Ты ведь ее показываешь и активируешь.
aleshap (2006-03-07 16:27:00) [22]курсор - который определяет место ввода (для полной внятности - вертикальная мигающая "палочка")
предлагая наиграть....
создаете 2 формы....
на Form1 располагаете 2 поля. В OnExit поля Edit1 включаете след код:
Form2.Show;
Form2.Hide;
запускаете и пробуете перейти с одного поля на другое
Джо (2006-03-07 16:17:00) [23]> , то теряется курсор (не мыши),
Так какой "курсор" теряется? Откуда он "теряется"?