1个回答
展开全部
procedure TForm1.Button1Click(Sender: TObject);var temp:Longint;begin temp:=shellexecute(handle,'open',pchar('notepad.exe'),nil,nil,sw_show); showmessage(inttostr(temp)); end; 查看更多答案>>
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
