hola denuevo, gracias por atender mi duda
pero sabes esta propiedad (Parambyname)no es reconocida asi que tube que cambiarla, supongo que es la que ingresa el nombre a n_area y n_turno
Query1.Sql.Parambyname('n_area').Asstring := ListboxArea.Items.Strings[ListboxArea.ItemIndex];
Query1.Sql.Parambyname('n_turno').Asstring := 'A'
este es el cambio
Código SQL
[-]
procedure TForm1.ListBox1Click(Sender: TObject);
var
cadena,n_area,n_turno:string;
begin
Label4.Visible:=true;
n_area:=listbox1.Items.Strings[listbox1.ItemIndex];
if RadioGroup1.ItemIndex = 0 then
n_turno:='A'
else
n_turno:='B';
cadena:='select area, nombre, codigo, turno from personal where area = :'+ n_area +' and turno =:'+ N_turno + ' order by nombre';
Query1.Sql.Clear;
query1.SQL.Add(cadena);
Query1.Open;
end;
pero me sale un mensaje de error que dice
Query1:field 'electricidad' is of an unknown type
y no realiza nada logico...
miarchhivo de BD es asi
nombre codigo turno area
juan 125 A soporte
pedro 256 B Electricidad
luis 589 A menores
carlos 125 B soporte
. . . .
. . . .
podrias ver cual es el error....gracias por la ayuda que puedas darme