home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 2002 July / VPR0207A.ISO / OLS / IRVINE0_4_1A / irvine0_4_1a.lzh / scripts / mainfilecheck.dms < prev    next >
Text File  |  2002-01-30  |  939b  |  40 lines
  1. /*
  2. スクリプト初期化データ
  3. guid={DA77E807-ACE0-4280-B6E0-3832D0DF4BED}
  4. caption=ファイルの存在しない成功アイテムを選択
  5. version=0
  6. hint=カレントキューで保存ファイルの存在しない成功アイテムを選択します
  7. event=OnMainMenuClick
  8. match=
  9. author=Wolfy
  10. */
  11.  
  12. function OnMainMenuClick(irvine,action){
  13. //メインメニューのクリックイベント
  14.   file = new File;
  15.   item = new IrvineItem;
  16.  
  17.   irvine.BeginProgressBar(irvine.ItemCount);
  18.   try{
  19.     for(i = 0; i < irvine.ItemCount; i++){
  20.       irvine.ProgressBarStepBy(1);
  21.       item.data = irvine.GetItemData(i);
  22.       if (item.success){
  23.         file.filename = irvine.GetItemFilename(i);
  24.         irvine.SetItemSelected(i,! file.exists());
  25.       }
  26.       else{
  27.         irvine.SetItemSelected(i,false);
  28.       }
  29.     }    
  30.   }
  31.   finally{
  32.     irvine.EndProgressBar();
  33.   }
  34. }
  35.  
  36. function OnMenuUpdate(irvine,action){
  37. //メニューの更新イベント
  38.   action.enabled = (irvine.ItemCount > 0);
  39. }
  40.