1:在表单中添加hyperlink控件。 thisform.hyperlink1.NavigateTo('d:\gjsoft\tsbook\temp.htm')
2:用代码生成hyperlink控件: _SCREEN.AddObject('oAppHyperLink','HyperLink') _SCREEN.oAppHyperLink.NavigateTo('www.qlsh.net') _SCREEN.RemoveObject('oAppHyperLink') 3:使用shell32:此方法最灵活,不限于html文件,可用于默认程序打开任何类型文件 DECLARE INTEGER ShellExecute ; IN SHELL32.DLL ; INTEGER nWinHandle,; STRING cOperation,; STRING cFileName,; STRING cParameters,; STRING cDirectory,; INTEGER nShowWindow aa=ShellExecute(0,"Open","temp.htm","",".",1) aa=ShellExecute(0,"Open","noname.bmp","",".",1) |
|