「FD」をフォーマットダイアログを表示する

「FDをフォーマット」ダイアログを表示する

■必要なコンポーネント

TButton

■使用するAPI関数

SHFormatDrive（「FDをフォーマット」ダイアログを表示する）
【引数の説明】
第一引数　ウインドウのハンドル
第二引数　常に0
第三引数　ドライブを指定（Aドライブは0,Bドライブは1..)
第四引数　0はクイックフォーマット　1は通常のフォーマット　2は起動専用をチェックする

■ソースは下記のようになります。

■ダイアログを表示する処理

//SHFormatDrive関数をインポートする

function SHFormatDrive( nHandle : hWnd; nDrive
: Integer; nIDs :Integer;dwFlag:Integer):Integer; stdcall;external
shell32



procedure TForm1.Button1Click(Sender: TObject);

Const

　SHFMT_OPT_FULL=1 ;//通常のファーマットをチェック

begin



　//フォーマットダイアログを表示する

　ShFormatDrive(Form1.Handle,0,0,SHFMT_OPT_FULL);



end;



end.

Win32APIのページへ