6 隠しファイルの作成。(これ、我流かな・・・ちょっと不安) |
とりあえず変数を宣言 var
Filename01 : String; begin k_file02 := D:\test.txt; ← これを変えてみる。(あると仮定) k_file01 := FileGetAttr(k_file02);//ファイルの属性取得 FileSetAttr(k_file02, k_file01 - SysUtils.faHidden);//隠しファイルにする。 end;
faHidden ←これが隠しファイルにするという指示
|
back |