====== hsSettingsForm ======

<code delphi>
hsSettingsForm
  .InitDatasourcesByDataset(mDataset, mIDAlias, mDataAlias)
  .OnSaveDatasourceInDataset(procedure(mID: Integer; const mJsonData: string)
    begin
    end)
  .Show;
</code>

  * hsSettings erzeugt das Interface und zeigt das Hauptformular an (Application.ProcessMessages)
  * InitDatasourcesByDataset(const mDataset: TDataset)
    * iteriert durch ein Dataset
    * hängt den caption in die TreeList, ID und Daten - in das Dataset der TreeList
    * erzeugt das Formular und hängt es in das PageControl, wenn es noch nicht existiert
  * OnSaveDatsourceInDataset(mID: Integer; const mJsonData: string);
    * wird bein Klick auf den Speichern-Button aufgerufen