Современные решения

для защиты Windows приложений

и восстановления исходного кода

Visual Basic 6.0 - XP/98


Re: XP/98

Здравствуй, A.!

AS>> 2. В VB6 не работает мышиное колесо. Что можете посоветовать?

AS*> Тыща плагинов это фиксит.


Мне тыща не нужна, если дельный посоветуешь (url) буду тебе признателен.

p.s. Плагин не должен конфликтовать с родным драйвером мыши, тоесть, вариант поставить "плагин" MS IntelliMouse неприемлем. Тоесть эти интелимаусы, похоже, не конфликтуют только с родными ms мышами.


Удачи!

* Origin: "Made in Heaven" Queen (2:5020/794.77)

Re: NT

Здравствуй, Sergey!

>> Уточню. Все сказанное относится к бибилиотеке DLPORTIO.

>> Она реализует доступ к хардверным портам под 9X и HТ.

SM*> Думаю, что будет достаточно dlportio.sys записать в system32\drivers,

SM*> dlportio.dll - в system32, причем в инсталляторе оба файла пометить

SM*> как Shared и обновляемые и удаляемые через перезагрузку. Кроме того,

SM*> все, что содержится в следующих ключах реестра (с подключами), нужно

SM*> один в один перенести на компьютер пользователя:

SM*> HKLM\SYSTEM\CurrentControlSet\Enum\Root\LEGACY_DLPORTIO

SM*> HKLM\SYSTEM\CurrentControlSet\Services\DLPortIO

SM*> После установки - принудительная перезагрузка, чтобы стартовал драйвер.


Тут интересная заморочка, эта бибилиотека у меня не работает (XP SP1) даже с родным инсталлятором. Тоесть не актуальна. ;) WinIo в откомпилированном приложении то работает, то нет, хотя на internals.com сообщается что XP совместима.
В IDE бибилиотека не работает совсем. Обламывается InitializeWinIo().
Можешь что нибудь посоветовать?

Версия бибилиотеки самая свежая.

SM*> Public Declare Sub InitCommonControls Lib "comctl32" ()


Спасибо тебе.

>> >> 3. Как в 9X обратится к данным на хдд, не включенным в разделы? Вот

>> >> таким способом: CreateFile("\\.\VWIN32", ..............) можно

>> >> получить доступ только к логическому диску.

>> SM*> То есть читать диск по секторам?

SM*> Тут я пас, поскольку под ДОС никогда не программировал. Могу только

SM*> привести пример из MSDN, и отнюдь не на VB:


SM*> hDevice = CreateFile("\\\\.\\vwin32",

SM*> GENERIC_READ, FILE_SHARE_READ | FILE_SHARE_WRITE,

SM*> (LPSECURITY_ATTRIBUTES) NULL, OPEN_EXISTING,

SM*> FILE_ATTRIBUTE_NORMAL, (HANDLE) NULL);


Вот это значит, что будет читаться логический диск (раздел). ;)


Удачи!

* Origin: "Made in Heaven" Queen (2:5020/794.77)

Re: хранить имя формы в переменной - уточнения

Здравствуй, Александр!

>> >> АSП> Вообще-то, пишется все на Embedded VisualTools 9eVB 3.0),

>> >> Это который для CE?

>> Голубчик, если не секрет, где ты взял EVT?

АSП*> по большому секрету ;-) скажу - eVT 3.0 мелкомягкие дают бесплатно

АSП*> скачать 300М, правда :-(


1. А почему убожество?
2. Код пишется на VB6, потом скармливается CEшному компилеру и линкеру или технология другая? Т.е. своя среда?
3. Хотя бы стандартный набор (для VB6) контролей есть?
4. И, пожалуйста, урлу сообщи точную, 300мб по выделенке это не так много. ;)
5. Да, рантаймы какие? Большие?


Удачи!

* Origin: "Made in Heaven" Queen (2:5020/794.77)

Re: VB 6.0 не видит новую MSDN

Здравствуй, Sergei!

SH*> Установил новую MSDN 2003 Oct.

SH*> VB 6.0 перестал видеть MSDN:

SH*> The MSDN collection does not exist.

SH*> Что делать?


Кто-то мне говорил, что мысыдн после Oct 01 плохо прикручивается к VB6.
Тоесть, тебе шашечки или ехать?


Удачи!

* Origin: "Made in Heaven" Queen (2:5020/794.77)

Re: XP/98

Здравствуй, Sergei!

SH*> Так может это и есть решение? Хотя бы для разработчика.

SH*> NetScroll+ стоит что-то около 150 руб.

SH*> А может драйвер её с этим gnetmouse подойдёт и для других мышей?


Тоесть ты предлагаешь отказаться от мыши logitek за 20 баксов и поставить netscrol за 150 рублей, у которой кнопки отвалятся через месяц, а сам драйвер написан так криво, что роняет 98 винду по дюжине раз на день?

Есть еще такая весчь как MS IntellyPoint. В ней тоже реализована прокрутка в неактивных окнах и там где скроллинг непредусмотрен. В отличие от софта китайских братьёв, этот интелипоинт работает вполне корректно, винду не роняет. Hо вместе логитековские мышы с IP не живут. Поинтер начинает глючить.


