如题

解决方案 »

  1.   

    先在uses 部分加入: shellapi
    然后在事件中写:ShellExecute(Handle, 'open', PChar('http://www.festra.com/'), nil, nil, SW_SHOW);
      

  2.   

    use shellapi
    ShellExecute(Handle, 'open', PChar('http://www.festra.com/'), nil, nil, SW_SHOW);
    字变颜色:
    onmouseenter()
    label1.font.color:='你想要的颜色';
    其实delphi可以自动完成代码,你自己试试啊,打入.就行了
      

  3.   

    ShellExecute(Handle, 'open', PChar('http://www.festra.com/'), nil, nil, SW_SHOW);
    不对,在win 2k winxp下都不能用
    应该是
    ShellExecute(Handle, 'open', iexplorer.exe', 'http://www.festra.com/', nil, SW_SHOW);