Jump to content

Determine if only one instance is running: Difference between revisions

Determine if only one instance is running en FreeBASIC
(Added Wren)
(Determine if only one instance is running en FreeBASIC)
Line 443:
called as register(aname,<0.42.0>)
</pre>
 
 
=={{header|FreeBASIC}}==
<lang freebasic>Shell("tasklist > temp.txt")
 
Dim linea As String
Open "temp.txt" For Input As #1
Do While Not Eof(1)
Line Input #1, linea
If Instr(linea, "fbc.exe") = 0 Then Print "Task is Running" : Exit Do
Loop
Close #1
Shell("del temp.txt")
Sleep</lang>
 
 
=={{header|Go}}==
2,130

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.