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

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

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

Visual Basic 6.0 - А как засунуть программу туды к часикам


А как засунуть программу туды к часикам

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

Под Win9X form_mousedown, ловящая ивенты на иконке в трее, содержит Y=0, а значение X приведенное к (X and &HFF)/Screen.TwipsPerPixelX содержит тип ивента.

Под ХП, думаю и под 2К тоже, X и Y содержат отличные значения от вышеприведенных. Как из X/Y извлечь сведения об ивенте? Или это возможно только через сабклассинг формы?


Удачи!

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

NEW BUTTON

From: "A. Skrobov" <tyomitch [@] r66.ru>


Mon Jan 26 2004 11:48, Glue wrote to (|11:

G> MATRESHKA]-+* Как программно создать на форме сабж?

G> Так же как с формой ведь не получается, т.к. имхо нет такого типа данных

G> как "button" (в vb6 по крайней мере).

Hу как же нет?

Class CommandButton
Member of VB
Looks like a push button and is used to begin, interrupt, or end a
process.

* Origin: FidoNet Online - http://www.fido-online.com (2:5020/175.2)

Работать с контpолом чеpез интеpфейс

Пpивет, All!

Такая ситуация, есть несколько самодельных контpолов с похожим поведением
(ячейки таблицы), они имплементиpуют общий интеpфейс (ICell), подскажите, это в
пpинципе невозможно обpатится к этим контpолам (как объектам) чеpез интеpфейс
или я что-то делаю не так?
Вот таким, пpиблизительно, обpазом:

В коде контpола:
Implements ICell

В вызывающем коде:

Dim objCell as ICell
set objCell = ctlCell(0) 'ctlCell - массив моих контpолов

И тут получаю ошибку - Type mismatch. Рылся в МСДH, пока ответа не нашел.

With best regards.

Vadim Nikiforov
AKA VadJuNik AKA MacManyak
e-mail: macmaniak [@] narod.ru ICQ 53282936
* Origin: Macmaniak's home (2:5060/90.21)

Работать с контpолом чеpез интеpфейс

From: "A. Skrobov" <tyomitch [@] r66.ru>


Sun Jan 25 2004 19:46, Vadim Nikiforov wrote to All:

VN> В коде контpола:

VN> Implements ICell

VN> В вызывающем коде:

VN> Dim objCell as ICell

VN> set objCell = ctlCell(0) 'ctlCell - массив моих контpолов

Set objCell = ctlCell(0).Object

VN> И тут получаю ошибку - Type mismatch. Рылся в МСДH, пока ответа не нашел.

Помогло?

* Origin: FidoNet Online - http://www.fido-online.com (2:5020/175.2)

VB.NET пpогpаммисты

* Hi, Pasha!

PO> этот термин, приведя соотв. примеры? Лично я имею дело с .NET и VB

PO> .NET в частности более 1.5 лет (правда, в силу ряда соображений я

PO> примерно месяц назад полностью мигрировал в VC# .NET).


Если на одной машине (Win2000 SP6) ставить .net студию рядом с обычной VS6.0, проблем не будет? А то слышал, что как-то плохо они между собой уживаются.

* С уважением, Vitaly
* Origin: Vitaly [@] work (2:5053/40.42)

/VB6/ Hе могу загрузить OCX

From: "Stas Lazarev" <crus [@] amm-group.ru>


Hello, Mike!
You wrote to Vitaly Bogomolov on Fri, 23 Jan 2004 15:51:09 +0000 (UTC):

M> Кстати, проблему уже решили, причем оригинальным способом. OCX,

M> откомпилированный на _другой_ машине, не подключается к проекту на моей.

M> Hо оказалось, что OCX, откомпилированный таким же макаром из тех же

M> исходников на _моей_ машине, подключается к проекту на обеих машинах.

M> Т.е. теперь все работает нормально. Почему, никто не знает. Загадки

M> египетских фараонов, етить.


Чистите реестр почаще и получше. И желательно всегда компилируйте все проекты на одной
машине и выкладывайте компоненты в SS с нее.
Возможно у вас в реестре ссылки на разные несовместимые версии каких-то компонент,
причем на другой машине версия выше, чем на твоей, поэтому у тебя не работает.

--
With best regards, Stas Lazarev.


* Origin: OOO BIS (2:5020/400)

Share/Unshare data в ActiveX Dll

From: "Stas Lazarev" <crus [@] amm-group.ru>


Hello, Dmitry!
You wrote to A. Skrobov on Sat, 24 Jan 2004 13:39:09 +0000 (UTC):

DM> Saturday, January 24, 2004, 7:52:31 PM, ты писал:

AS>> MS Word - это ActiveX EXE, и противоречия со сказанным мной нет.

DM> А кто то сказал что здесь противоречие? :)


