Du musst das Objekt zuerst instanziieren bevor du es benutzt.
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 := TBerechnung.Create;
// <----- das hier dabei schreiben
m_AddZahl.AddZahl(p_Param);
end
end;
end.
Nur ist es aber auch wichtig, dass du das Objekt m_AddZahl auch wieder mit
m_AddZahl.Free;
freigibst wenn du es nicht mehr benötigst.