GetExtension(Path: String): String;
Path — строка пути, из которой нужно получить расширение.
Метод GetExtension возвращает расширение указанной строки пути.
Sub UserProc;
Var
Path_File, s: String;
Begin
Path_File:="c:\Work\1.txt";
s:=Path.GetExtension(Path_File);
End Sub UserProc;
После выполнения примера в переменной «s» будет содержаться «.txt».
См.также: