matche Routine

Unit
IB_Utils

Declaration
Function matche(pattern, text: String ): Integer;