请在interface处uses句中加入ShellAPI


 


ShellExecute(handle,nil,pchar('http://blog.csdn.net/cadenza7'),nil,nil,SW_SHOWNORMAL);


参数说明


hWnd:Integer;
Operation:PChar;:PChar;
Parameters:PChar;
Directory:PChar;
ShowCmd:Integer
依次表示父窗口的句柄（handle）、操作类型（缺省时为open）、文件名、启动参数、缺省目录、窗口显示方式。在制作超级链接时，第2、4、5项参数可不填。窗口显示方式一般填SW_ SHOWNOACTIVATE或者SW_ SHOWNORMAL


 


HTTP


ShellExecute(handle,nil,pchar('http://blog.csdn.net/cadenza7'),nil,nil,SW_SHOWNORMAL);


 


Mail


ShellExecute(handle,nil,pchar('mailto:kyo_2360#sina.com'),nil,nil,SW_SHOWNORMAL);


 


QQ


ShellExecute(handle,nil,pchar('http://wpa.qq.com/msgrd?V=1&Uin=1234567&Site=ioshenmue&Menu=yes'),nil,nil,SW_SHOWNORMAL);


 


 


home page http://blog.csdn.net/cadenza7