![>](style_images/1/nav_m.gif)
![]() |
Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
|
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[3.135.188.58] |
![]() |
|
Страницы: (10) « Первая ... 8 9 [10] все ( Перейти к последнему сообщению ) |
![]() |
Прикр. сообщ.
#1
,
|
|
Есть небольшое предложение, сделать набор классов или UserControls (хотя, более чем уверен, что он уже существует в том или ином виде), которые смогут полностью заменить ActiveX MS Common Control, дабы не возникало тем, вроде этой, а так же в целях избавить себя от перетаскивания почти 1 МБ, чтобы пользовать, к примеру, банальный ProgressBar. Если тема имеет смысл, то могу набросать еще для TabControl по прототипу PropertySheet с возможностью добавлять Frame. В качестве поддержки темы набросал класс ProgressBar'а...
Реализовано: SysListView32 — ListView.ctl — Обновлено 10/12/2007 msctls_progress32 — Progress.ctl SysDateTimePick32 — SysDateTimePick.ctl SysTabControl32 — TabStrip.ctl — Обновлено 10/12/2007 SysTreeView32 — TreeView.ctl msctls_statusbar32 — StatusBar.ctl — Обновлено 10/12/2007 SysIpAddress32 — IpAddress.ctl CODEBOX controls CodeBox.part01.rar CodeBox.part02.rar CodeBox.part03.rar EOF CODEBOX controls Прикреплённый файл ![]() |
Сообщ.
#136
,
|
|
|
Компанент, написанный по мотивам ShellListView из Delphi. Смыслв том, чтобы заменить совокупность DirListBox и FileListBox одним, более привычным компанентом TreeView, но не простым TreeView-ом, а специализированным Explorer-ом. Не требует никаких сторонних библиотек (только самое необходимое - stdole2.tlb).
Отрисовка и прочие алгоритмы выполненны Основные свойтва: DragAndDrop As Long - включить/выключить режим DAD Path As String - путь (при смене пути происходит отрисовка) Filter As Long - фильтр отображаемых файлов и папок (vbFileAttributes) IntervalX - отступ между иконками по ширине SizeIconX/SizeIconY - размер иконок при отрисовке На данный момент реализовываю DragAndDrop технологию. Основные модули готовы, и компанент уже может применяться, однако хотелось бы довести его до ума. Explorer.rar Прикреплённый файл ![]() |
Сообщ.
#137
,
|
|
|
Для таких задач есть ShellExecute.
|
Сообщ.
#138
,
|
|
|
Цитата coder @ Для таких задач есть ShellExecute. Спасибо! даже не знал о подобном, думал Shell-ом всё ограничивается ![]() ![]() Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _ (ByVal hWnd As Long, ByVal lpOperation As String, _ ByVal lpFile As String, ByVal lpParameters As String, _ ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Private Declare Function ShellExecuteForExplore Lib "shell32.dll" Alias "ShellExecuteA" _ (ByVal hWnd As Long, ByVal lpOperation As String, _ ByVal lpFile As String, lpParameters As Any, _ lpDirectory As Any, ByVal nShowCmd As Long) As Long буду применять |
Сообщ.
#139
,
|
|
|
Ещё в добавку: Для Shell нужно указать запускающую программу, а ShellExecute сам определяеть какой файл чем открыть.
|
Сообщ.
#140
,
|
|
|
Цитата coder @ ShellExecute сам определяеть какой файл чем открыть. Заметил, но в ОС должны быть ассоциации программ и файлов, поэтому всё равно придётся "учить" ос, что *.ini;*.inf и прочие файлы, можно открыть как текст |
Сообщ.
#141
,
|
|
|
Цитата VisualProg @ поэтому всё равно придётся "учить" ос, что *.ini;*.inf и прочие файлы, можно открыть как текст так вроде ini и inf и так по умолчанию открываются блокнотом... |
Сообщ.
#142
,
|
|
|
Эх, добавлю-ка сюда свою коллекцию контролов. Разрабатывались с нуля (без использования оберток) для одного крупного проекта, который сейчас заброшен, почти все компоненты поддерживают скины.
Ctrl.zip - библиотека, исходники и тестовый проект. GrayBlue.zip - скин. Кому понадобится, может причесать (хотя вроде бы все нормально работает). Если кто-нибудь захочет их использовать, просьба сообщить. файлы здесь Прикреплённый файл ![]() Прикреплённый файл ![]() Прикреплённый файл ![]() Прикреплённый файл ![]() |
Сообщ.
#143
,
|
|
|
Скинер, а помнишь, я тебе как-то давал свою реализацию HotKey контрола? Можешь её прикрепить, т.к. мои исходники канули в лету с винтом старым.
![]() |
Сообщ.
#144
,
|
|
|
Если подключить в форму программы какой-нибудь контрол-элемент ActiveX, то возможен такой вариант, что при каждом запуске микрик будет выдавать MessageBox примерно следующего содержания:
This application is about to initialize ActiveX Controls that might be unsafe. If you trust the source of this document, select Yes and ... и т.д. и т.п. Скажу честно, это просто достает... Нашел выход: надо добавить в реестр HKEY_CURRENT_USERSoftwareMicrosoftVBASecurity значение DWORD параметра LoadControlsInForms = 1 тогда это сообщение перестает появляться Код: Сообщения были разделены в тему "Flood" |