EgtUILib :

- resa pubblica funzione FileInUse.
This commit is contained in:
Dario Sassi
2018-11-09 12:10:59 +00:00
parent ed130a346c
commit 8f8fcb091f
+2 -2
View File
@@ -11,10 +11,10 @@
'
'----------------------------------------------------------------------------
Module Utilities
Public Module Utilities
' Verifica se il file è in uso
Public Function FileInUse( sFile As String) As Boolean
Public Function FileInUse(sFile As String) As Boolean
If System.IO.File.Exists(sFile) Then
Try
Dim F As Short = FreeFile()