与えられたファイルパスからファイル名を抽出する方法
| 日付 | 2001/03/09 |
|---|---|
| ID | 01-536 |
| バージョン | All versions |
| プラットフォーム | Windows and Mac |
この記事は、最新ではないバージョンに関連した方法について解説しています。
最新のバージョンでは推奨されていないか、または他の方法で簡単に実現できる可能性があります。
与えられたファイル・パスからファイル名を抽出するために、下記ルーチンを使用してもよい。
C_TEXT($0;$1;$FullPath)
C_LONGINT($Platform;$System;$Machine;$Position)
PLATFORM PROPERTIES($Platform;$System;$Machine)
If ($Platform=Windows)
$key:="\"
Else
$key:=":"
End if
$FullPath:=$1
$Position:=Length($FullPath)
If ($Position>0)
` $Position is stop at 1 to prevent an error when the
` database is compiled with a Range Checking turned on.
While (($Position>1)