フォルダ名を取得するには？

解決

もも  2004-04-22 08:33:44  No: 8515  IP: [192.*.*.*]

こんにちは。
パスからフォルダ名を取得したいのですが、
c:\aaa\bbb\ccc\からcccを取り出すにはどうしたらいいですか？
どうぞよろしくお願いします。

編集    削除
つっか  2004-04-22 08:41:45  No: 8516  IP: [192.*.*.*]

procedure TForm1.Button1Click(Sender: TObject);
begin
  Label1.Caption := ExtractFilename(ExcludeTrailingBackslash('c:\aaa\bbb\ccc\'));
end;

編集    削除
もも  2004-04-22 08:56:46  No: 8517  IP: [192.*.*.*]

解決できました。
ありがとうございました。

編集    削除
sadoyama  URL  2004-04-23 02:21:33  No: 8518  IP: [192.*.*.*]

どのversionからか解りませんが、Delphi6だと
ExcludeTrailingPathDelimiter()があります。
その場合には、ExcludeTrailingBackslashよりも
こちらを使用するよう推奨されています。

編集    削除
ふぐちゃん  2004-04-23 03:38:19  No: 8519  IP: [192.*.*.*]

> どのversionからか解りませんが、
5までがExcludeTrailingBackslashで、
6以降がExcludeTrailingPathDelimiterになっています。
LinuxではPathDelimが'/'で、Backslashではないからでしょうね。

編集    削除
つっか  2004-04-23 03:41:30  No: 8520  IP: [192.*.*.*]

> こちらを使用するよう推奨されています。

それは Kylix との互換性をとるためでしょうね。Linux とのファイルシステム
との違いを吸収するために。Kylix なき今となっては、推奨する理由もないかも。

あっ、まだ売ってますか、Kylix？

編集    削除
もも  2004-04-25 05:57:08  No: 8521  IP: [192.*.*.*]

Delphi6なのでExcludeTrailingPathDelimiter()を使うことにします。
ほんとうにありがとうございました。

編集    削除