*.mdb Auswertung mit SQL unter ADO

[shmia]

Zitat von moperswings:

ich habe - wohl für Euch - ein ganz einfaches db-Problem!
Ich habe eine Access Tabelle. Aus dieser Tabelle möchte ich mit SQL die Summe einer Spalte ermitteln (SELECT SUM(x) FROM tabellenspalte_y).
Das Ergebnis soll mir per button-click in einem Label angezeigt werden.
Doch welche Komponenten muss ich dafür benutzen und wie lautet der Code?
Finde dafür kein Beispiel, dass mir den Einstieg erleichtert!

Hier ein Beispiel mit ADO Komponenten:

Delphi-Quellcode:

var
   query: TADOQuery;
   sql: string;
   FieldName, TableName:string;
   Summe : Variant;
begin
   FieldName := 'Schulden';
   TableName := 'Kontobeweg';

   query := TADOQuery.Create(nil);
   try

   sql := 'select SUM(%s) as Summe from %s';

   query.Connection := Con;  // Zuweisen der ADOConnection
   query.SQL.Text := Format(sql, [FieldName, TableName]);
   query.Open;

   Summe := query.Fields[0].Value;

   query.Close;
   finally
      query.Free;
   end;
end;