OOP--> Constructor richtig verwendet???

[Christian18]

Was hat das mit den Constructor überhaupt für einen Sinn??? man kann es doch auch so machen.

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Unit2;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
  var n : TNavi;
begin
  n:=TNavi.Create();
  n.Erzeugen(Form1, 'Button');
  n.Free;
end;

end.

KLassen Unit:

Delphi-Quellcode:

unit Unit2;

interface

uses
  Forms, StdCtrls;

type
  TNavi = class
    procedure Erzeugen(f : TForm; c : String);
  private
    b : TButton;
  public

  end;

implementation

procedure TNavi.Erzeugen(f : TForm; c : String);
begin
  b:=TButton.Create(nil);
  b.Caption:=c;
  b.Top:=10;
  b.Left:=10;
  b.Parent:=f;
end;

end.

so funktioniert es auch und mache auch das gleiche. welche lösung ist besser??? warum???