0 Members and 1 Guest are viewing this topic.
create a new folder, rename it.....make crash HFS.......
create a new folder, rename it.....make crash HFS and disapear
function anyMacroMarkerIn(s:string):boolean;var i, l: integer;beginresult:=TRUE;if pos('|', s) > 0 then exit;l:=length(s);i:=0;// search for {. and .} repeat i:=posEx('.', s, i+1); if (i > 0) and ((s[i-1] = '{') or (i < l) and (s[i+1] = '}')) then exit; until false i=0;// search for {: and :} repeat i:=posEx(':', s, i+1); if (i > 0) and ((s[i-1] = '{') or (i < l) and (s[i+1] = '}')) then exit; until false i=0; result:=FALSE;end; // anyMacroMarkerIn