[fofka]

Добрый день. Не большая проблема. Есть главная форма программы (Form1) из нее открываются другие формы (Form2),(Form3) и т.д.. Если я заполняю во второй форме едиты и комбобоксы и закрываю форму то они остаются заполнены пока не закрою главную форму (Form1). Как лучше сделать что бы при закрытии (Form2) очищались все введенные данные, без закрытия главной формы.
Заранее благодарю за помощь.

[Asinkrit]

В событии формы OnShow, очищать эти поля вручную.

[fofka]

То есть прописывать на каждый компонент? А нет возможности сразу как бы всю форму очистить?

[friz]

ну как вариант

Код:

for i:=1 to 2 do
(form1.FindComponent('Edit'+inttostr(i)) as Tedit).Text:='';

[fofka]

Неа. К сожалению этот вариант не подходит.

[Страдалецъ]

Чем именно не подходит? Имена полей не однотипные? Можно тогда просто по типу контрола чистить:

Код:

Var i: Integer;
begin
 for i := 0 to ControlCount - 1
 do if Controls[i].ClassType = TEdit
    then TEdit(Controls[i]).Clear;
end;