File_Ext


Purpose   Extracts the file extension from a fully qualified filename.

Decln.    File_Ext(FullName:string):string;

Returns   String

Remarks   This function is only available to the Turbo 5.0 programmer.

          FullName is the source filename.

          The period is removed.

Example

VAR
  F : STRING;
BEGIN
    F := FILE_EXT('C:\TURBO5\TTT5\MISCTTT5.PAS');
END;

F is assigned the value "PAS".