Техническая поддержка :

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

для защиты Windows программ

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

Обсуждение программирования на Visual Basic в конференции ru.visual.basic


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

From: "Sergey Broudkov"

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"

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

AS>> Какую именно - то, что для объекта типа Object не выводится список
AS>> свойств и методов? Смешно.
IK> И чего здесь смешного?
То, что это невозможно, да и не нужно. Тип Object (IDispatch) специально
придумали для того случая, когда набор методов и свойств заранее не известен.

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

* Origin: FidoNet Online (2:5020/175.2)


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

From: "Sergey Broudkov"

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"

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


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


Re: mp3

From: Alexander Asyabrik

Привет, 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> Затем к примеру так:

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

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

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


--
Alexander



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


Окошко About

From: "A. Skrobov"

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

AA>> Можно мне тоже субж на мыло alexandr(a)1c.perm.ru
AS> Я послал на vbrussian.com, когда там выложат, скачать смогут все.
Всё, выложили. Кому интересно, пользуйтесь.

* Origin: FidoNet Online (2:5020/175.2)


обработка метода post

Как поживаете, Roman ?

Мои бортовые системы запеленговали, что в Воскресенье Март 28 2004 23:03, Roman Yuakovlev писал All:

RY> Как реализовать на visual basic обработку метода post от браузеров
RY> (хотя можно и get).

RY> т.е. есть .html

RY>


RY> Как поймать командные параметры, и в какой поток, и самое главное как,
RY> перенаправлять вывод?

Вот кусок.

Attribute VB_Name = "Module1"
Option Explicit

Declare Function GetStdHandle Lib "kernel32" (ByVal nStdHandle As Long) As Long
Declare Function ReadFile Lib "kernel32" (ByVal hFile As Long, lpBuffer As _ Any, ByVal nNumberOfBytesToRead As Long, lpNumberOfBytesRead As Long, _
lpOverlapped As Any) As Long
Declare Function GetEnvironmentVariable Lib "kernel32" Alias "GetEnvironmentVariableA" _
(ByVal bsName As String, ByVal buff As String, ByVal ch As Long) As Long

Const STD_OUTPUT_HANDLE = -11&
Const STD_INPUT_HANDLE = -10&

Sub Main()
Dim lReadBytes As Long
Dim lStdInHandle As Long
Dim strBuffer As String
Dim nByte As Integer, strOut As String
Dim postData As String
On Error GoTo ErrLog

'чтение входных данных
lStdInHandle = GetStdHandle(STD_INPUT_HANDLE)
nByte = 1024
Do
strBuffer = String(nByte, 0)
lReadBytes = nByte
If ReadFile(lStdInHandle, ByVal strBuffer, Len(strBuffer), lReadBytes, ByVal 0&) Then
postData = postData & Left(strBuffer, lReadBytes)
If lReadBytes < nByte Then Exit Do
Else
Exit Do
End If
Loop

'В строке postData будет то, что тебе передали.
'Дальше парсишь и все.

'Потом формируешь ответ:

strOut = "Content-Type: text/html" & vbCrLf & vbCrLf & _
"
Тыр - пыр


Send strOut

End Sub

Sub Send(ByVal sOut As String)
Dim lReturn As Long
WriteFile GetStdHandle(STD_OUTPUT_HANDLE), ByVal sOut, Len(sOut), lReturn, 0
End Sub

За пример отдельное спасибо Мастеру.

C уважением, Андрей.
* Origin: Лепота! Лепота! (2:5023/11.81)


Re: обработка метода post

From: "Igor Evgrafov"

Hello, Roman! You wrote to All on Sun, 28 Mar 2004 22:03:31 +0400:

RY> Как реализовать на visual basic обработку метода post от браузеров
RY> (хотя можно и get).

RY> т.е. есть .html

RY>

RY> Как поймать командные параметры, и в какой поток, и самое главное как,
RY> перенаправлять вывод?

А почему бы тебе не сделать asp или aspx страничку? И post тебе будет и get и параметры и все что хочешь...

With best regards, Igor Evgrafov. E-mail: ievgrafosystems21{DOT}ru
* Origin: Cronyx Plus ISP (2:5020/400)


Search and Replace

H!, _[Alexander]_!
AA> Если использовать массив, а не стpоку для содеpжимого файла, что
AA> более pекомендуется, то еще будут некотоpые небольшие изменения.
Спасибо.

g'bye and g'luck, _[Alexander]_!
* Origin: Down/Upload Soft - [SVALKA.TK] (2:5054/29.33)



Назад Содержание Вперед




Главная     Программы     Статьи     Разное     Форум     Контакты