hsSettingsForm

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

• 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