Формы

← →
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.

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

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

Понял.

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

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

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