procedure TfrmOBEXFM.OBEX_GoTo_Parent;
begin
 // ".." - program reserved jump to parent folder
 if xCurentDir > 0
   then begin
          //dec(xCurentDir);
          SetPath('..');
          Sleep(OBEXTimeOut);
          GetFolderContent;
        end
end;