在PB中用Flash制作Splash封面

• 我们常用的软件如Word，Excel，PhotoShop等在运行时都有一个Splash封面，该封面既显示软件的名称、版本、开发人员以及使用者等信息，又可以在后台初始化数据库和软件需要调用的文件。但这些Splash封面文件通常只包含静态的图片和文本对象，常常显得比较单调。我们是否可以将Splash封面文件做成动态的呢？答案当然是可以的。

  以下详细介绍制作过程。

  1.先将Swflash.Ocx文件复制到Windows\system32（若为Windows98系统则为System目录）下，然后单击开始，运行，在运行框中输入Regsvr32 c:\windows\system32\swflash.ocx，单击确定即可注册swflash.ocx控件。
  
  2.在Flash中制作一大小为550px×450px的Flash文件splash.fla，并输出为splash.swf，保存在开发目录下。

  3.在PowerBuilder中新建一应用Splash.pbl，在应用的Open事件中添加如下代码：Open(w_splash) //打开Splash封面窗口。

  4.在Powerbuilder中新建一函数wf_get_Curr_dir，Access为Public，Return Type 为String，函数名为wf_get_Curr_dir，在该函数中添加如下代码：

  //获得当前应用所在的目录
  
  string ls_Buffer
  
  ls_Buffer=Space(255)
  
  IF GetCurrentDirectoryA(255,ls_Buffer)=0 THEN SetNull(ls_Buffer)
  
  RETURN ls_Buffer
  
  代码中的GetCurrentDirectoryA为WindowsAPI函数，在应用的Globa External Functions中声明：
  
  Function ulong GetCurrentDirectoryA(ulong nBufferLength,ref string lpBuffer) Library "kernel32.dll"

  5.新建一窗口w_Splash，其属性如下表：

  窗口/控件名 值
  
  WindowType Popup!
  
  WindowState Normal!
  
  Visible True
  
  Enabled True
  
  ClientEdge True
  
  Center True
  
  Width 1847
  
  Height 1092
  
  将窗口的Titlebar、ControlMenu、MaxBox、MinBox、PaletteWindow、RightToLeft、Border等全部取消选择。

  6.在窗口中插入一Ole控件，打开如下对话框：

  单击Insert Control页面

  在Control Type下的列表框中选择Shockwave Flash Object，然后单击OK按钮即可在窗口中插入flash控件，其属性设置如下表：

  窗口/控件名 值
  
  Name Ole_1
  
  Visible True
  
  Enabled True
  
  BorderStyle StyleLowered!
  
  其它属性保持不变。

  在窗口的Open事件、Close事件、Timer事件中分别加入如下代码：

  Open事件：
  
  String ls_path,ls_swffile  
  
  ls_path=wf_get_curr_dir() //获得当前应用的路径
  
  ls_swffile=ls_path+'\splash.swf'
  
  ole_1.move(0,0)  
  
  ole_1.width=this.workspacewidth( )
  
  ole_1.height=this.workspaceheight( )
  
  ole_1.object.movie(ls_swffile)
  
  ole_1.object.play()
  
  timer(5,this)
  
  Close事件：
  
  timer(0,this)
  
  //open(w_logon) //打开登陆窗口
  
  Timer事件
  
  Close(this)
  
  至此本应用的Splash封面窗口建立完毕，单击运行按钮即可运行。

• [1] [2] 下一页 
• 复制本页网址和标题，发送给你QQ/Msn的好友一起分享
  
  
• 在PB中用Flash制作Splash封面 相关文章：
• ·在PB中用Flash制作Splash封面
• 在PB中用Flash制作Splash封面 相关软件

上一篇:Jakarta-Tomcat 简明中文版用户指南第二部分

下一篇:循序渐进学习Power Builder 6.0(13-3)

• 特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作
• 者.文章版权归文章原始作者所有.对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转
• 载的文章有版权问题请联系编辑人员,我们尽快予以更正. 转载请注明来源：http://www.hackhome.com

精品推荐

热点TOP10

特别推荐