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