Erstmal: Nimm für "Land" eine
TObjectList. Die Nachbarländer würde ich auch in eine TObjectList einfügen, natürlich AOwnsObjects = false.
Zum Abrunden: Ist wahrscheinlich übertrieben, aber ein Subdivision Surfaces-Algorithmus sollte gute Ergebnisse bringen
.