TrayIcon should flash, but it does not.

[Der_Andi]

Hi,

i'm working on a script that observes a specific folder.

If i put files in it, the script copies them to a directory on another computer. That works so far.

The connection to this remote computer is not very fast, maybe 10 kb/s.

Here's the part of code, which is executed every 5 seconds:

$files = DirGetSize("D:\out", 1)
If $files[1] > 0 Then
    TraySetState(4)
    FileCopy("d:\out\*.*", "s:")   ;S is a mapped network drive
    FileMove("d:\out\*.*", "d:\files\", 1)
    TraySetState(8)
EndIf

During the copy/move part the tray icon should flash.

But FileCopy prevents the icon from flashing...

If i put a 2-seconds-sleep-command directly before the copy-command, the flashing time is 2 seconds and will be interrupted by the copy-command.

Is it possible, to keep the icon flashing during the copy process?

Andi

[Xenobiologist]

Hi,

just a try not tested:

$files = DirGetSize("D:\out", 1)
If $files[1] > 0 Then
    AdlibEnable("_flash", 250)
    FileCopy("d:\out\*.*", "s:")   ;S is a mapped network drive
    FileMove("d:\out\*.*", "d:\files\", 1)
    AdlibDisable()
    TraySetState(8)
EndIf

Func _flash()
    TraySetState(4)
EndFunc   ;==>_flash

So long,

Mega

[SmOke_N]

Hi,

just a try not tested:

$files = DirGetSize("D:\out", 1)
If $files[1] > 0 Then
    AdlibEnable("_flash", 250)
    FileCopy("d:\out\*.*", "s:")   ;S is a mapped network drive
    FileMove("d:\out\*.*", "d:\files\", 1)
    AdlibDisable()
    TraySetState(8)
EndIf

Func _flash()
    TraySetState(4)
EndFunc   ;==>_flashoÝ÷ Ù*%¢xz¿ªê-yj+ÉbëaÆ­jW²Ö®¶­sc²b33c¶fÆW2ÒF$vWE6¦RgV÷C´C¢b3#¶÷WBgV÷C²Â£´bb33c¶fÆW5³ÒfwC²FVà¢FÆ$Væ&ÆRgV÷CµöfÆ6gV÷C²Â#S vÆR 6ÆVW tVæ@¢´fÆT6÷gV÷C¶C¢b3#¶÷WBb3#²¢â¢gV÷C²ÂgV÷C·3¢gV÷C²µ22ÖVBæWGv÷&²G&fP¢´fÆTÖ÷fRgV÷C¶C¢b3#¶÷WBb3#²¢â¢gV÷C²ÂgV÷C¶C¢b3#¶fÆW2b3#²gV÷C²Â¢FÆ$F6&ÆR¢G&6WE7FFR£´VæD` ¤gVæ2öfÆ6¢G&6WE7FFRB¤VæDgVæ2³ÓÒfwCµöfÆ6