Variant Records

Jeg har oprettet følgende record :

listenode = record
                nodepeger : peger;
                case figurtype : objekttyper of
                      Linje : (Lengde : Real);
                      Trekant, Firkant : (Hoyde, Bredde : Real);
                      Sirkel : (Radius : Real);
    End ; (* Variant record *)

peger = ^listenode;

Denne skal bruges til at gemme information (Højde, bredde, lengde og radius)om nogle figurer.

Denne informationen skal gemmes i en lenkede liste. Mit spørgsmål er : Når jeg har opretede en ny node af type "listenode", hvordan gemmer jeg så information om figurerne, alt efter hvilken figurtype det er?