Delphiに戻り、RvProject1のProjectFileプロパティをP21で保存したファイル名にします。