If StrPos( String, Current_path ) then 
 - StrReplace >String< String Current_path ''
;  
