I followed this conversation for a while. It is apparent you have a very foggy idea about translocation.
It actually happens in Sierra, High Sierra, as well as Catalina. Any new app is moved to a safe location where it is executed the first time around.
If you have files that can be read only, you can simply copy them with a copy files step so they rest in the Resources folder to be used when the app runs. That is the only acceptable way to do it with recent Mac systems.
Let us say you have a file called “myGamePlan.txt”, inside the “Games” folder, in the Resources folder, all you have to do to access it, is
SpecialFolder.Resources.Child("Games").child("myGamePlan.txt")
Note that since the file is inside the app bundle, it will be found no matter the name of the executable, or if the app is translocated.
Now, if you need to write to the files, the best way would be to copy the files to Application data, within a subfolder by the same name as the application ID.
This is how you do it the first time your app runs:
Dim f as folderitem = Specialfolder.ApplicationData.child("com.mysoftwarecompany.greatgame")
If not(f.exists) then
f.createasfolder
dim source as folderItem = Specialfolder.Resources.child("Games")
If sources.Exists then sources.copyfileto(f)
end if
You can then access files as for instance
Specialfolder.ApplicationData.child("com.mysoftwarecompany.greatgame").Child("Games".Child("myfile.txt")
These files are not deleted by the system, and will persist between runs.
Note that this scheme works fine under Windows as well, whatever the installer, debug run or not.