登 录
procedure TForm1.N7Click(Sender: TObject); var hwndle:HWND; begin ShellExecute(hwndle,nil,'help.chm',nil,nil,SW_SHOWNORMAL); //FileName 可以是任何文件
end;
抱歉!评论已关闭.