ShellExecute(0, 'open', PChar('Microsoft-Edge:' + Edit1.Text), nil, nil, SW_SHOW);

 posted on 2018-12-28 18:08  宝兰  阅读(306)  评论(0编辑  收藏  举报