function DMSSystem: String;
if Trim(DMS_Settings.DMSSystem) = '' then begin Message_dlg('DMS deaktiviert'); end else begin Message_dlg('DMS aktiviert'); end;