Рассылка закрыта
При закрытии подписчики были переданы в рассылку "Создание прибыльного сайта для начинающих" на которую и рекомендуем вам подписаться.
Вы можете найти рассылки сходной тематики в Каталоге рассылок.
Интернет для Delphi-программиста
Информационный Канал Subscribe.Ru |
Интернет для Delphi программиста.Выпуск : № 31 Здравствуйте уважаемые подписчики рассылки "Интернет для Delphi программиста". Данная рассылка предназначена для всех кого интересует Delphi, здесь будут выкладываться ссылки на различные ресурсы интернета так или иначе связанные с Delphi: книги, исходники, программы... Изучайте Delphi один из лучших языков программирования!!! ЗАДАТЬ ВОПРОС : Правила
рассылки: Новые вопросы.
Ответы.
Статья: Создание главного меню средствами Win API. http://decoding.narod.ru/api/menu/menu.html ![]() Сегодня мы добавим в наше минимальное приложение главное меню. Но прежде рассмотрим некоторые API функции для работы с ним.
Более полную и подробную информацию смотрите в хэлпе. Делая эту программу, я нашел пару способов создать меню (они не очень сильно отличаются друг от друга, но оба имеют право на существование). На первом способе я остановлюсь поподробнее, а, говоря о втором, просто скажу, чем он отличается от первого. Главное меню программы, это строка, которая располагается в верхней части формы. Она состоит из пунктов, нажатие на любой из них приведет к раскрытию подменю, принадлежащего данному пункту. Это всплывающее меню в Windows называется PopupMenu. Обратите внимание, понятие PopupMenu в Delphi и Windows различаются. В Windows PopupMenu - это подменю, принадлежащее другому пункту меню (который отмечается треугольником справа от текста пункта) или одному из пунктов главного меню. В Delphi PopupMenu — это меню, которое может "всплывать" в любой точке формы. Осознав вышесказанное, приступаем к работе. Откроем шаблон, написанный в прошлый раз, и дополним список констант и переменных
Сначала разберемся с константами. Каждый пункт меню должен иметь свой уникальный идентификационный номер. Так как именно по этим номерам мы и будем работать с меню, удобнее всего оформить их как константы. Идея следующая. В главном меню будет 3 пункта: Menu, Edit и Check. Константы для него начинаются с буквы m и имеют номера 100, 200 и 300 соответственно. Каждому из этих пунктов будет сопоставлено свое подменю. Константы для них начинаются с буквы s и номеруются следующим образом: те, которые относятся к первому пункту, начинаются со 100+1, те, которые относятся ко второму пункту, начинаются с 200+1, ну и по аналогии, те, которые относятся к третьему пункту, начинаются с 300+1. В третьем пункте будет подменю второго уровня, константа для него равна 300+10+1. Отдельное значение имеет константа SEPARATOR, это просто разделитель между пунктами подменю. Переходим к разделу var. Здесь появилось 5 переменных типа HMENU, они содержат Hendle соответствующего меню (какого, понятно из их названия). Переменная Check показывает, установлен или сброшен пункт меню (читайте дальше, и все поймете). При добавлении нового пункта приходится выполнить ряд действий, в том числе инициализацию структуры MENUITEMINFO. Так как эти действия нужно производить при добавлении каждого пункта, чтобы избавиться от избыточности кода, оформим эти действия в виде отдельной процедуры.
Поясню входные параметры функции. hMenu - меню, в которое добавляется новый пункт; SubMenu - связанное с этим пунктом подменю (если оно есть); Cap - заголовок нового пункта; _uID - всегда 0 (этот параметр используется в функции InsertMenuItem); _wID - идентификатор, связанный с данным пунктом; Sep - признак, является ли новый пункт разделителем или нет. Наше приложение должно реагировать на выбор того или иного пункта меню. Дополним оконную процедуру следующим образом:
При выборе пункта Exit (константа sExit) программа будет закрыта. Выбор пунктов Copy, Cut, Paste (константы sCopy, sCut и sPaste соответственно) приведет к появлению сообщения, соответствующего выбранному пункту. Пункт Select (константа sSelect) работает аналогично TCheckBox, то есть может быть установлен или сброшен. При выборе пункта Beep (константа sSecondLevel) мы услышим звуковой сигнал. Теперь для создания меню все готово. Приступаем.
Разбираемся. Первым делом создаем главное меню. Указатель на него присваиваем полю lpszMenuName структуры Wc (раньше оно было равно nil). После регистрации класса в системе создаем подменю. При создании окна, параметр hMenu функции CreateWindowEx равен MainMenu (Handle созданного меню, а не 0, как было в шаблоне). После создания всех пунктов, перерисовываем меню при помощи функции DrawMenuBar. Теперь второй способ создания меню. Здесь я приведу его в сокращении, и поясню произведенные изменения (полный текст программы имеется в архиве с примерами в конце статьи).
Поле lpszMenuName структуры Wc остается равным nil. Главное меню создаем после регистрации класса в системе. При создании окна, параметр hMenu функции CreateWindowEx можно оставить равным 0, т.к. здесь мы не перерисовываем меню, а назначаем его форме, используя функцию SetMenu. Все. Теперь у нашей формы есть меню. Это оказалось совсем не сложно. До новых встреч, удачи в программировании. .:
Пример к данной статье :.
Исходники: Программа для локальной сети.
Позволяет просматривать/запускать/удалять/копировать
себе и на чужой компьютер/распечатывать
все файлы и папки "вражьей" машины,
а не только открытые для сетевого
доступа; просматривать содержимое его
экрана с сохранением в jpg или без - в "видео
:)" режиме, увидеть список запущенных
процессов и завершить "мешающие"...
Ну и еще немного :) Modular Implementation of heX Editor Шестнадцатеричный редактор с гибким плагинным интерфейсом. Поддерживается работа с файлами, а также жесткими дисками, дискетами, физической (оперативной) памятью. Распространяется по лицензии GNU GPL. Прога может быть вам полезна, если вам хочется узнать кое-что о своём компе, о Вашей локальной сети, поиздеваться над видеоадаптером (он много умеет, о чём вы и не подозреваете), узнать кое-что о железе и массу других полезных вещей. Программа AvtoShema V 2.2. Эта программа
предназначена для построения Блок-схемы
алгоритма по готовому коду синтаксиса
"Паскаль". Загрузка кода как через
модуль PAS так и через буфер обмена.
Возможна загрузка из сохраненных файлов
*.txt; Пригодится для лучшего понимания
чужого кода. А также забытого своего для
тех кто ленится комментировать. Также
благодаря возможности строить схемы
через буфер обмена можно строить Блок-схемы
кусков кода прямо во время их написания
скопировав код и выбрать контекстное
меню иконки данной программы в трее.
Можно строить цветные блок-схемы.
Настраивать размеры блоков, строить
очень длинные блок-схемы. Программа позволяет переименовывать
кучу вордовских документов. В качестве
имени выбираются первые несколько слов
из документа. Для работы необходим
установленный Word. Компоненты: Эта библиотека предоставляет программисту более 150 анимационных эффектов при выводе изображений Version 3.10 shareware D3,4,5,6,7 Этот компонент позволяет создавать различные эффекты над картинками. Можно взять две картинки и создать красивый визуальный переход между ними. Таким образом, легким движением руки делаются презентации с переходами между кадрами в виде визуальных эффектов. Можно использовать компонент и как способ создания эффектов в графическом редакторе или аниматоре! Вот некоторые плюсы и минусы компонента: Плюсы 1) Очень качественно написан исходник! 2) В комплекте 122 эффекта... 3) Очень легко добавлять новые эффекты (демка входит в архив); 4) Эффекты могут просчитываются и прорисовываются в отдельных потоках, что увеличивает скорость обрисовки. 5) Есть возможность работы с картинками из базы данных. Минусы 1) При некоторых сочетаниях настроек замечены глюки, но в основном работает стабильно... 2) Реально эффектов меньше 122, потому что один эффект повторяется 2-4 раза, просто с разных сторон. Компонент который занимается отправкой почты через почтовые программы Outlook Express, The bat. Файл занимает всего 9 Кб. Google Parser это компонент для WEB-поиска, использующий возможности поискового сервера Google. Каждый найденный результат, это набор свойств: Title, URL, Excerpt, Description, URLs для Category, Translation, Cache, и Similar Pages. Google Parser используется для добавления в приложения возможности поиска в Интернет. В отличие от Google API, Google Parser не ограничено 1000 запросами в день. Google Parser не требует наличия SOAP и компилируется в Delphi Standard. Содержит плагин DIHtmlParser Unicode HTML, который поддерживает TStream интерфейс. TmxWebUpdate предназначен для подключения возможности автоматического обновления созданных вами приложений. Получает информацию из Web на наличие новых версий, и, если она доступна, загружает её, используя HTTP, затем запускает обновление. HTTPFileDownloader - компонент для скачивания файлов по HTTP-протоколу, базирующийся на компоненте IdHTTP Indy Client. Невизуальный компонент - ProgressBar, который отрисовывает линейку програсса в Статусбаре. Для настройки нужно указать StatusBar, в котором будет отрисовка и PanelIndex - индекс панели в статусбаре. Работает как в обычном ProgressBar, оптимизировано на отрисовку изменений. Часть кода взято из примеров. Freeware. Невизуальный компонент. Перехватывает обработчик ошибок приложения.Сохраняет ошибки, делает скриншоты происходящего в программе(активной формы в jpg) и предлагает отправить их по почте к разработчикам софта.Все регулируется.Freeware Написал для себя, но думаю, что понадобится многим :) FastZlib - бесплатная быстрая и удобная реализация zLib (библиотеки для сжатия данных) Книги для online - чтения: http://www.noil.pri.ee/?mod=book/book Delphi 3: библиотека программиста Иллюстрированный самоучитель по Delphi 6 Иллюстрированный самоучитель по Delphi 7 для начинаюших Иллюстрированный самоучитель по Delphi 7 для профессионалов Интересные и полезные сайты по Delphi: Если Вы хотите, чтобы Ваш сайт был в этом разделе пишите. http://www.noil.pri.ee/ - Здесь вы можете почитать статьи, скачать исходники и компоненты, пообщаться на форуме. Немного юмора: :))
Дружественная рассылка: Все
кто хочет изучить Delphi и реально
научиться писать свои программы, ЦПИ "Эверест"
поможет Вам. 10 причин в пользу платного обучения в ЦПИ "Эверест"… 1. Когда Вы
платите деньги-
появляется дополнительный стимул
против лени: надо учиться, ведь деньги
уже уплачены….
5. Стоимость обучения
одного месяца в ЦПИ "Эверест"
сравнима с ценой хорошей книги. Но часто
ли Вам попадались книги, рассчитанные
именно на Вас. Мы же работаем
индивидуально.
8. А это значит, что …Мы
предлагаем получить "высшее
образование" - профессию
программиста всего за
1 год и 144 доллара, любой ВУЗ
попросит в 3 раза больше за один только
семестр. По всем вопросам обращайтесь ко мне. Если вы встретили в интернете
интересный сайт или статью, да и вообще, что угодно
связанное с Delphi, поделитесь ссылкой. Предложения, критику и пожелания пишите на e-mail. |
Subscribe.Ru
Поддержка подписчиков Другие рассылки этой тематики Другие рассылки этого автора |
Подписан адрес:
Код этой рассылки: comp.soft.prog.delphiinternet |
Отписаться
Вспомнить пароль |
В избранное | ||