计算图标的使用
课件概述
基础知识
素材采集
集成与制作
   authorware结构功能
   authorware课件制作
  
authorware精彩案例

        显示图标
   
     声音图标
   
     移动图标
   
     擦除图标
   
     等待图标
   
     计算图标
        交互图标
        决策图标
        框架图标
        链接和打包
  5. 拖拽一个计算图标到流程线并命名为“查找光驱”。双击打开计算图标的设计按钮,在弹出的对话框输入以下程序:
         if OSNumber = 3 then
              CDcode:= “NO CD-ROM ON THIS SYSTEM”
              repeat with n := 0 to 25
                  if AppType = 1 then
                     drivecode := GetDriveType(n)
                      if drivecode = 4 then
                          CDcode:= Char(65 + n)
                          exit repeat
                       end if                      
                   else if AppType = 2 then
                        drivecode := GetDriveType(Char(65+n)^“:\\”)
                       if drivecode = 5 then
                             CDcode:= Char(65 + n)
                             exit repeat
                        end if
                   end if
               end repeat
          else
                CDcode:= “ THE UNKONW SYSTERM ”
         end if