[DELPHI] Jak načíst více formů?
Dobrý den.
Omlouvám se, za blbý předmět, nic jiného mě bohužel nenapadlo.
Potřebuji (doufám) snadnou věc:
Potřebuji najít obdobu fce Visual Basicu, kde stačilo napsat:
Load Form1
a ono mi to udělalo další instanci Form1, k níž se dalo přistupovat pomocí indexů.
Jde to nějak snadno i v Delphi?
Snad můj dotaz není moc chaotický, není mi dnes příliš dobře, tak to kdyžtak přejděte
Děkuji!
Ide, stačí ak si prídaš do projektu novú formu... a voláš ju nazov_formy.showmodal alebo nazov_formy.show. Doporučujem ti, aby si si prečítal základy programovania v Delphi a potom sa púšťal na zložitejšie veci.
Príklad
(je to nutné ještě přidat do uses, ale to si delphi kdyžtak udělá samo)
Ale spíš si myslim, že chtěl vytvořit formy dynamicky, aby k nim pak mohl přistupovat těma indexama.
... chcel to vytvoriť tak ako v Basicu, v Basicu sa to dá jedine takto, kdežto v Delphi je oveľa viac spôsobov..
K formum muzes pristupovat pomoci Screen.Forms[index]
Díky moc!
Vyzkouším
Jo..formy chci dynamicky. Blbě jsem se vyjádřil.
Výborné!!!
Mnohokrát děkuji! Funguje to přesně, jak potřebuji.
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:
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