Contents
Articles
Behaviors
Books
Director News
Director Web Sites
FAQ
Games
Mailing Lists
News Groups
Project Examples
Reviews
Software
Tools
Useful Web Sites
Utilities
Xtras

Don't miss these
Volume Behaviour (Buttons)
Gravitational Force
Simatrix Menu
RADAgent
StuntRacer
Quck Fill
cXtraFlameFX
Direct Media Controler Button
Filemanager
VTC Training CD for Macromedia Director 6
 

 

 

Behavior Open Acrobat File

Added on 9/16/1999

 

Compatibilities:
D6_5 D7 D8 PC Script

Required Xtras:
Buddy API

Rating:

Author: MediaMacros (website)

Runs an acrobat file with with the specified paramaters.

--Code by Chuck Neal
--Chuck@mediamacros.coc

property typeLaunch, fileToOpen

on getPropertyDescriptionList me
  set p_list = [#fileToOpen: [#format : #string, #comment : "File to open-Including path and extension:", #default:""], #typeLaunch : [#comment: "Type of PDF open: ", #format: #string, #default: "Open", #range: ["Open", "Open /No Splash Screen", "Print-No Open"]]]
  return p_list
end

on mouseUp me
  if baFileExists(the moviePath & fileToOpen) = 1 then
    set Acrobat = baFindApp( "pdf")
    set myFile = baShortFileName(the moviePath & fileToOpen)
    if Acrobat <> "" then      
      case typeLaunch of
        "open" :
          baOpenFile(myFile , "maximised")
        "Open /No Splash Screen" :
          set launchString = baShortFileName(Acrobat) & " /s " & baShortFileName(myFile)
          baRunProgram(launchString, "Maximised" , false )              
        "Print-No Open" :
          baPrintFile(myFile)          
      end case
    end if
  else
    alert "File" && fileToOpen && "doesn"t exist."
  end if
end

 


Contact

MMI
36 South Court Sq
Suite 300
Newnan, GA 30263
USA

Send e-mail