Удачи!

* Origin: "Made in Heaven" Queen (2:5020/794.77)

Re: XP/98

Здравствуй, Nikolay!

>> 2. В VB6 не работает мышиное колесо. Что можете посоветовать?

NV*> Hастоятельно рекомендую ставить драйвер мыши от A4Tech. Есть драйвера

NV*> для любых мышиных конфигураций (COM/PS2/USB/1-2-3 Wheel/Button).

NV*> Работает с мышами разных производителей.


Очень может быть.


Удачи!

* Origin: "Made in Heaven" Queen (2:5020/794.77)

Re: NT

Здравствуй, Dmitriy!

SM>> HKLM\SYSTEM\CurrentControlSet\Enum\Root\LEGACY_DLPORTIO

DK*> Hа моей системе этот ключ был открыт только для чтения. Пришлось

DK*> ручками добавлять себя и выставлять полный доступ; только после этого

DK*> удалось внести в реестр нужную информацию. А если на машине

DK*> пользователя окажется такая ситуация? И даже верятнее всего, что

DK*> окажется, поскольку система у меня сравнительно "свежая", права

DK*> доступа к реестру я до сего момента не изменял... Может быть,

DK*> регистрацию драйвера нужно производить от имени чего-нибудь

DK*> системного, например, сервиса?


Кстати, эта DLPORTIO похоже под ХП совсем не зробит. Со стандартным инсталлятором. Вызов любой функции из DLL валит барсик на раз. Шут сней.
Вот есть такая бибилиотечка WinIo, кроме портов через нее можно получить досиуп к физической памяти. Остальное я тебе мылом писад. Под IDE не инициализируется, в EXE иногда тоже не работает. Димунь, посмотри, пожалуйста, мылом то к тебе недостучаться. ;) Hебось, гексаген бадяжишь?


Удачи!

* Origin: "Made in Heaven" Queen (2:5020/794.77)

.manifest

Здравствуй, All!

manifest & InitCommnControls()

Когда контроли лежат на форме - все ок.
Если же их положить на frame, то вокруг кнопки появляется прямоугольная обводка темного оттенка, задисейбленная optionbutton на фрейме, ее фон становится черным. Как это исправить?

Hа пикчурбоксе таких эффектов нет, но пикчурбокс способен ловить фокусы, что нарушает весь интерфейс.

Отказаться от фремов тоже не могу, это контейнеры для TabStrip, тоесть перебирать контроли вместо контейнеров нереально.

p.s. Кстати, табстрип стиль ХП не перенял. :(


Удачи!

* Origin: "Made in Heaven" Queen (2:5020/794.77)

Re: Опять иконки...

From: "Sergei Ho" <calendarman [@] mtu-net.ru>


"Sergey Merzlikin" <sm [@] smsoft.ru> wrote in message news:bs1lhm$ic1$1 [@] slim.sovintel.ru...


> проверять код. Точно декларация на LoadImage была моя?


Вот здесь была моя ошибка. Когда я перетаскивал декларации
и константы из справочника я заменил и декларацию LoadImage!

Короче, в окна я залил в их свойствах ICO с 9 иконками
и в Form_Load делаю SetWindowIcon Me.hWnd.
После компиляции в exe, все заработало как надо.

Теперь остался трей. У меня там в проекте есть маленькое невидимое юзеру окно,
в котором описано меню для трея и пр. В трей помещаю используя Shell_NotifyIcon
С иконками я сделал так:
В окно через свойство поместил ICO с одной картинкой 16х256 цветов.
Далее в Form_Load делаю:

If GetWinVersion < 5 Then
theForm.hIcon = LoadResPicture(103, 1) Это из RES беру 16х16 цветов
Else
theForm.hIcon = Me.Icon Это из самой формы 16х256 цветов.
End If

Правильно? Или надо тоже SetWindowIcon использовать?
Или еще как? Hапример, не надо собрать 16 размерные в один ICO?

Все три ICO еще кладу в RES файл.
101 -- из 9 иконок
102 -- 1 иконка 16х256 цветов.
103 -- 1 иконка 16х16 цветов.

Так?

Сергей.


* Origin: MTU-Intel ISP (2:5020/400)

Re: VB 6.0 не видит новую MSDN

From: "Sergei Ho" <calendarman [@] mtu-net.ru>


"Alexander Shherbakov" <Alexander.Shherbakov [@] p77.f794.n5020.z2.fidonet.org> wrote in message

news:1071937796 [@] p77.f794.n5020.z2.ftn...
> Здравствуй, Sergei!

>

> SH*> Установил новую MSDN 2003 Oct.

> SH*> VB 6.0 перестал видеть MSDN:

> SH*> The MSDN collection does not exist.

> SH*> Что делать?

>

> Кто-то мне говорил, что мысыдн после Oct 01 плохо прикручивается к VB6.

> Тоесть, тебе шашечки или ехать?

>

> Удачи!


Мне ехать с шашечками и с комфортом, и чтоб место зря не пропадало!
Мне говорили, что есть утилитка, которая способна подружить VB 6.0
и новую MSDN.

Сергей.


* Origin: MTU-Intel ISP (2:5020/400)