UnitUnit5
DeclarationFunction get_search_list: String;Implementation
function get_search_list():String; begin result:=form2.root +'Cache\Users\'+GetLocalUserName+'slist.sal'; End;