Problemas visualizacion info en red usando ADOQuery

[ecfisa]

Hola mizzard.

Mirando esta parte de tu código:

 
 strSQL = "SELECT *";
 strSQL = strSQL + " WHERE [CodFabricacion] = " + leerOf;

La cadena que queda formada en strSQL es "SELECT * WHERE[CodFabricacion] = "+ (valor de la variable leerOF). En ambos códigos te estaría faltando la cláusula FROM.

Probá hacerlo de este modo:

  ...
  qryMostrarEntrada->Close();
  qryMostrarEntrada->SQL->Clear();
  qryMostrarEntrada->SQL->Add("SELECT * FROM TU_TABLA WHERE CodFabricacion = :VALOR");
  qryMostrarEntrada->Parameters->ParamByName("VALOR")->Value = leerOF;
  qryMostrarEntrada->Open();

Donde "TU_TABLA" sería el nombre de la tabla de donde extraes los datos.

Y para el segundo caso:

 ...
 qryMostrarEntrada->Close();
 qryMostrarEntrada->SQL->Clear();
 qryMostrarEntrada->SQL->Add("SELECT * FROM TU_TABLA WHERE CodFabricacion LIKE :VALOR");
 qryMostrarEntrada->Parameters->ParamByName("VALOR")->Value = leerOF + "%";
 qryMostrarEntrada->Open();

Un saludo.