blob: 3ca5e0bdd225b517859b67d5097d20781c85b126 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
Program Example95;
{ This program demonstrates the IncludeLeadingPathDelimiter function }
Uses sysutils;
Begin
// Will print "/this/path"
Writeln(IncludeLeadingPathDelimiter('this/path'));
// The same result
Writeln(IncludeLeadingPathDelimiter('/this/path'));
End.
|