fpcdocs/bunixex/ex41.pp


1
2
3
4
5
6
7
8
9

Program Example41;

{ Program to demonstrate the GetEnv function. }

Uses BaseUnix;

begin
  Writeln ('Path is : ',fpGetenv('PATH'));
end.