Source position: _crw_str.pas line 557
function StrAheadOf(
const S: LongString;
Delim: Char
):LongString;