Login
`
Templates, Tools and Utilities
|
||
Icetips Article
Back to article list
Search Articles
Add Comment
Printer friendly
Direct link
Par2: Get Path components 2001-05-01 -- Jeff Slarve Map
Module('')
FNSplit(*CSTRING Path, *CSTRING Drv, *CSTRING Dir,|
*CSTRING Nme, *CSTRING Ext),|
SIGNED,PROC,RAW,NAME('_fnsplit')
end
end
GetFileNameFromPath PROCEDURE (String pPath)
Path CString(300)
Drive CString(10)
Dir CString(200)
Name CString(200)
Ext CString(30)
CODE
If ~pPath
Return('')
end
Path=Clip(pPath)
FNSplit(Path,Drive,Dir,Name,Ext)
Return(Name)
Today is November 21, 2024, 3:37 am This article has been viewed 35304 times.
|
|