A175178 发表于 2009-10-13 16:07:56

FileFindNextFile只能找下个文件,怎么找上个文件呢?

本帖最后由 A175178 于 2009-10-13 16:22 编辑

无聊时写了个小脚本来更改当前桌面墙纸，但只能一个一个向下换，不能倒回去，求解决方法。
附小脚本代码：
#noTrayIcon
$g_szVersion = "_WPCG"
If WinExists($g_szVersion) Then Exit
AutoItWinSetTitle($g_szVersion)
HotKeySet("^!{NUMPAD0}","Wpexit")
HotKeySet("^!{DOWN}","WPnext")
$search = FileFindFirstFile("G:\images\WallPaper\" & @DesktopWidth & "\*.bmp")
While 1
    Sleep(500)
WEnd
Func Wpexit()
      FileClose($search)
      $sFile = 'G:\images\WallPaper\' & @year & @mon & '.bmp'
      If FileExists($sFile) Then DllCall('user32','int','SystemParametersInfo','int',20,'int',0,'str',$sFile,'int',0)
      Exit
EndFunc
Func Wpnext()
    If $search = -1 Then Exit
    $sFile = FileFindNextFile($search)
    If @error Then
       $search = FileFindFirstFile("G:\images\WallPaper\" & @DesktopWidth & "\*.bmp")
       $sFile = FileFindNextFile($search)
    EndIf
    DllCall('user32','int','SystemParametersInfo','int',20,'int',0,'str','G:\images\WallPaper\' & @DesktopWidth & '\' & $sFile,'int',0);
EndFunc

bing614 发表于 2009-10-13 16:18:52

用变量把所有找到的文件存起来，想哪个调用就行了。

A175178 发表于 2009-10-13 16:22:53

哦,我以为有相应的函数呢,谢谢指点!

netegg 发表于 2009-10-13 16:36:16

楼主，这问题问得有点太夸张了，要是都有相应的函数，是不是要第二张就直接出来第二张？

foolbyrd 发表于 2009-10-14 23:25:22

留個腳印,學習了~~
页: [1]
查看完整版本: FileFindNextFile只能找下个文件,怎么找上个文件呢?