[maxi915]

me tirar error de parametro mal definido....

Código Delphi [-]
procedure siguienteRegistro(queryTurnoCliente:TADOQuery; var id_turno:Integer);
begin
 With queryTurnoCliente do
    begin
      SQl.Clear;
      SQL.Add('select top 1 id from turnoCliente where id_turno> :Id_turno order by id_turnoCliente');
      Open;
end;
end;