Die Hilfe ist kaputt ... bei der automatischen Übersetzung sind ein paar Zeichen verloren gegangen.
Zitat:
[Error] constants_ini.pas(47): ':' expected but identifier 'TBasicGroupSettings' found
Rate mal, was zwischen Name und Typ kommt, bzw. vor den Typ.
BasicGroupSettings = class
und dann in TBasicSettings.Create die beiden Instanzen erstellen.
Und natürlich im TBasicSettings.Destroy wieder freigeben,
oder Beides als
= class(TComponent)
, beim Erstellen das den Owner auf Self und automatisch freigeben lassen.
Zitat:
Set_A
Als RECORD kann nur der gesamte Record zugewiesen werden.
Delphi-Quellcode:
// bei einem RECORD landet "first" nur im Result von Get_A, aber wird nicht automatisch in Set_A zurückgeschrieben.
basicsetting.basic['A'].first := 'abc';
// daher .... als CLASS gäbe es dieses Problem nicht
// eventuell vorher auslesen: temp := basicsetting.basic['A'];
temp.first := 'abc';
basicsetting.basic['A'] := temp;