Returns a pointer to the first occurrence of a character in a string.
function StrScan(Str: PChar; Chr: Char): PChar;
0 if Chr does not occur in Str
StrScan returns a pointer to the first occurrence of Chr in Str. If Chr does not occur in Str, StrScan returns nil. The null terminator is considered to be part of the string.