procedure TForm1.Button1Click(Sender: TObject);
begin
Adoquery1.Close;
Adoquery1.Sql.Clear;
Adoquery1.Sql.Add('Insert into Pruebas (Nombre, Apellidos) values (');
Adoquery1.Sql.Add(QuotedStr(Edit1.Text) +','+ QuotedStr(Edit2.Text)+')');
Adoquery1.ExecSql;
end;