function UseStorages: boolean;
if DMS_Settings.UseStorages then begin Message_dlg('bisherige Ablage verwenden'); end else begin Message_dlg('DMS für die Ablage verwenden'); end;