Вниз
Скачать: CL | DM;

Как вернуть..   Найти похожие ветки 

 
3S   (2006-08-03 14:08) [0]

Как вернуть фокус Edit-у если одна форма закрывается, а другая активируется.... SetFocus не помогает.... Edit расположен на той форме которая активируется...


 
alles ©   (2006-08-03 14:10) [1]

OnActivate
SetFocus


 
3S   (2006-08-03 14:19) [2]

Бробовал, не помогает...


 
3S   (2006-08-03 14:22) [3]

Бробовал, не помогает...


 
3S   (2006-08-03 14:28) [4]

Бробовал, не помогает...


 
DeadMeat ©   (2006-08-03 14:34) [5]

А четвертый раз?


 
3S   (2006-08-03 14:45) [6]

Случайно...
Смысл процедуры SetFocus???

В событии ОnActive ставлю Edit1.SetFocus , курсор не находится в поле ввода Edit-а, почему?


 
Сергей М. ©   (2006-08-03 14:48) [7]

А какой контрол при этом фактически имеет фокус ?


 
alles ©   (2006-08-03 14:50) [8]

ПРОБОВАЛ ТАК И РАБОТАЕТ
procedure TForm1.Button2Click(Sender: TObject);
begin
Form2.show;
end;

procedure TForm2.FormActivate(Sender: TObject);
begin
EDIT2.SetFocus;
end;


 
3S   (2006-08-03 14:54) [9]

edit находится на form1
затем делается form2.showmodal;
потом form2.close;.
Так вот нужно чтоб фокус оказывался на form1.edit1

procedure TForm1.FormActivate(Sender: TObject);
begin
EDIT1.SetFocus;
end;-Не помогает!!


 
Сергей М. ©   (2006-08-03 14:59) [10]

А ты уверен, что событие FormActivate действительно происходит при этом ?


 
3S   (2006-08-03 15:06) [11]

действительно FormActivate не происходит.
А почему это может быть?


 
КаПиБаРа ©   (2006-08-03 15:06) [12]

procedure TForm1.Button1Click(Sender: TObject);
begin
 Form2.ShowModal;
 Edit1.SetFocus;
end;


 
3S   (2006-08-03 15:11) [13]

Спасибо, теперь получилось!!!



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.029 c
6-1144664680
Std
2006-04-10 14:24
2006.08.27
Indy tc clien


15-1154429606
Сергей М.
2006-08-01 14:53
2006.08.27
Win32-дебагер для Win16-приложений


5-1138281758
ronyn
2006-01-26 16:22
2006.08.27
Встроеное контекстное меню


4-1146597197
err0rFrost
2006-05-02 23:13
2006.08.27
изменение темы рабочего стола в ХР


15-1153485865
McSimm
2006-07-21 16:44
2006.08.27
Продолжение ветки "Для любителей коммунизъъма (TUser)"




   Наверх