[olbeup]

añádele un while, eje.:

Código Delphi [-]
query.Close;
query.SQL.Clear;
query.SQL.Add('select * from citas where idpaciente=1');
query.Open;
while not query.eof do
begin
  combobox2.Items.Add(query.FieldValues['promedio']);
  query.next;
end;

Un saludo