SQL-Anfragen unter Delphi 4

Um eine SQL-Anfrage an die Datenbank zu richten, geht man wie folgt vor:

• installiere eine Instanz vom Typ TQuery (im Beispiel:  SQLQuery)
• installiere eine Instanz vom Typ TDataSource (im Beispiel:  ds_SQL)
• installiere eine Instanz vom Typ TDBGrid (im Beispiel  SQLGrid)

SQLQuery bekommt außer dem Namen und (ev.) dem Namen der verwendeten Datenbank (SQLQuery.DataBaseName) keine weiteren Eigenschaften per Objekt-Inspektor zugewiesen. SQLQuery.Active bleibt auf false, es wird durch die Methode SQLQuery.Open auf true gesetzt.

Die Datenquelle bekommt die Datenmenge SQLQuery zugewiesen:  ds_SQL.DataSet := SQLQuery.

Die SQL-Abfrage wird im Beispiel durch Anklicken eines Schalters ausgelöst:

procedure TForm1.Button1Click(Sender: TObject);
var sqlstring : string;
begin
sqlstring :='SELECT titel,dauer from cd where dauer >30';
SQLGrid.Visible:= False;
with SQLQuery do begin
  Close;
  SQL.Clear;
  SQL.Add(sqlstring);
  Open;
  //ExecSQL; führt die Anfrage ohne Ausgabe aus 
end;
SQLGrid.Visible:= True;
end;

© Dietrich Praclik