P_STRING String; Allocate (&String, 
                           Length, [=] (P_STRING WR String) {
                                                              Set (String, Path, Separator, File_name);         
                                                            });
 
 
 

Free (&String);