DelphiでExtractFilePathやParamStrなど、さらに多くのファイル/ディレクトリ操作が可能です。
Delphiでは、ExtractFilePath関数を使用してファイルのパス情報を抽出し、ParamStr関数を使用してコマンドライン引数を取得することができます。また、Delphiには他にもファイルやディレクトリの操作に使用できるさまざまな関数や手順が提供されています。
- ファイル名を抽出しています(拡張子を含む)。
- FileName := ‘C:\MyFiles\myfile.txt’からファイル名を取り出す; // 出力:myfile.txt
- ファイルの拡張子を抽出します。
- FileExt := ExtractFileExt(‘C:\MyFiles\myfile.txt’); // 出力:.txt
- ExtractFileDir:ファイルの親ディレクトリを抽出します。
- FileDir := ExtractFileDir(‘C:\MyFiles\myfile.txt’); // 出力:C:\MyFiles
- ファイルが存在するかどうかを確認します。
- もしFileExists(‘C:\MyFiles\myfile.txt’)がtrueならば、「ファイル存在」と表示し、そうでなければ「ファイル不存在」と表示する。
- DirectoryExists:ディレクトリが存在するかどうかを確認します。
- もしDirectoryExists(‘C:\MyFiles’)がtrueなら、ShowMessage(‘目録が存在します’)と表示され、そうでなければShowMessage(‘目録が存在しません’)と表示されます。
- ディレクトリを作成する。
- もし ‘C:\MyFiles’ ディレクトリが存在しない場合は、’C:\MyFiles’ ディレクトリを作成してください。
- ファイルを削除します。
- 指定されたファイルを削除します。
- ディレクトリを削除します。
- ‘C:\MyFiles’ディレクトリを削除する。
- ファイル名変更:ファイルの名前を変更します。
- RenameFile(‘C:\MyFiles\oldfile.txt’、’C:\MyFiles\newfile.txt’);
- FindFirst / FindNext:ディレクトリ内のファイルを検索します。ワイルドカードを使用してパターンマッチングを行うことができます。
- 変数
SearchRec: TSearchRec;
開始
もし FindFirst(‘C:\MyFiles\*.txt’, faAnyFile, SearchRec) = 0 ならば
開始
繰り返し
// ファイルを処理
ShowMessage(SearchRec.Name);
0 でない場合は FindNext(SearchRec) まで
FindClose(SearchRec);
終わり
終わり;
これらの関数と手続きは、Delphiでファイルやディレクトリを操作する基本的な機能を提供します。実際のニーズに応じて適切な関数を選択して使用することができます。