Autor Tema: How to add Custom Delay to Multi File Binder.  (Leído 2498 veces)

0 Usuarios y 1 Visitante están viendo este tema.

Cudder

  • Bytes
  • *
  • Mensajes: 26
  • Reputación: +0/-1
    • Ver Perfil
How to add Custom Delay to Multi File Binder.
« en: Marzo 24, 2011, 06:34:34 pm »
So, I'm trying to add Delay for each file in a Binder ListView but I'm having a little problem..

Código: [Seleccionar]
Dim mTime As Long, sUnit As String, sTime As String
sUnit = Right$(sSetting(5), Len(sSetting(5)) - InStrRev(sSetting(5), "("))
sTime = Replace$(sSetting(5), "(" & sUnit, "")


If "(" & sUnit = "(s)" Then mTime = sTime * 1000
If "(" & sUnit = "(mn)" Then mTime = sTime * 60000
If "(" & sUnit = "(h)" Then mTime = sTime * 3600000
If BinderSetting(5) = "None" Then mTime = ""

Call Sleep(mTime)

This works fine but example, if for the first file in the listview i put 10(s) and add a second file and put 10(s) too. The first file will sleep 10 secs fine but the second file will sleep only after the first one and not at the same time so it sleeps 10 secs + 10 secs = 20 secs, I want it to sleep at the same time as the others. How to please?

Sorry, I don't speak spanish :s

Thanks :)
« última modificación: Marzo 25, 2011, 11:29:31 pm por xkiz ™ »