FSplit procedure
Split a full-path filename in parts.
Declaration
procedure FSplit(path: PathStr; var dir: DirStr; var name: NameStr;
var ext: ExtStr)Description
FSplit splits a full file name into 3 parts : A
Path, a
Name and an extension (in
ext.)
The extension is taken to be all letters after the
last dot (.). For
Dos, however, an exception is made when
LFNSupport=False, then
the extension is defined as all characters after the
first dot.Errors
None.
See also
Example: ex12
program Example12;
uses Dos;
{ Program to demonstrate the FSplit function. }
var dir:dirstr;
name:namestr;
ext:extstr;
begin
FSplit(ParamStr(1),dir,name,ext);
WriteLn('Splitted ',ParamStr(1),' in:');
WriteLn('Path : ',dir);
WriteLn('Name : ',name);
WriteLn('Extension: ',ext);
end.An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.
