OOP Grundsatzfrage Klasse TKunde

[DeddyH]

Zeig mal etwas mehr Code.

[khh]

Delphi-Quellcode:

Type
  TKundenPlausi = class(TPersistent)
private
  FKunde : TKunde;
  FPlausiOK :boolean;
  procedure PlausiCheckPLZ;


public
  constructor Create(AKunde:TKunde);
  procedure DoAllChecks;
  property PlausiOK: boolean read FPlausiOK write FPlausiOK;
  
end;

implementation

 procedure  TKundenPlausi.PlausiCheckPLZ;
 var plz : string ;
 begin
   plz := FKunde.PLZ ;
 end;

  procedure TKundenPlausi.DoAllChecks;
 begin
   PlausiCheckPLZ ;
  
   FPlausiOK:= true;
 end;     

 constructor TKundenPlausi.Create(AKunde:TKunde);
   begin

   end;
end.

muss ich im Constructor das object aKunde erst erzeugen ?

[DeddyH]

Delphi-Quellcode:

constructor TKundenPlausi.Create(AKunde:TKunde);
   begin
     FKunde := AKunde;
   end;

Müsste doch so sein, oder?

[Relicted]

edit.. zu langsam :-)

[khh]

Zitat:

Zitat von DeddyH

Delphi-Quellcode:

constructor TKundenPlausi.Create(AKunde:TKunde);
   begin
     FKunde := AKunde;
   end;

Müsste doch so sein, oder?

danke dir, so gehts. :-)
Ich hatte gerade überlegt, dass im Contructor ja auch was passieren sollte ;-)


Gruss kH