Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Прочее";
Текущий архив: 2006.08.27;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Прочее";
Текущий архив: 2006.08.27;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.046 c
2-1154762326
12
2006-08-05 11:18
2006.08.27
Можно ли вытащить код из exe


2-1154771914
Ильдар
2006-08-05 13:58
2006.08.27
Обучение DerectX


1-1152695808
antonn
2006-07-12 13:16
2006.08.27
Опять про локализации...


1-1152393567
leonidus
2006-07-09 01:19
2006.08.27
Как отоброзить в ListBox`е большой StringList?


2-1154608817
dimdnepr
2006-08-03 16:40
2006.08.27
Компонент TQuickRep





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский