Nájsť všetky FDTable na formulári

[Stanislav Hruška]

Rád by som pri vytváraní okna automaticky otvoril všetky tabuľky. Nijako sa mi to nedarí, lebo ich neviem nájsť/načítať. Možno preto, že to sú nevizuálne komponenty. Ale formulár ich vlastní. Ako sa to dá?

[František]

ja si pri vytvarani objektov udrzujem ich zoznam v TDicionary ... a potom lahko cez to aj knim pristupujem

[Stanislav Hruška]

Ja sa práve chcem vyhnúť akémukoľvek zoznamu.
Ale asi to ináč nepôjde.

[martinnr]

a cez form.components?

[Stanislav Hruška]

Nie, nájde mi len viditeľné komponenty. To by som tu nepísal.

[Jirka]

Nie, nájde mi len viditeľné komponenty. To by som tu nepísal.

Nevím jak u tebe, ale u mě to vypisuje i datasety 

[vandrovnik]

Otevírám datasety raději "ručně" např. v OnShow; často mi záleží na pořadí, v jakém se otevřou, proto jsem se nikdy ani nesnažil to nějak automatizovat.

[Stanislav Hruška]

Nevím jak u tebe, ale u mě to vypisuje i datasety

Mne to názvy TFDQuery nevypíše

Kód: Delphi [Vybrat]

1. for I := 0 to MySubform.ComponentCount - 1 do
2.   Showmessage(MySubform.Components[I].Name);

Otevírám datasety raději "ručně" např. v OnShow; často mi záleží na pořadí, v jakém se otevřou, proto jsem se nikdy ani nesnažil to nějak automatizovat.

Ak na to narazím, tak si to viem obslúžiť.
Ale ako teraz nad tým rozmýšľam, vďaka vandrovnikovi, tak asi bude vhodné to predsa len robiť cez ten zoznam. Chcem tabuľky filtrovať podľa cudzieho kľúča. A ten sa mení podľa voľby užívateľa počas životnosti formulára.

[martinnr]

No prave pisal som to preto, ze to pouzivame a funguje nam to. a funguje to aj na TDataModule aj na Form. V Delphi 10.3-Rio. Napr:
  for I := 0 to ComponentCount - 1 do
  begin
    Component := Components;
    if Component.InheritsFrom(TZQuery) then
      (Component as TZQuery).CancelUpdates;
  end;

Help v Delphi pise: "System.Classes.TComponent.Components - Lists all components owned by the component.".

Urcite maje tie datasety nastavene Owner? Nie len Parent? Samozrejme ak su komponenty uz v design-time na formulari, tak by mali mat parenta automaticky.

[Stanislav Hruška]

Hm, je tu možný jeden zádrh. Ja tie tabuľky mám na subForm. Tam je určite vlastníkom podformulár.
No netuším, či sa vlastník zmení ak podformulár dám na formulár. To nepredpokladám, lebo by mi nefungoval kód. Alebo ho mám napísaný ináč než si myslím

[František]

ale preco sa zoznamu vyhybat, je to pravdepodobne rychlejsie ako prehladavat formular,či?

[Stanislav Hruška]

Ja som sa chcel vyhnúť akémukoľvek kódu pri vytvorení nového formulára. Ale keďže niektoré tabuľky budem potrebovať filtrovať, tak som to musel zavrhnúť.