[fpc-pascal] Is there a Pos() function for TBytes?

[Alexey Torgashin]

> 
> function PosInBytes(const Pattern: byte; Target: TBytes): integer;

Let's use IndexByte standard procedure here?
Maybe also in the 1st overloaded code too?
Alex