Открыть страницу WEB страницу браузером по умолчанию в системе

{codecitation class=»brush: pascal; gutter: false;» width=»600px»}

Uses {…},ShellAPI;

ShellExecute(Handle,’open’,’http://www.kvrsoft.com’,nil,nil,SW_Normal);

{/codecitation}

Добавить комментарий