[DELPHI] Jak načíst více formů?

with TForm1.Create(Application) do Show;

K formum muzes pristupovat pomoci Screen.Forms[index]

Též funguje: TForm1.Create(Application).Show

Ten zápis je síce dobrý, ale mne sa nepáči. Opticky mi tam chýba Free.

Edit: A keď je tam Show, tak dokedy bude existovať inštancia toho okna? Aplikácia bude bežať ďalej, tak ako je to?

Free když to není modální, musíš udělat v tom formu, jinak ti to zmizí dřív, než se to stačí objevit přes xichtem . Instance okna bude exitovat dokud se okno nezvře (za předpokladu v OnClose Action := caFree). Instance nebude přístupná od jinud, než ze samotného formu. Aplikace pojede dál za tímto CREATE, obvykle "skončí" čekáním na nějakou událost, třebas i v jíném okně.

//Edit: Obvykle v hlavním formu (nazvaným MainForm) při výběru uživatelm z menu udělám:

TFormAdresarDodavatelu.Create (MainForm).Show

a tím končí akce z nabídky. Další zpracování už má na starosti onen volaný form, včetně závěrečného zmizení a uklizení po sobě.

Protoze jsem ve svem formu nastavil jako vlastnika Application, pokud si form neuvolnis v OnClose, jak napsal RCE, uvolni se s ukoncenim aplikace