Zitat von
day:
Hallo
Ich konnte den Fehler eingrenzen. Es liegt am Konstruktor meiner TGuiControll klasse. und zwar wenn ich keinen Konstruktor habe dann funktioniert es und wenn ich einen eigenen habe dann geht es nicht.
wie muss ich den konstruktor definieren damit es geht?
Code:
unit GuiController;
interface
uses CommandHandler,
OffertInformationContainer,
Command;
type
TGuiController = class(TObject)
private
mCommandHandler : TCommandHandler;
mOffertInfoContainer : TInfoContainer;
public
procedure create();
procedure ActivateNewOffertView(NewOffertFrame: TNewOffertFrame);
end;
implementation
procedure TGuiController.create();
begin
mCommandHandler := TCommandHandler.Create();
mOffertInfoContainer := TInfoContainer.Create();
end;
procedure TGuiController.ActivateNewOffertView(NewOffertFrame: TNewOffertFrame);
begin
end;
end.
der Konstruktor muss auch als Konstruktor definiert werden !
Delphi-Quellcode:
public
constructor create();
Gruss Hans