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