select anweisung

[r_kerber]

Try this

Delphi-Quellcode:

sqlquery1.sql.Clear;
SQLquery1.SQL.Text := 'Select his.user user_,sum(his.poso) as poso from history his group by his.user';
sqlquery1.open;
SQLquery1.First;
while not SQLquery1.EOf do begin
stringgrid1.Cells[3,i] := SQLquery1.Fieldbyname('user_').asstring;
stringgrid1.Cells[2,i] := floattostr(SQLquery1.Fieldbyname('poso').asfloat);
SQLquery1.Next;
i:=i+1;
end;