How do I know if I have Full Disk Access on Mojave or not?

The code doing something with the files in the Mail folder of course knows if there are files or not. But this is in a thread. So I want to know earlier if I can execute the code or if I need to show the explainer window.

First try

dim MailFolder as FolderItem = SpecialFolder.Library.Child("Mail") if MailFolder.Count = 0 then

Count is always 0 for the main folder even if I have Full Disk Access.

Next try:

dim f as FolderItem = GetFolderItem("/Users/beatrixwillius/Library/Mail/V6", FolderItem.PathTypeShell) dim child as FolderItem = f.Item(1)

Here I get child.Nativepath = f.Nativepath if there is no Full Disk Access. Is this to be expected or is this crazy? Is there a check that is more sane?

Xojo 2018r3 on the latest Mojave beta.