access violation

[ford42]

Hey,
ich versuche gerade von einer Unit einer Methode von einer anderen Unit einen Wert zu übergeben, also:

Delphi-Quellcode:

unit Controller;

interface

uses
  Logic;

type
  CalcController = class(TObject)
    private
      m_AddZahl: TBerechnung;
    public
      procedure Notify(p_Action: String; p_Param: String);

  end;

implementation

procedure CalcController.Notify(p_Action: String; p_Param: String);
begin
  if (p_Action = 'Zahl') then
  begin
    m_AddZahl.AddZahl(p_Param);
  end
end;

end.

und

Delphi-Quellcode:

unit Logic;

interface

uses
  System.Classes, System.SysUtils;

type
  TBerechnung = class
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
    procedure AddZahl(p_Parameter: String);
  end;

implementation

  procedure TBerechnung.AddZahl(p_Parameter: String);
  var
     eingabeZahl: String;
  begin
    eingabeZahl := eingabeZahl + p_Parameter;
  end;
end.

Aber da kommt bei der Zeile 'm_AddZahl.AddZahl(p_Param);' diese Fehlermeldung 'access violation' :/


Weiß jemand wo ich da den Fehler habe?


Vielen Dank im Voraus
Grüße ford42