fpcdocs/sysutex/ex47.pp


1
2
3
4
5
6
7
8
9

Program Example47;

{ This program demonstrates the SetDirSeparators function }

Uses sysutils;

Begin
  Writeln (SetDirSeparators('/pp\bin/win32\ppc386'));
End.