Source position: dialogs.pp line 960
function ExtractColorIndexAndColor(
const AColorList: TStrings;
const AIndex: Integer;
out ColorIndex: Integer;
out ColorValue: TColor
):Boolean;