Danke, hab dann auch mal die
Access-Hilfe "bemüht"
.
Tatsächlich gibt es diese Funktion.
Nur ist der Rückgabewert ein Integer.
Wen es interessiert, gelöst habe ich das so:
Delphi-Quellcode:
...
Stringlist '
Montag','
Dienstag'....
...
SQL.Text:='
SELECT sum(anzahl) AS einzelmessung, WEEKDAY(insdate,2) AS Tag'+
//2 für Montag
'
FROM messwerte';
if nutzdatum.Checked = True
then
SQL.Add('
WHERE A.insdate > HT1');
SQL.Add('
GROUP BY WEEKDAY(insdate,2)');
...
while not EOF
do begin
analyse.Form7.zf_wochentage.Lines.Add(wotas[fieldbyname('
Tag').AsInteger]+'
:');
analyse.Form7.zf_wotage_um.Lines.Add(format('
%f',[fieldbyname('
einzelmessung').AsFloat]));
analyse.Form7.Chart1.Series[0].Add(fieldbyname('
einzelmessung').AsFloat,wotas[fieldbyname('
Tag').AsInteger]);
Next;
end;
...
Vielen Dank für die Hilfe