Создать класс с параметром и без

[Proton3]

Извиняюсь за нубский вопрос.
Нужно создать класс, который должен в run-time создаваться как с параметром, так и без.

Вот эта реализация нормальная?
 

type
  TMyClass = class(TObject)
  private
  public
    constructor Create; overload;
    constructor Create(pos: String); overload;
    destructor Destroy; override;
  end;

constructor TMyClass.Create;
begin
  inherited;
  MyProc('');
end;

constructor TMyClass.Create(pos: String);
begin
  MyProc(pos);
end;

destructor TMyClass.Destroy;
begin
  SomeList.Free;
  inherited;
end;

 

[GASCHE]

А так не пробовали?

constructor TMyClass.Create(pos: String = '');