Turm von Hanoi

[Revoks]

unit u_HanoiKlasse;

{$mode ObjFPC}{$H+}

interface
type
TTurm= class
Scheiben: array [1..n] TTurm
Position : integer;
uses
Classes, SysUtils, Dialogs;




implementation

{ TScheibe }




end.
kann ich so anfangen um die Klasse zu deklarieren oder ist hier schon ein Fehler und ich würde gerne dann noch eine Funktion erstellen wo es mir die Türme zeichnet