在delphi中如何显示一个超连接?

1.就是传一个字符串到form上,用户点击就进入该网址.
2.我在调试delphi时,调试信息没有显示,如何显示调试信息?

解决方案 »

  1.   

    shellexecute(handle,"http://",nil,nil,sw_shownormal)
      

  2.   

    ShellExecute(
          hwmd,      //父窗口句柄
          LPCSTR lpszOp;//要执行操作窜的地址 可以为open ,print默认为open
          LPCSTR lpszFile;//文件名窜的地址 
          LPCSTR lpszParams;//执行文件串的地址
          LPCSTR lpszDir;//默认目录串的地址
          int fsShowCmd;//打开时文件是否显示
                );
    ——————————————————————
    WinExec(
        LPCSTR lpCmdLine,  // address of command line 
        UINT uCmdShow  // window style for new application 
       );  
    ———————————————————————
      

  3.   

    自己写比较麻烦，可以找一下第三方控件，看起来有下划线，比如TIPEdit之类，我记得有些教Delphi的书在“自定义控件”之类的章节举例就是用的这个，你可以查一下。至于楼上说得方法，也对，把这一句加到Edit控件的OnClick事件里面，在修改“http：//”到你要求的地址就可以了，但是遗憾的是没有下划线，和普通的没有视觉上的区别。
      

  4.   

    http://218.56.11.178:8020/web/index.aspx->  下载基地 ->例程-基础应用->实现发送邮件的链接和打开网页的连接
      

  5.   

    uses
     ShellAPIprocedure TForm1.Label1Click(Sender: TObject);
    begin
      ShellExecute( Handle, 'open', 'http://www.sina.com/','','',SW_MAXIMIZE );
    end;
      

  6.   

    uses
     ShellAPIshellexecute(handle,'open',"http://",nil,nil,sw_shownormal)
      

  7.   

    第一个：放一个label，caption的值是一横线！，然后不可见，编程onmousemove时可见！
      

  8.   

    wenjianyao(建) :caption的值是一横线！是什么意思?我在delphi下调试程序移动鼠标还是看不见运行信息,是不是要在哪儿设置一下?
      

  9.   

    字体font-style-fsUnderline->true设置下划线就可以了啊.