カレントディレクトリのパスを取得する

■必要なコンポーネント

■使用するAPI関数

■ソースは下記のようになります。追加している所は青色です。

■カレントディレクトリのパスを取得する処理
procedure TForm1.Button1Click(Sender: TObject);
Var
　//バッファを確保
　CurrentDirectory : array [0..256] of char;
begin

　//カレントディレクトリを取得
　GetCurrentDirectory(sizeof(CurrentDirectory),CurrentDirectory);
　ShowMessage(CurrentDirectory);

end;




Win32APIのページへ



ホーム PV ランキング