HSPTV!掲示板

スレッド一覧 | 新規書き込み | 新着一覧 | 使い方 | 過去ログ

未解決

解決

停止

削除要請


	2014 0524	Hathino	ファイルの選択＆コピー	6

Hathino

2014/5/24(Sat) 16:22:38|NO.62158

Hathinoです。
バージョンアップの際に、セーブファイルを移し替えることが面倒なので、

ファイルを選択→実行ファイルのある場所にコピー

という動作をしたいです。
一応自分でも作ったのですが、ファイルが見つからないか無効な名前です。と出て、
よくわかりません。
下にスクリプトを載せるので、訂正等をお願いいたします。



dialog "sav",16,"セーブデータファイル"
if stat=1 {
	val=dirinfo(1)
	bcopy ""+refstr+"",""+val+""
}

この記事に返信する

Hathino

2014/5/24(Sat) 16:29:10|NO.62159

訂正です。



dialog "sav",16,"セーブデータファイル"//ファイルを選択するはず
if stat=1 {//選択した場合
	val=dirinfo(1)//実行ファイル本体の場所を代入するはず
	bcopy ""+refstr+"",""+val+""//実行ファイルの場所にセーブデータファイルを保存？
}

fortunehill

2014/5/24(Sat) 16:51:02|NO.62160

/*ご参考*/



dialog "sav",16,"セーブデータファイル"//ファイルを選択するはず
if stat=1 {//選択した場合
	val=dirinfo(1)//実行ファイル本体の場所を代入するはず
;   bcopy ""+refstr+"",""+val+""      //実行ファイルの場所にセーブデータファイルを保存？
	mes val+"\\"+getpath(refstr,8)    //①ディレクトリ情報を取り除く
}

Hathino

2014/5/24(Sat) 17:07:15|NO.62161

fortunehillさん、参考をありがとうございます。
しかし、

mes val+"\\"+getpath(refstr,8)    //①ディレクトリ情報を取り除く

が、よくわかりません。表示させてみましたが、変わっていないみたいです。

774

2014/5/24(Sat) 18:36:16|NO.62162

fortunehill様ではないですが…
Hathino様が本来想定されていた結果が得られている為
「変わっていない」と感じるのではないでしょうか？



  mes "修正前:"+val
  mes "修正後:"+val+"\\"+getpath(refstr,8)

dirinfo(1)では実行ファイルの"場所"(ディレクトリ情報)までしか得られないので
ファイル名を追加する必要があるという事です。

Hathino

2014/5/24(Sat) 19:30:49|NO.62170

理解できました。勘違いだったようです。
774様、どうもありがとうございます。
まだ私には早いようなので、経験を積んでから使いたいと思います。

Hathino

2014/5/24(Sat) 19:31:20|NO.62171

解決ボタンの押し忘れでしたm(__)m