![]() |
|
#1
|
|||
|
|||
![]() День (ночь) добрый(ая). Имею вот такую штуту (не знаю как называеться)
uses ShellAPI; procedure TForm1.Create_APClick(Sender: TObject); begin ShellExecute(0,'open','cmd.exe','/c netsh wlan set hostednetwork mode=allow ssid="300V5A" key="joni2453" keyUsage=persistent','C:\Windows\system32\',SW_SHO W); end; подскажите пожалуйста что дописать чтоб это все работало от имени администратора и как вообще сделать так чтоб ком строка вообще не появлялась даж на долю сек??? заранее благодарен. p.s. сорь если такая тема уже есть вроде все перерыл не нашел, и если есть прошу не удалять, т.к. это далеко не перый вопрос по этой теме. основу взял отсюда http://www.delphisources.ru/forum/showthread.php?t=7276 софтину пришлось писать для подруги т.к. она не в какую не хотит понимать командную строку)) а опыта в подобном деле 0 когда то давно в школе проходил qbasic который благополучно тогда же и был забыт, а платить 3 килорублика за подобную софтину уж совсем не охото. Последний раз редактировалось V_Max_S, 24.12.2012 в 15:09. |