No jala todos los campos en query

[Nomad]

Hola


Hago esto...

SQL := 'Select Nombre,Departamento from Empleados where Codigo = :codigo and Activo = 1';
Query1.SQL.Text := SQL;
Query1.ParamByName('codigo').AsString := EdNCodigo.Text;
Query1.Active := True;
EdSNombre.text := Query1.Fields[0].AsString;

Pero curiosamente el campo nombre nunca lo jala, en el campo ...Fields[0] deberia venir el nombre del empleado, pero lo que me devuelve numero de departamento que deberia ser ...Fields[1].

La base de datos esta en SQL Server y la estoy accesando por medio de ODBC. El campo nombre es un nvarchar(50)...

Gracias

[[Caral]]

Hola
Me parece curioso, no debería de pasar.
Primero te aconsejo que utilices la etiquetas delhi, se entendera mejor.

Código Delphi [-]
Query1.SQL.Text := 'Select Nombre, Departamento from Empleados where Codigo = :codigo and Activo = 1';
Query1.Active := True;
Query1.ParamByName('codigo').AsString := EdNCodigo.Text;
EdSNombre.text := Query1.Fields[0].AsString;

No entiendo la razón.
Coloca en la pantalla del query los campos, tal vez ayude.
Saludos

[Nomad]

Empezado por Caral

Coloca en la pantalla del query los campos, tal vez ayude.
Saludos

Gracias por tu aporte!

A que te refieres con que coloque en la pantalla del query los campos. Cual pantalla?

[[Caral]]

Hola
El query tiene una propiedad que se llama SQL, si le das click, te saldra una ventana, en esta coloca la sentencia sql, pero sin los parametros.

Código SQL [-]
Select Nombre, Departamento from Empleados

La guardas.
Te posicionas en el componente query y le das doble click, te saldra la pantallita que te menciono, con el boton derecho del raton te saldran unas opciones, pon add y luego aceptar, con esto los campos los tendras en la pantallita.
Prueba otra vez el programa, a ver que pasa.
Saludos

[Nomad]

Empezado por Caral

Hola
El query tiene una propiedad que se llama SQL, si le das click, te saldra una ventana, en esta coloca la sentencia sql, pero sin los parametros.
Código SQL [-]Select Nombre, Departamento from Empleados

La guardas.
Te posicionas en el componente query y le das doble click, te saldra la pantallita que te menciono, con el boton derecho del raton te saldran unas opciones, pon add y luego aceptar, con esto los campos los tendras en la pantallita.
Prueba otra vez el programa, a ver que pasa.
Saludos

Solo aperece departamento en la ventanita, nombre NO...

Esta raro, verdad?

[[Caral]]

Hola
Pues si no existe el registro, me parece que daria un error, no se que decirte.
Solo usare tus palabras.
Esta Raro.
Tal vez la opcion de luisgutierrezb, te sirva.
Saludos

[luisgutierrezb]

a lo mejor diste de alta los campos persistentes y necesitas agregar el de nombre

[Nomad]

Empezado por luisgutierrezb

a lo mejor diste de alta los campos persistentes y necesitas agregar el de nombre

Y eso que significa? Dar de alta!

[JOSEA]

Raro, raro, raro ... quizas con esto te funcioneQuery1.SQL.Text := 'Select "Nombre" as minombre, Departamento from Empleados where Codigo = :codigo and Activo = 1';Query1.Active := True;Query1.ParamByName('codigo').AsString := EdNCodigo.Text;EdSNombre.text := Query1.fieldbyname['minombre'].AsString;

[JOSEA]

Perdon, perrdon por la edicion anterior

Código Delphi [-]
Query1.SQL.Text := 'Select "Nombre" as minombre, Departamento from Empleados where Codigo  :codigo and Activo = 1';
Query1.Active := True;
Query1.ParamByName('codigo').AsString := EdNCodigo.Text;
EdSNombre.text := Query1.FieldbyName['minombre'].AsString;