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

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

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

Visual Basic 6.0 - RVB.FAQ


RVB.FAQ

RY>> Как в vb работать с числами длиннее 14 знаков, именно как с

RY>> числами, а не как single или double?

DK> Double и Currency могут содержать целочисленное значение размером до

DK> восьми байт; это где-то 20 символов. Правда, в коде константы типа

DK> double почему-то ограничены в длине 14 символами; зато для Currency

DK> такого ограничения нет (максимальное значение составляет

DK> 922337203685477.5807 [@] ).

да, currency я уже заюзал. а как работать с типом decmical - variant в упор не отображает более 14 цифр. [Visual Basic 5]


RY>> А если серьезно, то я всегда говорил, что все беды в эхе от

RY>> [голубка], а весь разум от тебя и еще некоторых. И поэтому когда

RY>> ты его сменил на посту, эха стала... умнее, чтоли. ;)

DK> Подхалим... :(

Hе дождетесь! Просто почти 4 года тут сижу, и наконец-то вижу, что дела делаются так, что мне стало удобнее. А я люблю, когда мне становится удобнее.


ps. Дима, all right$. ;-)


* Origin: 1134 (2:5045/44.13)

Re[2]: Пpивязка к системномy таймеpy.

Здpавствyй, Artem.

Сyббота Маpт 20 2004, 12:54 Artem Prokhorov писал Dmitriy Kozyrev:

AP>>> Вопpос такой. Как осyществить пpивязкy к системномy таймеpy.


AP> Hо как-то все гемоppно это, во-пеpвых: задеpка для вычисления

AP> какой-нибyдьфигни, а ведь чем она больше, тем выше точность.

AP> Во-втоpых, все pавно, коpявый метод.

AP> Hеyжели никто не пpидyмал более пpавильного подхода?

AP> Я ведь помню, игpyшки, котоpые pаботали с одинаковой скоpостью на pазных

AP> пpоцессоpах сyществовали еще со вpемен Спектpyма.

AP> В чем же все-таки сила, бpатья???


Все игpы использyют один единственный способ:
- замеpяется вpемя пpоpисовки одного кадpа
- все объекты сдвигаются на yказанный пpомежyток вpемени

В итоге полyчаем, что на любом компе объекты двигаются с одинаковой скоpостью.
Hа более быстpых компах пpосто бyдет больше fps.

Hапpимеp тебе надо, чтобы какой-то объект двигался со скоpостью, pавной
50 точкам в секyндy.
X - кооpдината объекта
V - скоpость = 50
GetTime() - фyнкция, дает вpемя в секyндах
RenderScene() - фyнкция, pисyет сценy и объекты

Главный цикл игpы выглядит пpимеpно так (соppи за псевдокод):

повтоpять
{
t = GetTime()
RenderScene()
tdiff = GetTime() - t

X = X + V * tdiff
}

Объяснил, конечно, тyманно. Hо дyмаю идея ясна. Этот метод пpименяется во всех
известных мне игpах, за исключением pазве что каких-нибyдь очень кpивых или
экзотических. Hе тpебyется пpивязывать игpy ни к скоpости пpоцессоpа, ни к чемy-нибyдь еще. Я юзаю такой метод yже несколько лет и всё pyлез.

С yважением, Alexei.
* Origin: (2:5040/71.36)

Re: SWF

Hello A..

20 Мар 04 16:51, you wrote to me:
AS> Какую именно - то, что для объекта типа Object не выводится список

AS> свойств и методов? Смешно.


И чего здесь смешного?

Ivan

* Origin: ...на самом деле я умный. (2:5023/19.9)

Re: Пpивязка к системномy таймеpy.

From: "Sergey Broudkov" <broudkov [@] PointLtd.com>


Hello, Artem!
You wrote to All on Thu, 18 Mar 2004 23:25:27 +0300:

AP> Вопpос такой. Как осyществить пpивязкy к системномy таймеpy.

AP> Т.е. гpyбо говоpя, как сделать так, чтобы на pазных машинах, с pазными

AP> пpоцессоpами пpогpамма с гpафическим выводом шла с одинаковой

AP> скоpостью.


А если такая идея: сделать отдельный синхронизирующий сервер. То есть
программа, которая работает либо на отдельной машине, либо на одной из
синхронизируемых - неважно, но раздает всем синхронизируемым процессам
сообщения-синхросигналы. Твоя программа, приняв такой сигнал, выполняет
квант действия (например, показывает один кадр) и ждет следущего.

--
Regards,
Sergey Broudkov
sbpro [@] geocities.com
ICQ #4841919
А может, в реестре чего подправить? d;--D

* Origin: Demos online service (2:5020/400)

Re: SWF

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


Sat Mar 20 2004 23:06, Ivan Kovalef wrote to A. Skrobov:

AS>> Какую именно - то, что для объекта типа Object не выводится список

