Функция для получения имени файла из текстовой строки.
function ExtractFileExt(sFileName:string): string;
Параметр |
Тип |
Значение |
---|---|---|
sFileName |
string |
имя файла и/или полный путь к нему. |
Полное имя файла вместе с расширением, без пути.
var
sFullName, sPath, sName, sExt: string;
begin
sFullName := mGetServerServiceFolder(3) + 'mcserv.exe';
sPath := ExtractFilePath(sFullName);
sName := ExtractFileName(sFullName);
sExt := ExtractFileExt(sFullName);
mLogScript('Full name: ' + sFullName, '');
mLogScript('Path: ' + sPath, '');
mLogScript('Name: ' + sName, '');
mLogScript('Extension: ' + sExt, '');
end.
[20:17:51] (Log "ExtractFileParts"): Full name: E:\Projects\MC\Sources\Server\mcserv.exe
[20:17:51] (Log "ExtractFileParts"): Path: E:\Projects\MC\Sources\Server\
[20:17:51] (Log "ExtractFileParts"): Name: mcserv.exe
[20:17:51] (Log "ExtractFileParts"): Extension: .exe
[20:17:51] (Run "ExtractFileParts"): Время выполнения скрипта: 5 мс
[20:17:51] (Run "ExtractFileParts"): Скрипт выполнен успешно.