uses LCLIntf;
procedure TForm1.Button1Click(Sender: TObject);
begin
//--打开网页
LCLIntf.OpenURL('www.hao123.com') //必须至少加上www不然它会认为是一个文件,
//--打开文件
//同样可以使用OpenURL,看源码其实他调用的就是OpenURL,
//如果要在WinCE下使用OpenDocument打开文件,必须使用绝对路径: ExtractFilePath + '123.txt'
LCLIntf.OpenDocument('123.txt');
end;