Insertar Datos De Un Dbgrid A Una Tabla

[schaka]

HOLA QUE TAL , BUENO SOY NUEVO EN DELPHI , TENGO UN PROBLEMA , TENGO UN DBGRID DONDE MUESTRO LA INFORMACION DE UNA TABLA, Y DESPUES DE REALIZAR UNA BUSQUEDA ME GUSTARIA QUE LA FILA QUE FUE SELECCIONADA COMO RECULTADO DE LA BUSQUEDA `PODER INSERTARLA EN UNA TABLA EN MYSQL, EL PROBLEMA QUE TENGO , ES QUE NO SE COMO RECUPERAR LA INFORMACION DE LA FILA SELECCIONADA DESPUES DE MI BUSQUEDA PARA PODER INSERTARLA EN UNA TABLA , HE DADO UN VISTAZO POR LA INTERNET, Y NO HE PODIDO ENCONTRAR ALGO AL RESPECTO, ESPERO ALGUIEN ME PUEDA AYUDAR .. MUCHISIMAS GRACIAS, MUESTRO MI CODIGO PARA LA BUSQUEDA,

Código Delphi [-]

procedure TFMain.Edit1Change(Sender: TObject);
var i:integer;
palabras: TStringList;
consulta: String;

begin if Edit1.Text = '' then begin consulta:='Select * from productos';
ZQuery.close;
ZQuery.sql.clear;
ZQuery.sql.add(consulta);
ZQuery.open;
end else begin
palabras := TStringList.Create;
palabras.CommaText := Edit1.Text;
ZQuery.close; ZQuery.sql.clear;
for i:=0 to palabras.Count-1 do
begin consulta:=consulta+'and Producto like "%'+palabras.Strings[i]+'%"';
end;
Delete(consulta,1,3);
consulta:='Select * from productos where'+consulta;
ZQuery.SQL.Add(consulta);
ZQuery.Open;
end;//else
end;