¡Gracias al grupo técnico oficial de internautas de ccrun.com y a la comunidad de C ++ Builder Mai Zizhongfei por su ayuda!
void __fastcall TForm1 :: AdvStringGrid1GetCellBorder (TObject * Sender, int ARow, int ACol,
TPen * APen, TCellBorders & Borders)
{
if (ACol == 3 || ACol == 13 || ACol == 23 || ACol == 33 || | ACol == 43 || ACol == 53)
{
// Borders << (cbLeft); // 这 二 种 设置 都 可以
Borders = Borders << cbLeft;
// operador Borders = (cbTop, cbLeft, cbRight, cbBottom);
APen-> Ancho = 2;
APen-> Color = clPurple;
}
}