Obtener los datos máximos

[[coso]]

Hola de nuevo: si el problema es el mismo que el inicial, creo que lo que tendrias que hacer es primero encontrar el numero maximo de ventas y luego filtrar tu tabla segun este numero, algo como :

Código Delphi [-]
q.Active := false;
q.SQL.Text := 'select * from tabla where ventas = (select max(ventas) as maxim from tabla)'
q.Active := true;

claro esta, traducido a tus tablas. Saludos.

PD: vale, que son tablas separadas.