en cuanto a obtener el total de Ventas realizadas por un vendedor, tendrias que utilizar:
1 query....
1 Edit
Código SQL
[-]
Query.SQL.Clear;
Query.SQL.Add('Select * From Ventas');
Query.SQL.Add('Where Cod_Vendedor=:Var1');
Query.Params[0].AsString := Edit.Text;
Query.Open;
Query.First;
y para obtener el numero de registros.... seria algo así
Código Delphi
[-]
Edit1.Text := IntToStr(Query.RecordCount)
ahora esto funciona a veces., yo lo utilizaba mucho y siempre bien.. pero el otro dia me di cuenta que en vez de entregarme 13, me decia 1...
y leyendo aca en foro.. no lo recomendaban.. por que siempre fallaba... mira este hilo
http://www.clubdelphi.com/foros/show...ht=RecordCount