Používanie dopytov Delphi s ADO

Komponent TADOQuery poskytuje Delphi vývojári schopnosť načítať údaje z jednej alebo viacerých tabuliek z Databáza ADO pomocou SQL.

Tieto príkazy SQL môžu byť buď príkazy DDL (Data Definition Language), ako napríklad CREATE TABLE, ALTER INDEX atď., Alebo to môžu byť príkazy DML (Data Manipulation Language), ako napríklad SELECT, UPDATE a DELETE. Najbežnejším príkazom je však príkaz SELECT, ktorý vytvára pohľad podobný pohľadu, ktorý je k dispozícii pri použití komponentu Tabuľka.

Poznámka: Aj keď je možné vykonávať príkazy pomocou komponentu ADOQuery, ADOCommandkomponent je na tento účel vhodnejší. Najčastejšie sa používa na vykonávanie príkazov DDL alebo na vykonávanie uloženej procedúry (aj keď by ste mali používať príkazTADOStoredProc pre takéto úlohy), ktorý nevracia množinu výsledkov.

SQL použitý v komponente ADOQuery musí byť prijateľný pre používaný ovládač ADO. Inými slovami, mali by ste byť oboznámení s rozdielmi pri písaní SQL napríklad medzi MS Access a MS SQL.

Ako pri práci s komponentom ADOTable, k údajom v databáze sa pristupuje pomocou pripojenia na ukladanie údajov vytvoreného komponentom ADOQuery pomocou jeho

Ak chcete vytvoriť formulár Delphi schopný načítať údaje z databázy Access pomocou komponentu ADOQuery, jednoducho zrušte všetky súvisiace komponenty na prístup k údajom a na údaje uvedomujúce si údaje a vytvoria prepojenie, ako je opísané v predchádzajúcich kapitolách tohto dokumentu Samozrejme. Komponenty prístupu k údajom: DataSource, ADOConnection spolu s ADOQuery (namiesto ADOTable) a jeden komponent, ktorý podporuje údaje, ako je DBGrid, je všetko, čo potrebujeme.
Ako už bolo vysvetlené, pomocou inšpektora objektov nastavte prepojenie medzi týmito komponentmi takto:

DBGrid1.DataSource = DataSource1
DataSource1.DataSet = ADOQuery1
ADOQuery1.Connection = ADOConnection1
// vybudovať ConnectionString
ADOConnection1.ConnectionString = ...
ADOConnection1.LoginPrompt = False

Komponent TADOQuery nemá TableNameako TADOTable. TADOQuery má nazývanú vlastnosť (TStrings) SQL ktorý sa používa na uloženie príkazu SQL. Hodnotu vlastnosti SQL môžete nastaviť pomocou inšpektora objektov v čase návrhu alebo prostredníctvom kódu za behu.

V čase návrhu spustite editor vlastností pre vlastnosť SQL kliknutím na tlačidlo elipsy v inšpektore objektov. Zadajte nasledujúci príkaz SQL: „SELECT * FROM Authors“.

Príkaz SQL sa môže vykonať jedným z dvoch spôsobov, v závislosti od typu príkazu. Príkazy jazyka Definícia jazyka sa zvyčajne vykonávajú pomocou ExecSQL metóda. Napríklad, ak chcete odstrániť konkrétny záznam z konkrétnej tabuľky, môžete napísať príkaz DELETE DDL a spustiť dotaz pomocou metódy ExecSQL.
(Bežné) príkazy SQL sa vykonávajú nastavením TADOQuery. aktívny majetok do pravdivý alebo volaním naOtvorené metóda (v podstate rovnaká). Tento prístup je podobný získavaniu údajov tabuľky pomocou komponentu TADOTable.

V čase vykonávania sa príkaz SQL vo vlastnosti SQL môže použiť ako akýkoľvek objekt StringList:

s ADOQuery1 začnú Close; 
SQL.Clear; 
SQL.Add: = 'VYBRAŤ * OD AUTOROV' SQL.Add: = 'OBJEDNÁVKA pod menom autora DESC' Open; 
koniec;

Vyššie uvedený kód v čase spustenia uzavrie množinu údajov, vyprázdni reťazec SQL vo vlastnosti SQL, priradí nový príkaz SQL a aktivuje množinu údajov volaním metódy Open.

