Re: How to prevent running multiple instances?
Posted: Tue Mar 27, 2018 3:04 pm
I use this on top of my Code, it´s working on AmigaOS/Windows:
Code: Select all
SendMessage("YOUR_PROGRAMMNAME_HERE", "DO_SOMETHING", "Argument1")
code=GetLastError()
If code=0
SystemRequest("Error!", "Program is already running","End")
End
EndIf
CreatePort("YOUR_PROGRAMMNAME_HERE")