pasar de un dbgrid a un listbox

[Goyo]

te agradezco mucho Caral...
mira estoy utilizando bases de datos de MySQL, y con respecto al AQTemp es un Query normal? (disculpa la ignorancia) o es otro componente, porque yo puse en lugar de AQTemp, escribi Query, y quedo de la siguiente manera:

Código Delphi [-]
procedure TFormCaptura.BitBtnAgregarClick(Sender: TObject);
 var
 personas: string;
begin

   Query1.SQL.Text := 'Select * From Personas Where id_personas = '+personas;
   Query1.Open;
   Combobox1.Text := Query1.Fields[0].AsString;
end;

en el ComboBox pueden agregarse mas de 1 personas, para que posteriormente se graben su id_personas en la tabla Asignaciones (id_personas).

Por cierto me marca un error:
Invalid use of keyword.
Token:=
Line Number 1'