VCL 的 TAlign 的功能比较弱，有时候，无法满足我们对齐的需要，所以这里提供了一个额外的 CustomAlign 函数来实现更多的对齐方式。当然，如果你是用 FMX 的话，这些对齐方式已经有了，你可以忽略这篇文章。 type TCustomAlign = (caNone, caTop, caLeft, caRi