- お知らせ -
  • 当wikiのプログラムコードの表示を直してみました(ついでに長い行があると全体が下にぶっ飛ぶのも修正)。不具合があればBBSまでご連絡下さい。

Delphi

アプリケーションのディレクトリ(フォルダ)を得る(取得)方法。

1
2
3
4
function TForm1.MyDir: string;
begin
  Result := ExcludeTrailingPathDelimiter(ExtractFilePath(Application.ExeName));
end;

Applicationがないときは、ParamStr(0);かなぁ?



Front page   Edit Freeze Diff Backup Upload Copy Rename Reload   New Pages Search Recent changes   Help   RSS of recent changes
Last-modified: 2007-08-12 Sun 23:15:01 JST (4390d)