vložil Radek Červinka
9. března 2013 00:30
Nemůžu si pomoci - FireDAC (AnyDAC) mne baví. Přijde mi to jako by to psal někdo, kdo znal moje potřeby. Třeba monitoring SQL. U ADO se to dalo dělat nějakým externím programem a výsledek byl všelijaký - pokud fungoval. U této knihovny je součástí SQL monitor, který je schopen vzdálené komunikace přes TCP.
Používám svoje následníky komponent, proto ty třídy - seznam je živý a v případě, že má komponenta jméno tak je zobrazeno (já všechno vytvářím za běhu - proto beze jména).
V podstatě jako i v jiných případech této knihovny máte několik možností jak SQL monitorovat. Např. prostým zápisem do souboru nebo uvedeným monitorem nebo něčím co si napíšete.
Do uses vrazíte některou z jednotek uADMoni??Client, např. uADMoniRemoteClient pro uvedený monitor, případně prásknete někde komponentu pro monitor na formulář (v případě, že používáte tento způsob vývoje). Stačí někde v programu, jednotka se zaregistruje.
A pak stačí napsat (v případě z kódu):
RemoteClientLink := TADMoniRemoteClientLink.Create(Self);
RemoteClientLink.Tracing := True;
// a pro connection pak
connection.Params.Add('MonitorBy=Remote');
Lze také specifikovat porty a adresu, ale pro lokální PC to stačí. A pak mít spuštěný monitor (z nabídky FireDAC v menu Delphi). Podrobnosti v helpu.
Trasování je opravdu na nízké úrovni: