Jak zjistit že form běží – Delphi – Fórum – Programujte.com

Dobry den.

Jak zjistím s form1 že je form2 již spuštěn abych ho mohl s form1 ukončit.

Hm,tak jinak.

Ve form1 mam gombiky.

V každem je.

procedure TForm1.Button2Click(Sender: TObject);
begin
  Form2.close
  Form2.show
end;

Každy button použiva form2, jen se při spouštění načitaji jina data.

Pronbem je že Form2.close formulař zavře ale furt visi v pamětí a jsou v něm načtena data.

Pokud použivam vlakba, tak i ty vlakna běží.

Když dam do form2.close přikaz  Form2.Free nebo  FreeAndNil(Form2) tak je to ok

Už ho však s form1 znovu nespustím, proto že je smazan a musím vytvořit novy a tu je problem.

Při spuštěni programu se načitají do paměti všechny formulaře.

Jak tedy zjistím zda ten formulař je v panětí.