Gracias por vuestras respuestas.
Al final he implementado la solución de los or:
Código Delphi
[-]
procedure TF_Inscripcions.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
If (Key=#13) then
begin
F_BuscarInscripcio:=TF_BuscarInscripcio.Create(Application);
F_BuscarInscripcio.BuscarCorredor.Close;
F_BuscarInscripcio.BuscarCorredor.SQL.Clear;
F_BuscarInscripcio.BuscarCorredor.SQL.Add('SELECT DORSAL, NOM_LLARG, DNI, LLICENCIA, CODIUCI, NACIO, CLUB, ABR_CLUB, PUBLICITAT, EDAT, CATEGORIA FROM CTR0003');
F_BuscarInscripcio.BuscarCorredor.SQL.Add('WHERE NOM_LLARG STARTING :NOM');
F_BuscarInscripcio.BuscarCorredor.SQL.Add('OR DNI STARTING :NOM');
F_BuscarInscripcio.BuscarCorredor.SQL.Add('OR LLICENCIA STARTING :NOM');
F_BuscarInscripcio.BuscarCorredor.SQL.Add('OR CODIUCI STARTING :NOM');
F_BuscarInscripcio.BuscarCorredor.ParamByName('NOM').AsString:=Edit1.Text;
F_BuscarInscripcio.BuscarCorredor.SQL.Add('ORDER BY NOM_LLARG');
F_BuscarInscripcio.BuscarCorredor.Open;
F_BuscarInscripcio.Show;
end;
end;
El motivo del Edit único es por semejanza al uso de un programa que ya está funcionando en la actualidad y se hace así. Para no liar más a los usuarios imito el funcionamiento.
Saludos
Josep