[*Caro*]

Como estas ejecutando tu Query?, te pongo un ejemplo:

Código Delphi [-]
procedure TForm1.EditKeyPress(Sender: TObject; var Key: Char);
begin
 if key=#13 then
  begin
    Query1.Close;
    Query1.SQL.Text := 'SELECT * FROM clientes WHERE codigo='+Edit.Text;
    Query1.Open;
 
     //O
 
    Query1.Active:=False;
    Query1.SQL.Text:='SELECT * FROM clientes WHERE codigo='+Edit.Text;
    Query1.Active:=True;
  end;

Y para la categoria es solo aumentar un or en tu consulta, lo anterior funciona si tu campo codigo es entero, sino fuera entero debes añadir comillas.

Saluditos