Pues si, ya que en algunos de tus videotutoriales usabas un wait que ahora no recuerdo donde.
Ah, pues el ejemplo que me enseñaste en su día con la barra de progreso.
Código:
Public Sub Copiar()
Dim aarchivos As New String[]
Dim unarchivo As String
Dim incrementos As Float
aarchivos.Clear
ProgressBar1.Value = 0
aarchivos = Dir(directoriorigen, "*", gb.File)
incrementos = 1 / aarchivos.Count
For Each unarchivo In aarchivos
ProgressBar1.Value += incrementos
lblStatus.Text = "Copiando " & unarchivo
Wait 0.01
' Para copiar, descomentar
' Copy directoriorigen &/ unarchivo To directoriodestino &/ unarchivo
Next
Message.Info("Copia completada")
Me.Close
End
Ya me está diciendo el actualizador que está disponible la gambas 3.16.3....¿ que hago Shordi ?.
Supongo que la pregunta tienes que orientarla en parte a la lista internacional.
Mirando la ayuda en inglés, ya que en español es la versión descafeinada.
Dice que uses Sleep . ¿ Has probado ?.
A ver, si tu sabes que con Sleep va a funcionar, usa una instrucción desde Shell que te busque cada uno de los archivos que tenga la palabra wait y
te la sustituya por sleep. Claro que si supieses el retardo, mejor que mejor. Siempre puedes encontrar que programas lo tienen.
Código:
grep -r -i "wait 0.1"
Vaya lista..
Código:
grep -r -i "wait 0.1" | wc -l
En mi caso 184 coincidencias..
Me temo que cambiar wait por sleep usando el mismo retardo no va... ni se inmuta en el código anterior.
En algunos ejemplos que he visto que usan "sleep" que parece que esta instrucción ya existía en Gambas2.
Suele usarse conjuntamente con procesos externos. ( Creo que Wait también hubiese valido ).
Por ejemplo en el programa EmuFamily, que al convertirlo de Gambas2 al Gambas3 me estaba dando error Gambas3
tales como este: ( No quiero derivar el tema ).
Aparentemente el archivo se crea.
Código:
...
Shell ("rm /tmp/ef.txt")
Sleep 0.5
Shell ("ls " & Settings["Rutas/Roms"] & " > /tmp/ef.txt")
Sleep 2.5
...
Es curioso que no usara Wait.
Corrijo.
Ese bloque de instrucciones que he mostrado del progressbar, instalando la nueva versión de Gambas (3.16.3) sigue funcionando con wait.
Parecía que iba a tener que dejarlo de usar.
Ese código no me ha valido para comprobar el problema que tu comentas.
Saludos