А чем не подходит ActiveX EXE?

--
With best regards, Stas Lazarev.


* Origin: OOO BIS (2:5020/400)

Re: можно ли в VB обрабатывать WAV файлы? и как?

From: Андрей Y <andreyz [@] matchem.kth.se>


Спасибо, но у меня сразу возникла уйма новых вопросов (ниже по
тексту). Большей частью из-за того, что с бинарными данными я работал
в последний раз лет 5 назад, да и то не в VB, а в LabVIEW - забыл все
почти. Была надежда что есть какой-нибудь контроль, который
представляет звук в виде массива или еще что-нибудь подобное, но
надежда, видимо глупая.

>> Имеется чертова уйма WAV фалов записанных программой на том же VB.

>> Hадо бы обработать их все по одному алгоритму. А точнее - просто

>> привести к одному уровню громкости.


DK> Все ниженаписанное относится к несжатым данным (формат PCM).


Тогда как отличить - сжатые они или нет? Т.к. файлы записаны с
микрофона программой на том же VB, вопрос, видимо, сводится к тому -
сжатые или несжатые WAV-файлы пишет VB?

DK> А приведение к единому уровню громкости сводится просто к умножению

DK> каждого байта/слова звуковых данных на коэффициен...


Я тоже думаю что нужно просто нормировать амплитуду в каждом файле. Hо
с этим можно будет поэкспериментировать взять амплитуду, среднюю
амплитуду или какую-нибудь их комбинацию.

DK> Данные вавки хранятся в виде последовательности байт или пар байт

DK> (зависит от

DK> битности файла - 8 или 16); в случае стерео сначала идет байт/слово

DK> для левого канала, потом для правого.


Сразу вопрос - а как распознать битность и моно это или стерео?
Впрочем - моно/стерео не очень волнует, т.к. алгоритм нормирования
будет одним и тем же.

DK> Обычно серединой (нулевым отклонением) считается

DK> 0x80 или 0x8000.


А вот это уже то, чего я или не помню или никогда не знал. Где можно
посмотреть кратенько что есть нулевое отклонение и зачем оно нужно?

DK> В самом начале файла хранится заголовок, и только потом

DK> начинаются данные.


Как он опознается программно? Фиксированная длина? Или ключи какие-то?

DK> К сожалению, я не знаю, как вычисляется смещение для

DK> данных - возможно даже, что оно постоянно. Проверь сам.


Эге. Опять та же ситуация с моими познаниями. Что есть смещение и для
чего оно нужно? И как его проверить?

Спасибо.

PS Если будет желание просто ткнуть меня носом в хелп, то тогда,
пожалуйста, с учетом что все хелпы у меня английские - т.е. русские
ключи я просто не могу найти поиском.

--
Объяснение принципов помогает думать. Примеры учат обезьянничать.
Если надумаете е-мылить - лучше andreyz2000#hotmail com


* Origin: Talk.ru (2:5020/400)

Re: EventClassModule

Так что, с subj-ем никто ничего не подскажет?
:(
- ---
Igor


* Origin: PIB GU (2:465/110)

NEW BUTTON

/Кто здесь самый главный анархист, (+11?/
*-------------------------------------------------------[tRUe MATRESHKA]-¬*
Как программно создать на форме сабж?
Так же как с формой ведь не получается, т.к. имхо нет такого типа данных как "button" (в vb6 по крайней мере).
*L------------------------------------------------------¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦¦--*
/Хватит! Уходите прочь, мы играем для себя!../ *¦2¦5020¦12000¦55¦*
* Origin: Программа вызвала сбой в памяти по адресу (2:5020/12000.55)