Variable vom Typ "TFontStyles" in Ini speichern

[toms]

ungetestet:

Delphi-Quellcode:

var
  fs : Longint;

Delphi-Quellcode:

 
// schreiben:
  fs := Byte(Font.Style);
  IniFile.WriteInteger('Font', 'Style', fs);
// lesen:
  fs := IniFile.ReadInteger('Font', 'Style', 0);
  Font.Style := TFontStyles(Byte(fs));