The DW.OSDevice.xxx units here have implementations for GetDeviceName for iOS, Android, macOS, Windows and Linux:
https://github.com/DelphiWorlds/KastriFree/tree/master/Core
I could add something like GetUserName - which would likely return blank for iOS and Android