Ich hab mir die Sache mit dem
RTTI und so mal angeschaut...
Benutz es, oder leite was draus ab, oder verbesser es, oder lass es
Bei mir ist auf jeden Fall das hier herausgekommen :
TSettings so deklarieren wie man es braucht :
Delphi-Quellcode:
type TSettings = class(TComponent)
private
Ff: byte;
Fg: char;
Fb2: double;
Fa1: integer;
FPfad: string;
Fe: word;
Fd: string;
Fh: boolean;
protected
public
published
property Pfad : string read FPfad write FPfad;
property a1 : integer read Fa1 write Fa1;
property b2 : double read Fb2 write Fb2;
property d : string read Fd write Fd;
property e : word read Fe write Fe;
property f : byte read Ff write Ff;
property g : char read Fg write Fg;
property h : boolean read Fh write Fh;
end;
und dann speichern oder laden...
Delphi-Quellcode:
uses SettingsVorlage;
procedure TForm1.BitBtn1Click(Sender: TObject);
var t : TSettingsVorlage;
begin
t := TSettingsVorlage.Create(self);
t.Settings.d := 'Hallo';
t.Settings.Pfad := 'Welt';
t.SaveToFile(Pfad+'Testfile.dat');
// t.SaveToINIFile(Pfad+'Testfile.ini');
// t.SaveToRegistry(HKEY_LOCAL_MACHINE ,'Software\YDB-Soft\Testfile');
t.free;
end;