SQL-Query mit Delphi realisieren

[kaemmi]

Hi, :thuimb:

im folgenden zeig ich Euch, wie Ihr mit Delphi eine Datenbankabfrage mittels SQl realisieren könnt.
Also erstmal braucht Ihr ein Formular mit folgenden Komponenten:
TQuery, TDatasource (beide im Register "Datenzugriff") ein TDBGrid (Datensteuerung), ein TMemo (Standart) und einen Button (ebenfalls "Standart").
Die Datasource Komponente verbindet ihr über die Eigenschaft "Dataset" mit der Query Komponente. Die DBGrid verknüpft Ihr über die Eigenschaft "Datasource" mit der Datasource Komponente.

Das Memo brauchen wir jetzt für die SQL-Anweisungen.
Um diese an die SQl zu übergeben, benutzt Ihr am besten folgenden Code, der die Fehlerbehandlung mit einschließt.

Delphi-Quellcode:

Query1.SQL := Memo1.Lines;
try
   Query1.Open;
except
   on EDbengineError do raise;
   on EDatabaseError do abort
 end

Die Fehlerbehandlung ist wichtig, da sich in SQL sehr gerne mal Fehler einschleichen.:warn:

Das wärs fürs erste.

Jetzt gibt es 2 Möglichkeiten der Query Komponente eine Datenbank zuzuweisen.
1. Über einen Alias.
Dazu wählt Ihr in der Eigenschaft "Databasename" den Alias und wählt dann in der SQL-Anweisung die DB aus.
Das könnte dann so aussehen (Alias ist DBDemos):

SQL-Code:

SELECT * FROM animals

2. DB direkt mit Pfadangabe.
Mit dieser Methode ist es möglich auch DB zu öffnen, die keinen Alias haben. Die Anweisung könnte dann so aussehen:

SQL-Code:

SELECT * FROM "c:\beispielpfad\meinedatenbank.db"

Zum Schluss noch 2 nützliche Links zu SQL-Referenzen:
SQL Kurzreferenz von Christian Ey
SQL-Hilfe : eine Einführung in SQL

Viel Spass mit dem Code :coder: