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

Формы   Найти похожие ветки 

← →
TimScorp ©   (2006-01-31 17:10) [0]

Доброго времени суток!

Имеем две формы Form1 и Form2. Form2 вызывается из Form1. На форме Form2 имеется 5 полей ввода (TEdit). При закрытии формы Form2 и повторном ее вызове курсор остается на том поле TEdit куда его переместили в предыдущий раз. Как сделать чтобы при каждом открытии формы Form2 курсор был в поле ввода TEdit1???

С уважением TimScorp.


← →
Johnmen ©   (2006-01-31 17:12) [1]

TEdit1.SetFocus


← →
Gero ©   (2006-01-31 17:13) [2]

Edit1.SetFocus

Где это писать, зависит от того, что значит
> повторном ее вызове


← →
Desdechado ©   (2006-01-31 17:31) [3]

> При закрытии формы Form2
явно делается Hide, а не Close с уничтожением


← →
Johnmen ©   (2006-01-31 17:33) [4]

Он не уничтожает, судя по сабжу. А жаль...:)


← →
TimScorp ©   (2006-02-01 05:51) [5]

форму закрываю при помоще Close

так еще и всё что написано было в полях TEdit почемуто сохраняется.

С уважением TimScorp.


← →
Gydvin ©   (2006-02-01 09:56) [6]

procedure TForm2.FormShow(Sender: TObject);
begin
Edit1.clear;
Edit2.clear;
Edit3.clear;
Edit4.clear;
Edit5.clear;
edit1.setfocus;
end;


← →
Desdechado ©   (2006-02-01 14:01) [7]

> форму закрываю при помоще Close
по умолчанию Close делает Hide
а вот если обработать FormClose (Action:=caFree), то форма уничтожится
нотогда ее придется создавать заново через Create


← →
TimScorp ©   (2006-02-01 20:33) [8]

Понял.

Всем спасибо.

С уважением TimScorp.



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

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



Память: 0.46 MB
Время: 0.027 c
15-1138267657
ПЛОВ
2006-01-26 12:27
2006.02.19
Проблема выбора ЖК монитора...


3-1134919989
Express
2005-12-18 18:33
2006.02.19
Обязательное поле....


2-1138868039
alexus
2006-02-02 11:13
2006.02.19
передать команду другому приложению


2-1138978461
Дмитрий_177
2006-02-03 17:54
2006.02.19
Повторить какуюнибудь процедуру или функцию несколько раз


1-1137584481
UnDISCOvery
2006-01-18 14:41
2006.02.19
NTFS - Как быстро заполнить жесткий диск?




   Наверх