如何使用Delphi按GroupID对列表元素进行分类？

本文共计703个文字，预计阅读时间需要3分钟。

我制作了一个简化的演示（带有伪结构）来说明我需要的东西：plaintexttype TMyRec=record GroupID: Integer; Color: TColor;end;

TMyRecArray=array of TMyRec;

我的输入数组/表元素由非零GroupID组成。它们开始和结束按Gro排序。