IPath.GetExtension

Syntax

GetExtension(Path: String): String;

Path — path string, from which an extension must be obtained.

The GetExtension method returns the extension of the specified path string.

Sub UserProc;
Var
    Path_File, s: String;
Begin
    Path_File:="c:\Work\1.txt";
    s:=Path.GetExtension(Path_File);
End Sub UserProc;

After executing the example, the "s" variable contains .txt.