Dann nimm ein Array of RAtom;
Delphi-Quellcode:
Type RAtom = record
x,y: integer; // Koordinaten
stoff: integer; // Atomsorte
Platz: integer; // Platz in der Bindungsliste
...end;
Dieses Array kannst du dann ganz lässig abspeichern, aufrufen und mit ner Procedure zeichnen lassen.
€dit: Und wieder hatte Mathias eine ähnliche Idee und hat schneller geschrieben
Erwarte das Beste und bereite dich auf das Schlimmste vor.