Create überschreiben (newbefrage)

[oki]

Hi, so:

Delphi-Quellcode:

Constructor Create(AOwner: TComponent; Mode : Modetyp); overload;

procedure TForm.Create (AOwner: TComponent; Mode : Modetyp); 
begin
  inherited create(AOwner);
  Form.Create(self);
  if Mode = ....
  // case for mode here
end;

Der Constructor wird somit überladen. Du kannst dann beide Constructoren aufrufen, den alten mit nur AOwner und den neuen. Es gibt die Funktion somit zweimal mit unterschiedlichen Parametern. die OH gibt da auch gut auskunft.

Gruß oki