Chinaunix首页 | 论坛 | 博客
  • 博客访问: 1267395
  • 博文数量: 788
  • 博客积分: 4000
  • 博客等级: 上校
  • 技术积分: 7005
  • 用 户 组: 普通用户
  • 注册时间: 2008-08-19 15:52
文章存档

2017年(81)

2011年(1)

2009年(369)

2008年(337)

分类:

2009-03-02 11:35:52



如题。急!!!

procedure   TfrmRepCenter.wbBeforeNavigate2(Sender:   TObject;  
      const   pDisp:   IDispatch;   var   URL,   Flags,   TargetFrameName,   PostData,  
      Headers:   OleVariant;   var   Cancel:   WordBool);  
  var  
      sURL:   string;  
  begin  
   
          sURL:=ExtractFileName(String(URL));//获得  
   
      end;  
       
  end;



--------------------------
新闻:上海最快3月底推TD上网本
导航:博客园首页  知识库  新闻  招聘  社区  小组  博问  网摘  找找看
阅读(737) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~