Delphi - Necesito ayuda sobre SQL

Hola, haber necesito que algun experto me eche una mano, os explico:
Tengo un programilla para meter datos de clientes y necesito hacer un formulario desde donde poder buscar todos clientes por dni, apellidos, nombres, etc. en fin, basicamente es eso y yo ya no doy para mas. Agradeceria cualquier ayuda. Mandaria mi programa si hiciera falta. Gracias de antemano. Con cualquier duda escribirla y la aclaro.

Puesdes utilizar algo similar a esto pero piensa que si la tabla tiene muchos registros se puede relentizar .
En el evento Onchange de un TEdit.
case RadioGroup1.ItemIndex of
0: // por ejemplo dni
begin
Modulo.TableListados.Close;
Modulo.TableListados.SQL.Clear;
Modulo.TableListados.SQL.Add('Select * from Listado where dni Like (:Tira)');
Modulo.TableListados.SQL.Add('order by programa');
Sentencia:=/Sender as TEdit).Text+'%';//Que empiece por
Modulo.TableListados.Parambyname('Tira').Value:=Sentencia;
Modulo.TableListados.Open;
end;
1: //por ejemplo apellidos
begin
Modulo.TableListados.Close;
Modulo.TableListados.SQL.Clear;
Modulo.TableListados.SQL.Add('Select * from Listado where apellidos Like (:Tira)');
Modulo.TableListados.SQL.Add('order by programa');
Sentencia:='%'+(sender as TEdit).Text+'%'; //que contenga la cadena
Modulo.TableListados.Parambyname('Tira').Value:=Sentencia;
Modulo.TableListados.Open;
end;
end;//case