На PORTA.ru
ОГРОМНЫЙ выбор портативной техники:
MD-плееры CD-плееры MP3-плееры Кассетные плееры Диктофоны Радио Цифр. камеры Сотовые Дешевые ноутбуки |
||
Развернуть окно на весь экран Процедура глМаксимизироватьОкно() Экспорт
// вызывать в конце процедуры "ПриОткрытии" из модуля формы WSHShell = СоздатьОбъект("WScript.Shell"); WSHShell.SendKeys("%"); WSHShell.SendKeys("{LEFT}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{ENTER}"); КонецПроцедуры <сообщил Chernogor> Замечание: Если у вас этот код не работает, значит не установлен <Windows Scripting Host> или установлена старая версия. "Что вам нужно для начала: Первое, что надо сделать - убедиться, что Windows Scripting Host у вас есть. В состав W2K он входит изначально. Если вы используете Windows 98 или Internet Information Server 4.0, или если вы устанавливали Option Pack для Windows NT 4 и для Windows 95, он у вас точно есть. В случае Windows 95 все усложняется, и Windows Scripting Host придется скачивать с сайта Microsoft (msdn.microsoft.com/scripting). Напишите в командной строке "wscript". Если появилось диалоговое окно с надписью, отличной от "File not found", все в порядке." <по материалам с http://www.optim.ru/cs/2000/1/WSH/WSH.asp> Скачать более новую версию Windows Scripting Host можно отсюда. -
Наверх -
|
В качестве благодарности за решение проблемы, щелкните здесь. Поддержите развитие сайта. Спасибо! |
Автор и разработчик: Кайгородов Андрей aka mszsuz. mszsuz@online.sinor.ru ICQ#33993114. Дата последнего обновления страницы: Friday 09.04.2004 16:52 |