[fpc-devel]Fix To StrUtils.PosExe

I noticed that the cited function is not working properly, so i made some (small) changes to fix it. Here is the fixed version: Function PosEx(const SubStr, S: string; Offset: Cardinal): Integer; var i : pchar; begin if (offset<1) or (offset>length(s)) then exit(0); i:=strpos(@s[offset],@substr

[fpc-devel]test please ignore

send with pascalive via web __ Acabe com aquelas janelinhas que pulam na sua tela. AntiPop-up UOL - É grátis! http://antipopup.uol.com.br/ ___ fpc-devel maillist - [EMAIL PROT