keine ahnung ob delphi das umwandeln kann, aber du kannst dir auch selbst eine funktion schreiben die das umwandelt.
Delphi-Quellcode:
function PitchToStr(f: TFont): string;
begin
if f.Pitch = fpDefault then result := 'fpDefault';
if f.Pitch = fpFixed then result := 'fpFixed';
if f.Pitch = fpVariable then result := 'fpVariable';
end;
und dann müsste das mit:
settings.WriteString('Font', 'Pitch', PitchToStr(FontDialogTabelle.Font));
gehen