首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

delphi仿hao123桌面版,开网页的速度没人加速呢

2013-01-06 
delphi仿hao123桌面版,开网页的速度没人加快呢?所谓Hao123桌面版,就是个几百k的exe。打开后会调用默认浏览

delphi仿hao123桌面版,开网页的速度没人加快呢?
所谓Hao123桌面版,就是个几百k的exe。打开后会调用默认浏览器访问hao123。这程序简单吧!

我用Delphi7+XP sp3去山寨,核心代码:ShellExecute(Handle, 'open', 'http://www.baidu.com', nil, nil, SW_SHOWNORMAL);。

你看我也是打开hao123首页。为什么同一电脑么有原版的快呢? 有没有可能是开发工具的原因呢?

真心求教
[解决办法]
//编译后27k   delphi XE


program Project9;

uses
  ShellAPI;
begin
    { TODO -oUser -cConsole Main : Insert code here }
    try
      ShellExecute(0, 'open', 'http://www.baidu.com', nil, nil, 1);
    except
    end;
end.

[解决办法]
//以下代码, D7(15K)   XE(21K)   速度和Hao123无差别

program Project1;

  function ShellExecute(hWnd: LongInt; Operation, FileName, Parameters,
    Directory: PWideChar; ShowCmd: Integer): HINST; stdcall; external 'shell32.dll' name 'ShellExecuteW';

begin
  ShellExecute(0, 'open', 'http://www.baidu.com', nil, nil, 1);
end.

[解决办法]
kol您用过吗!??

热点排行