Table3->Append();
Table3->FieldByName("IDCONSECUTIVOENCUESTA")->AsInteger = StrToInt(Request->ContentFields -> Count );
Table3->FieldByName("IDENCUESTA")->AsInteger = StrToInt(Request -> ContentFields -> Count);
Table3->FieldByName("IDPREGUNTA")->AsInteger = StrToInt("Request->ContenFields->Values[PreRes11]" );
Table3->FieldByName("IDRESPUESTA")->AsString = (Request -> ContentFields -> Values["radios aa"]);
Table3->FieldByName("FUNCIONARIO")->AsString = (Request -> ContentFields->Values[ "radios aa" ]);