关于record自定义类型的简单问题(50分)

算了，结贴吧。

不管是用CompareMem对不包含指针的类型进行比较，还是用A.X、A.Y逐一处理的方式比较，或者两种方法综合运用，一旦程序中有多种不同的自定义类型，写多个针对不同类型的比较函数会把程序结构弄得散乱。我想比较好的解决办法就是使用同一个函数名称，然后用重载对不同的类型进行处理。

function CompareRec(const A, B: TMyRecordA): Boolean
overload;
function CompareRec(const A, B: TMyRecordB): Boolean
overload;
function CompareRec(const A, B: TMyRecordC): Boolean
overload;
function CompareRec(const A, B: TMyRecordD): Boolean
overload;