Prolem mit Fehler: E2076

[Schoppii]

Hallo,
Ich versuche gerade ein Programm zur Kochkurve zu schreiben hänge aber an einem Fehler den ich nicht zu beheben weis Er gibt als Fehlermeldung aus: [Fehler] Unit1.pas(36): E2076 Diese Form des Methodenaufrufs ist nur für Klassenmethoden erlaubt. Ich habe schon versucht den Code in ein neues projekt zu kopieren, was aber auch nichts gebracht hat. Ich hänge einfach mal den code an und freue mich über jede Hilfe!!

Code:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, UTurtle, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Turtle1: TTurtle;
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}


var n:integer;

procedure male (n,länge:integer);
begin

if n=1 then tturtle.draw(länge div 3)
else male(n-1,länge div 3);

tturtle.turn(300);

if n=1 then tturtle.draw(länge div 3)
else male(n-1,länge div 3);

tturtle.turn(120);

if n=1 then tturtle.draw(länge div 3)
else male(n-1,länge div 3);

tturtle.turn(300);

if n=1 then tturtle.draw(länge div 3)
else male(n-1,länge div 3);
end;


procedure TForm1.Button1Click(Sender: TObject);

begin
n:=5;
male(4,1000)
end;

end.