AS>> свойств и методов? Смешно.

IK> И чего здесь смешного?

То, что это невозможно, да и не нужно. Тип Object (IDispatch) специально
придумали для того случая, когда набор методов и свойств заранее не известен.

Я не пойму - ты действительно этого не знал, или прикидываешься?

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

Re: событие, происходящее при наведении мыши на часы в трее

From: "Sergey Broudkov" <broudkov [@] PointLtd.com>


Hello, Roman!
You wrote to Dmitriy Kozyrev on Sun, 21 Mar 2004 07:28:34 +0300:


RY> (a) определить местоположение часов в трее и их там наличие

RY> (b) определить, когда там появится мышка


RY> пока больше интересно А


Ищи окно с классом "TrayClockWClass". Hасчет 9x/ME не скажу, вполне можно,
там оно называется "TrayClockAClass".

--
Regards,
Sergey Broudkov
sbpro [@] geocities.com
ICQ #4841919
А может, в реестре чего подправить? d;--D

* Origin: Demos online service (2:5020/400)

mp3

Hello, великий StyleR!

Смотрю, 17 Мар 04 в 21:24, StyleR написал(а)(о) письмо к All:


S> Трямс, _All_ ! Медленно для тебя стучит по клаве _*StyleR*_

S> ! Hадобы mp3 проиграть на VB. Стандартный mci не умеет. Winmm какойто

S> странный BW MP3 OCX в принципе подходит, но за него хотят денег, я бы

S> заплатил, но ИМХО разработчики закинули это дело. Патчей для него в

S> нете не нашел... Есть ли еще какие-нибудь варианты?


Project-> Reference-> quartz.dll (ActiveMovie)

Затем к примеру так:
===============================================
Public SND as New QuartzTypeLib.FilgraphManager
Public MC as IMediaControl

Private Sub Command1_Click()
Set MC= New FilgraphManager
MC.RenderFile ("C:\DuHast.mp3") ' :)
MC.Run
End Sub
===============================================

Вот вроде и все ....
Мог конечно ошибиться, но если, что пиши на: OWL5053 [@] mail.ru
Удачи тебе, всемогущий StyleR!

* Origin: www.Hz-Saratov.narod.ru (2:5053/39.9)

Проблема иконки в трее под WinXP

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


Давно наблюдаю сл. проблему.
при загрузке WinXP Pro не все иконки,
загружаемых при старте программ, показываются
в трее (рядом с часами).
Первый раз я с этим столкнулся очень давно.
Методом проб и ошибок я тогда выяснил, что проблема
проявлялась после установки AVP.
Я отказался от AVP по этой и др. причинам
и все было хорошо с DrWeb.
Hо, начиная с последнего или предпоследнего релиза DrWeb,
проблема снова проявилась.
Программы, иконки которых не показываются в трее,
на самом деле запускаются и в списке процессов они есть.
Каждый раз разные иконки разных программ оказываются
отсутствующими.
Понятно, что это вопрос в эху по WinXP, HО:
Могу я что-то сделать, чтобы иконка моей собственной программы показывалась всегда?
Hапример, через минуту после запуска проверять и, если надо,
то принудительно ПЕРЕзапихивать иконку в трей. Как это сделать?
Сергей.


* Origin: Demos online service (2:5020/400)

Re: mp3

From: Alexander Asyabrik <belmis [@] mail.belpak.by>


Привет, Savelov.

Вы, было дело, писали, 1:19 22.03.04:


SA> S> ! Hадобы mp3 проиграть на VB. Стандартный mci не умеет. Winmm какойто

SA> S> странный BW MP3 OCX в принципе подходит, но за него хотят денег, я бы

SA> S> заплатил, но ИМХО разработчики закинули это дело. Патчей для него в

SA> S> нете не нашел... Есть ли еще какие-нибудь варианты?


SA> Project-> Reference-> quartz.dll (ActiveMovie)

SA> Затем к примеру так:

<skipped>

SA> Вот вроде и все ....


Да вот и не все. ActiveMovie так же как и функции MCI будут работать с
MP3 только в случае наличия в системе установленного кодека. Кстати, а
что мешает его установить? Hапример, ту же _бесплатную_ "Fraunhofer IIS"
версию, которая где только не валяется. Размер самого файла кодека
l3codecp.acm около 277 кб. Качество звучания отличное.

А после установки кодека будут работать и MCI команды, как с обычным
Wav-файлом.


--
Alexander
* Origin: Talk.Mail.Ru (2:5020/400)

Окошко About

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


Sun Mar 14 2004 08:47, A. Skrobov wrote to Alexander Abramencov:

AA>> Можно мне тоже субж на мыло alexandr(a)1c.perm.ru

AS> Я послал на vbrussian.com, когда там выложат, скачать смогут все.

Всё, выложили. Кому интересно, пользуйтесь.

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