Sample code for 30+ languages & platforms
Xbase++

Demonstrate Directory Path Functions

Demonstrates the path functions GetDirectoryName, GetExtension, GetFileName, and GetFileNameWithoutExtension.

Chilkat Xbase++ Downloads

Xbase++
LOCAL oFac

oFac := CreateObject("Chilkat.FileAccess")

//  Note: Chilkat accepts either forward slash or backslash chars as directory separators..
? oFac:GetDirectoryName("/MyDir/MySubDir/myfile.ext")
? oFac:GetDirectoryName("/MyDir/MySubDir")
? oFac:GetDirectoryName("/MyDir/")
? oFac:GetDirectoryName("/MyDir")
? oFac:GetDirectoryName("/")

? oFac:GetExtension("C:/mydir.old/myfile.ext")
? oFac:GetExtension("C:/mydir.old/")

? oFac:GetFileName("C:/mydir/myfile.ext")
? oFac:GetFileName("C:/mydir/")

? oFac:GetFileNameWithoutExtension("C:/mydir/myfile.ext")
? oFac:GetFileNameWithoutExtension("C:/mydir/")

? "---"

oFac:destroy()