Hi,
ich habe eine Klasse, in der ich den Constructor überschreibe, und zwei eigene benutzen möchte.
(Nicht wundern, dass im Create noch nichts weiter drin ist. Kommt noch).
Deklaration:
Delphi-Quellcode:
constructor Create; overload;
constructor Create(Drucker: string; Kopien: Integer; KassenList: TKassenList; WarengruppenList: TWarengruppenList); overload;
die Constructoren:
Delphi-Quellcode:
constructor TDruckMonatsabschlussDetails.Create;
begin
inherited Create;
end;
constructor TDruckMonatsabschlussDetails.Create(Drucker: string;
Kopien: Integer; KassenList: TKassenList;
WarengruppenList: TWarengruppenList);
begin
inherited Create;
self.FDrucker:=Drucker;
self.FKopien:=Kopien;
self.FKassenList:=KassenList;
self.FWarengruppenList:=WarengruppenList;
end;
Wenn ich jetzt den Constructor mit den Parametern aufrufe, ist nach der Zeile "inherited Create" das Self=Nil, was ich mir nicht erklären kann. In der Zeile "inherited Create" erhalte ich jedoch keine Fehlermeldung.
Andere Klassen, wo ich es genauso gemacht habe laufen jedoch. Woran kann mein Fehler liegen?