Source position: _crw_str.pas line 1240
function ExtractBaseName(
const FileName: LongString
):LongString;