Текущий архив: 2003.10.09;
Скачать: CL | DM;
Вниз
Application.MessageBox Найти похожие ветки
← →
DimonA (2003-09-26 12:01) [0]Есть форма, на ней два Edit"а. По выходу из первого ставлю обработчик
procedure TForm1.Edit1Exit(Sender: TObject);
begin
Application.MessageBox("text", "test", MB_YESNO+MB_ICONWARNING+MB_DEFBUTTON1)
end;
После нажатия на кнопке сообщения, вроде фокус на втором сообщении, но курсора не видно и текст в не выделенный. Если нажимаешь BackSpace, то тект удаляется в эдите.
Вопрос: Как сделать чтобы курсор всетаки был виден??????
← →
m_kus (2003-09-26 14:08) [1]procedure TForm1.Edit1Exit(Sender: TObject);
begin
Application.MessageBox("text", "test", MB_YESNO+MB_ICONWARNING+MB_DEFBUTTON1);
PostMessage(edit2.Handle,WM_SETFOCUS,0,0);
end;
← →
DimonA (2003-09-26 14:56) [2]Спасибо
Страницы: 1 вся ветка
Текущий архив: 2003.10.09;
Скачать: CL | DM;
Память: 0.44 MB
Время: 0.007 c
