Tips

フォルダの区切り文字

日付2010/10/27
ID76186 (英語原文参照)
バージョンv12
プラットフォームMac/Win

クロスプラットフォームアプリケーションでは, プラットフォーム特有のフォルダ区切り文字を調べる必要があり, これまでさまざまな方法が提案されてきました。

C_TEXT($folderDelimiter;$folderPath)
$folderPath:=Get 4D Folder(Database Folder)
$folderDelimiter:=$folderPath[[Length($folderPath)]]
C_TEXT($delim)
$delim:=(Get 4D folder(Database Folder )[[Length(Get 4D folder(Database Folder ))]])
C_LONGINT($vlPlatform)
C_TEXT($delim)
PLATFORM PROPERTIES($vlPlatform)
If ($vlPlatform#Windows)
$delim:=":"
Else 
$delim:="\\"
End if

4D v12以降, もはや上記のようなで起動時にインタープロセス変数を定義する必要はありません。4D v12には, Folder Separator定数が存在するからです。

Folder Separator定数は, Mac OSでは":", Windowsでは"\"を返します。