проблема с отображением форм
сложилась еще одна проблемка(
У меня в проекте есть несколько форм. При закрытии формы и последующем отображении данные в поле Edit остаются. А надо, чтобы не оставались (Edit.caption='' не устраивает). Пробовал и Form.refresh и Form.Repaint не помогает.
Помогает вот что: Form.Close и Application.FormCreate(TForm,Form). Но в проекте форм несколько штук и обращаться к другим формам из других юнитов не удобно(не красиво вписывать в юзес все юниты).
Пробовал вот еще что:
For i:=0 to Application.Components.Count-1 do
begin
if (Application.Components[i] is TForm) then
if ((Application.Components[i] as TFrom).name <>'Form1') then
begin
(Application.Components[i] as TForm).close;
Application.CreateForm(TForm,(Application.Componen ts[i] as TForm)); // ругается
end;
end;
|