Cómo implementar una consulta difusa de campo en DELPHI

Un símbolo importante de Delphi como poderosa herramienta de desarrollo de aplicaciones de bases de datos es que admite programación SQL. En el proceso real, a menudo es necesario realizar consultas difusas en determinados campos. Por ejemplo, al consultar el campo "Nombre", cuando se ingresa "Wang", todos los registros con el apellido Wang se pueden enumerar automáticamente. De hecho, esta función se puede lograr fácilmente combinando las características de SQL y Delphi. El principio básico es: al realizar una consulta, controle el alcance de la consulta para que esté entre nombres mayores que 'cadena de consulta + chr (0)' y menores que 'cadena de consulta + chr ($ff)', y todos los registros que cumplan las condiciones. se puede consultar. El siguiente es un ejemplo específico:

Var

NameStr:String;‖Establecer variable intermedia de cadena

Begin

NameStr:=′ Wang';

Query1?SQL?Clear{Borrar la instrucción del comando SQL en el atributo SQL}

Query1?SQL?Add('Select＊FromCustom?dbwhere(Name1>=N1 ) y(Name2<=N2)′);‖Declaración de comando SQL

Query1?params[0]?AsString:=NameStr+chr(0);‖El parámetro de control está en NameStr+Chr(0 )

Query1?params[1]?AsString:=NameStr+chr(＄ff);‖ y NameStr+Chr($ff)

Query1?Open;‖Abrir la base de datos y ejecutar consulta SQL

Fin;