Feld / Zelle aus DBGrid auslesen

[AndreT]

Zitat von joachimd:

Zitat von AndreT:

Wie bau ich ein solches Query auf?

Zeig mal, was Du bisher hast.

Query, was die ersten beiden Spalten erzeugt

[code]

DataModule_CCR.ADOQuery_topten_code.Close;
DataModule_CCR.ADOQuery_topten_tcode.Active:=false ;

With DataModule_CCR.ADOQuery_topten_code.SQL do
begin
clear;
add('SELECT Top 10 code, Count(code)As Anzahl');
add(' FROM prod_report ');
add(' where (jahr_monat = '+QuotedStr(CB_jahr_monat.Text)+')');
add(ausdruckok); // =string, der eine Where-Klausel beinhaltet
add('Group by code order by Anzahl DESC');
end;
DataModule_CCR.ADOQuery_topten_clientcode.Active:= true;
DataModule_CCR.ADOQuery_topten_clientcode.open;

[\code]

die Query, die mir den Wert liefert, mit dem das Feld Anzahl aus der ersten Query verrechnet werden soll.

Code:

 DataModule_CCR.ADOQuery_anzahlDS.Close;
DataModule_CCR.ADOQuery_anzahlDS.Active:=false;

with DataModule_CCR.ADOQuery_anzahlDS.SQL do
  begin
  clear;
  add('SELECT COUNT (*) AS Anzahl FROM prod_report ');

  add(' Where (jahr_monat = '+QuotedStr(CB_jahr_monat.Text)+')');
  add(ausdruckok);
  end;
Label1.Caption:=DataModule_CCR.ADOQuery_anzahlDS.SQL.Text;
DataModule_CCR.ADOQuery_anzahlDS.Active:=true;
DataModule_CCR.ADOQuery_anzahlDS.open;

Edit: Sorry, irgenwie klappt das bei mir gerade auch nicht mit dem Code einfügen.