error en parametros con ado

jachguate · #2 23-05-2004

El problema es que es al asignar la sentencia SQL que se "crean" los parámetros; por lo que el valor recien asignado simplemente se pierde.

Además, cuando asignas un select a una sentencia SQL, el TAdoQuery debes "abrirlo" con el método open, y no simplemente "ejecutarlo" con ExecSQL, con el que ejecutas sentencias que no devuelven un cursor, como un update o un delete.

Para obtener el "resultado", te podes valer del método FieldByName.

Al final el trozo de código quedaria algo asi:

Código Delphi [-]  adoquery1.SQL.Text:= 'select us-cve from ordcom where oc-cve = c-cve';
  adoquery1.Parameters.ParamByName('oc-cve').Value := edit1.Text ;
  adoquery1.Open;
  label1.text := adoquery1.fieldbyname('oc-cve').AsString;

Por cierto, te recomiendo el uso de las etiquetas [ code ] [ delphi ] y [ sql ] para publicar trozos de código, que ves que de esta forma se indentan correctamente y hasta se puede resaltar la sintaxis, lo que los hace mucho mas legibles. Hay un mensaje al inicio de cada foro que te aclarará bastante sobre su uso.

Hasta luego.