Všimnite si, že vytvorenie trvalého zoznamu poľných objektov pre komponent ADOQuery samozrejme nemá zmysel. Keď nabudúce zavoláte metódu Open, SQL sa môže líšiť tak, že sa môže zmeniť celá sada názvov (a typov) súborov. Samozrejme to tak nie je, ak na získanie riadkov z jednej tabuľky s konštantnou sadou polí používame ADOQuery - a výsledná množina závisí od WHERE časti príkazu SQL.

Jednou z vynikajúcich vlastností komponentov TADOQuery je params nehnuteľnosť. Parametrizovaný dotaz je taký, ktorý umožňuje flexibilný výber riadkov / stĺpcov pomocou parametra v klauzule WHERE príkazu SQL. Vlastnosť Params umožňuje vymeniteľné parametre v preddefinovanom príkaze SQL. Parameter je zástupný symbol pre hodnotu v klauzule WHERE, definovaný tesne pred otvorením dotazu. Ak chcete zadať parameter v dotaze, použite dvojbodku (:) pred názvom parametra.
V čase návrhu použite inšpektor objektov na nastavenie vlastnosti SQL nasledovne:

ADOQuery1.SQL: = 'VYBRAŤ * Z aplikácií, KDE typ =: apptype'

Po zatvorení okna editora SQL otvorte okno Parameters kliknutím na tlačidlo elipsy v inšpektore objektov.

Parameter v predchádzajúcom príkaze SQL je pomenovanýapptype. Hodnoty parametrov v kolekcii parametrov môžeme nastaviť v čase návrhu prostredníctvom dialógového okna Parametre, ale väčšinu času zmeníme parametre za behu. Dialógové okno Parametre sa môže použiť na určenie typov údajov a predvolených hodnôt parametrov použitých v dotaze.

V čase vykonávania sa parametre môžu zmeniť a dotaz sa môže znova vykonať na obnovenie údajov. Na vykonanie parametrizovaného dotazu je potrebné pred vykonaním dotazu poskytnúť hodnotu pre každý parameter. Na úpravu hodnoty parametra používame buď vlastnosť Params, alebo metódu ParamByName. Napríklad, vzhľadom na príkaz SQL, ako je uvedené vyššie, môžeme v čase vykonávania použiť nasledujúci kód:

s ADOQuery1 začínajú
Zavrieť;
SQL.Clear;
SQL.Add ('SELECT * FROM Applications WHERE type =: apptype');
. ParamByName ( 'apptype') Hodnota: = 'multimediálne';
Otvorené;
koniec;

Ako pri práci s komponentom ADOTable, ADOQuery vráti množinu alebo záznamy z tabuľky (alebo dvoch alebo viacerých). Navigácia v súbore údajov sa vykonáva rovnakými metódami, ako sú opísané v kapitole „Za údajmi v súboroch údajov“.

Všeobecne by sa komponent ADOQuery nemal používať, keď prebieha úprava. Dotazy založené na SQL sa väčšinou používajú na účely vykazovania. Ak váš dotaz vráti množinu výsledkov, je niekedy možné upraviť vrátenú množinu údajov. Sada výsledkov musí obsahovať záznamy z jednej tabuľky a nesmie používať žiadne agregované funkcie SQL. Úpravy súboru údajov vráteného nástrojom ADOQuery sú rovnaké ako úpravy súboru údajov ADOTAble.

Aby sme videli nejakú akciu ADOQuery, napíšeme malý príklad. Urobme dopyt, ktorý sa dá použiť na načítanie riadkov z rôznych tabuliek v databáze. Na zobrazenie zoznamu všetkých tabuliek v databáze môžeme použiť GetTableNamesmetóda ADOConnection zložkou. GetTableNames v udalosti OnCreate formulára vyplní ComboBox s názvami tabuliek a tlačidlo sa používa na zatvorenie dotazu a na jeho opätovné vytvorenie na načítanie záznamov z vybranej tabuľky. Obslužné programy udalostí () by mali vyzerať takto:

postup TForm1.FormCreate (odosielateľ: TObject);
začať
ADOConnection1.GetTableNames (ComboBox1.Items);
koniec;
postup TForm1.Button1Click (odosielateľ: TObject);
var tblname: string;
začať
ak ComboBox1.ItemIndex, potom Exit;
tblname: = ComboBox1.Items [ComboBox1.ItemIndex];
s ADOQuery1 začínajú
Zavrieť;
SQL.Text: = 'SELECT * FROM' + tblname;
Otvorené;
koniec;
koniec;

Všimnite si, že toto všetko je možné dosiahnuť pomocou vlastnosti ADOTable a jej TableName.