![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Формы [D7, XP]
TimScorp © (2006-01-31 17:10:00)Доброго времени суток!
Имеем две формы Form1 и Form2. Form2 вызывается из Form1. На форме Form2 имеется 5 полей ввода (TEdit). При закрытии формы Form2 и повторном ее вызове курсор остается на том поле TEdit куда его переместили в предыдущий раз. Как сделать чтобы при каждом открытии формы Form2 курсор был в поле ввода TEdit1???
С уважением TimScorp.
TimScorp (2006-02-01 20:33:00) [1]Понял.
Всем спасибо.
С уважением TimScorp.
Desdechado (2006-02-01 14:01:00) [2]> форму закрываю при помоще Close
по умолчанию Close делает Hide
а вот если обработать FormClose (Action:=caFree), то форма уничтожится
нотогда ее придется создавать заново через Create
Gydvin (2006-02-01 09:56:00) [3]
procedure TForm2.FormShow(Sender: TObject);
begin
Edit1.clear;
Edit2.clear;
Edit3.clear;
Edit4.clear;
Edit5.clear;
edit1.setfocus;
end;
TimScorp (2006-02-01 05:51:00) [4]форму закрываю при помоще Close
так еще и всё что написано было в полях TEdit почемуто сохраняется.
С уважением TimScorp.
Johnmen (2006-01-31 17:33:00) [5]Он не уничтожает, судя по сабжу. А жаль...:)
Desdechado (2006-01-31 17:31:00) [6]> При закрытии формы Form2
явно делается Hide, а не Close с уничтожением
Gero (2006-01-31 17:13:00) [7]Edit1.SetFocus
Где это писать, зависит от того, что значит
> повторном ее вызове
Johnmen (2006-01-31 17:12:00) [8]TEdit1.SetFocus