Source position: dbctrls.pp line 1015
function ExtractFieldName(
const Fields: String;
var StartPos: Integer
):String;