Problema solucionado!
Realmente el problema era algo totalmente obvio
pero que no me habia dado cuenta!
Código:
ap_b=fopen("estacion_b.dat","rb");
Como verán estaba abriendo en modo LECTURA, y como queria modificar tenia que abrirlo a modo Lectura/ Escritura :
a+b Gracias a AntonioVeneroso, de Foros Club Delphi por haberse tomado la molestia de ver el codigo y darse cuenta! 