本文整理自网络,侵删。
uses WinTypes, ShellAPI;
procedure OpenObject(sObjectPath: string);begin ShellExecute(0, nil, PChar( sObjectPath ), nil, nil, SW_NORMAL);end;
//调用 OpenObject('c:\my_docs\report.txt');
相关阅读 >>
Delphi里参数修饰符const、var、out的作用分别是什么?
Delphi windows 编程[12] - 菜单与菜单资源(1-3)
Delphi 手机app打开一个安卓系统支持的文件,比如 pdf
更多相关阅读请进入《Delphi》频道 >>