: hey. what is the fastest way to cut some symbols at the end of
: string ?
: for example:
: from this: /home/justas/psc/test.pas
: to make /home/justas/psc/test
:
: any suggestions ?
:
This is the fastest way:
var s:string;
sl:byte absolute s; { <-- length of s }
begin
s:='/home/justas/psc/test.pas';
writeln(s);
dec(sl,4);
writeln(s);
readln;
end.