Get Filename FROM path

clembo

I have a function that get a path for a file. I want to extract Filename from path. How can I do it? There is a function or I need to build one?

Yaroslav_Gaponov

Hi

You just can use an Automation 'Windows Script Host Object Model'.FileSystemObject and function GetFileName

or like this I hope

strFilename := strcpy(strFile,strlen(strPath)+1);

fufikk

Or find the last '\' and copy everything after that. If there's no '\' then the entire path is filename.

fverkel

FileTxt := PathAndFileTxt;
WHILE STRPOS(FileTxt, '\') <> 0 DO
  FileTxt := COPYSTR(FileTxt, 1 + STRPOS(FileTxt, '\'));