6 隠しファイルの作成。(これ、我流かな・・・ちょっと不安)

とりあえず変数を宣言

var

Filename01 : String;
k_file01 : integer;
k_file02 : String;

begin

 k_file02 := D:\test.txt; ← これを変えてみる。(あると仮定)

 k_file01 := FileGetAttr(k_file02);//ファイルの属性取得

 FileSetAttr(k_file02, k_file01 - SysUtils.faHidden);//隠しファイルにする。

end;


--------------補足---------------

 faHidden ←これが隠しファイルにするという指示

back