[ecfisa]

Hola rufo.

Te faltó aclarar con que componentes estas trabajando, pero reemplazá estas líneas:

Código Delphi [-]
     ...
     sql.add('select * from Activos_fijos');
     sql.add('where id_activof='+combobox4.Text);
     ...

Por estas:

Código Delphi [-]
      ...
      sql.add('select * from Activos_fijos');
      sql.add('where id_activof = :DATO');
      ParamByName('DATO').AsString:= combobox4.Text;
      ...

Si es un ADOQuery, sería :

Código Delphi [-]
     Parameters.ParamByName('DATO').AsString:= combobox4.Text;

Saludos.