unit1.cpp を P1.cpp で保存したものが、P1.bpr の保存の際に生成される P1.cpp で
上書きされてるんじゃないかな。

unit1.cpp を変名しないか、P1 以外の名での保存でＯＫかと。