Vb - Форум программистов и сисадминов Киберфорум

Запись от The trick размещена 26.12.2015 в 22:43

Показов 5073 Комментарии 4

Метки vb

Всем привет!
Сегодня я хотел бы поговорить о криптографии. Я сделал пример использования специальной криптографии - стеганографии. Этот метод скрывает сам факт шифрования данных. Существует множество видов стеганографии. Я бы хотел поговорить о LBS-методе, в котором...

The trick

Модератор

DirectSound в VB6.

Запись от The trick размещена 27.07.2015 в 13:46

Показов 3893 Комментарии 1

Метки vb

Параллельно с Direct3D9 я делал библиотеку типов и модуль с вспомогательными функциями для DirectSound. В архиве библиотека типов dsvb.tlb и модуль DS_Functions.bas. В дальнейшем добавлю модуль класса для поддержки асинхронных уведомлений, пока можно пользоваться этим.
В модуле DS_Functions содержатся следующие функции:

DSCreateSoundBufferFromFile - создает объект с интерфейсом IDirectSoundBuffer8 из файла. Поддерживаются только WAVE и MP3 файлы. MP3 файлы

...

The trick

Модератор

Direct3D9 в VB6

Запись от The trick размещена 27.07.2015 в 13:42

Показов 6656 Комментарии 0

Метки direct3d, vb

Всем привет.
Уже довольно давно занимаюсь созданием библиотеки типов Direct3D9 и вспомогательных функций D3DX для VB6.
Итак в архиве содержится библиотека типов "DirectX 9 for Visual Basic 6.0 type library by The trick" (dx9vb.tlb) содержащая описание следующих интерфейсов:

IDirect3D9;
IDirect3DDevice9;
IDirect3DSurface9;
IDirect3DResource9;
IDirect3DSwapChain9;
IDirect3DTexture9;
IDirect3DBaseTexture9;
IDirect3DVolumeTexture9;
IDirect3DVolume9;
IDirect3DCubeTexture9;
IDirect3DVertexBuffer9;
IDirect3DIndexBuffer9;
IDirect3DStateBlock9;
IDirect3DVertexDeclaration9;
IDirect3DVertexShader9;
IDirect3DPixelShader9;
IDirect3DQuery9;

...

The trick

Модератор

Использование COM/ActiveX библиотек без регистрации в реестре.

Запись от The trick размещена 25.05.2015 в 22:15

Показов 6374 Комментарии 5

Метки activex, com, vb

Привет всем. Выкладываю модуль для работы с COM-Dll без регистрации в реестре.
Модуль имеет несколько функций:

GetAllCoclasses - возвращает список имен классов вместе с идентификаторами извлеченными из библиотеки типов.
CreateIDispatch - создает реализацию IDispatch на основе объекта и имени интерфейса.
CreateObjectEx2 - создает объект по имени.
CreateObjectEx - создает объект по CLSID.
UnloadLibrary - Выгружает библиотеку, если та не используется.

Visual Basic
1
' The module modTrickUnregCOM.bas

...

The trick

Модератор

Класс - MP3 проигрыватель из памяти.

Запись от The trick размещена 26.04.2015 в 22:10

Показов 5483 Комментарии 2

Метки vb

Всем привет. Я разработал класс для асинхронного воспроизведения MP3 файлов в памяти. Например это может пригодится для воспроизведения фоновой музыки из ресурсов или из сети минуя запись в файл. Воспроизводить можно несколько файлов одновременно, но некоторые параметры воспроизведения...

The trick

Модератор

Многопоточность в VB6 часть 4 - многопоточность в Standart EXE.

Запись от The trick размещена 17.02.2015 в 01:07

Показов 8459 Комментарии 1

Метки multithreading, vb

Всем привет. Сейчас у меня мало времени, поэтому я уже не так часто уделяю внимание бейсику и реже появляюсь на форумах. Сегодня я опять буду говорить о многопоточности, на этот раз в Standart EXE. Сразу скажу что все о чем я пишу является моим личным исследованием и может в чем-то не соответствовать действительности; также из-за моего недостатка...

The trick

Модератор

3D елка на рабочий стол

Запись от The trick размещена 04.01.2015 в 16:33

Показов 8316 Комментарии 15

Метки new year, vb

Я как-то уже делал такую, но в этот раз я добавил возможность регулировки параметров создания.
Для работы нужна dx8vb.dll (внутри архива, положить в папку с программой). Выход по двойному клику. С новым годом!

10.02.2015 - исправлена ошибка начального положения окна.

The trick

Модератор

Вокодер на VB6 часть 2

Запись от The trick размещена 01.12.2014 в 19:09

Показов 4116 Комментарии 0

Метки vb

Первая часть.
Итак, исходный сигнал и модулирующий мы имеем. Теперь следующим этапом является фильтрация. Можно пойти несколькими путями: использовать банк фильтров (БИХ, КИХ), либо использовать БПФ (FFT, быстрое преобразование Фурье) или Вейвлет-преобразование. Для своей задачи...

The trick

Модератор

Вокодер на VB6 часть 1

Запись от The trick размещена 01.12.2014 в 19:08

Показов 5013 Комментарии 0

Метки vb

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

The trick

Модератор

Драйвер на VB6

Запись от The trick размещена 15.11.2014 в 21:59

Показов 8449 Комментарии 4

Метки driver, vb

Всем привет. Появилось время и решил написать что-то необычное на VB6, а именно попытаться написать драйвер. Сразу скажу до этого я никогда не писал драйвера и не имею никакого опыта программирования в режиме ядра. Драйвер, по моим задумкам, должен будет читать память недоступную в пользовательском режиме, а именно в диапазоне 0x80000000 - 0xffffffff (в режиме по-умолчанию, без IMAGE_FILE_LARGE_ADDRESS_AWARE). Сразу приведу исходный код драйвера который получился:

Visual Basic
1
' modTrickMemReader.bas

...

The trick

Модератор

Хеш - таблица VB6

Запись от The trick размещена 08.11.2014 в 03:43

Показов 8546 Комментарии 5

Метки hash, vb

Как-то я уже делал реализацию простой хеш-таблицы для демонстрации использования IEnumVariant интерфейса для перечисления в цикле For Each. Представляю автономный класс реализующий хеш-таблицу, который во многих случаях может стать заменой словаря (Dictionary) из Scripting runtime. Реализованы все те же методы что и у словаря, а также добавлены новые.
Включена поддержка перечисления через For Each, также можно задавать режим перечисления ключи/значения,...

The trick

Модератор

Многопоточность в VB6 часть 3 - внедрение в чужой процесс.

Запись от The trick размещена 12.10.2014 в 14:03

Показов 6521 Комментарии 0

Метки injection, multithreading, vb

В прошлой части я написал о возможности создания потока в DLL, и о методе создания нативной DLL на VB6. Также я написал о том, что такая DLL будет работать в любом приложении, но примера не привел. В этой части мы напишем DLL которая будет выполняться в чужом 32-разрядном процессе...

The trick

Модератор

Многопоточность в VB6 часть 2 - создание Native DLL и вызов экспортируемой функции в другом потоке.

Запись от The trick размещена 11.10.2014 в 23:13

Показов 8994 Комментарии 0

Метки multithreading, vb

Сегодня я расскажу о еще одном методе написания многопоточных программ на VB6, а именно создание потока в Native DLL. В принципе здесь нет ничего сложного, передаем в CreateThread адрес экспортируемой функции и она будет исполнена в другом потоке. Все бы хорошо, но стандартными, документированными возможностями VB6 не позволяет создавать нативные...

The trick

Модератор

Многопоточность в VB6 часть 1 - создание объекта в другом потоке и подписка на события.

Запись от The trick размещена 02.10.2014 в 18:07

Показов 10183 Комментарии 1

Метки multithreading, vb

Нажмите на изображение для увеличения
Название: Безымянный.png
Просмотров: 819
Размер: 6.8 Кб
ID: 2758

Многие интересуются вопросами многопоточности программ, написанных на VB6. Писать многопоточные программы на VB6 вполне реально, у меня есть множество примеров которые я также публиковал в своем блоге, но существуют ограничения, которые так или иначе можно обойти....

The trick

Модератор

DirectX слоеное окно

Запись от The trick размещена 28.09.2014 в 23:57

Показов 7331 Комментарии 15

Метки directx, vb

Нажмите на изображение для увеличения
Название: Безымянный.png
Просмотров: 886
Размер: 202.0 Кб
ID: 2744

По просьбе Pro_grammer'а написал пример слоеного Direct3D окна. В окне отображается 3D модель, используется мультитекстурирование, в качестве отражения используется интерактивный скриншот экрана. Используется DirectX8.
Для работы нужна библиотека dx8vb.dll. Вращение по оси Х - правой кнопкой.

Visual Basic
1
2
' Класс frmDXWindow - слоеное окно Direct3D
' © Кривоус Анатолий Анатольевич (The trick), 2014

...

The trick

Модератор

Смещения методов объектов.

Запись от The trick размещена 14.09.2014 в 02:20

Показов 3291 Комментарии 0

Метки vb

Здесь я буду публиковать смещения методов в VTABLE, для различных интерфейсов.
VB.Form (_Form)

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
&H48     Name_Get
&H50     Caption_Get
&H54     Caption_Set
&H58     hWnd_Get
&H60     BackColor_Get
&H64     BackColor_Set
&H68     ForeColor_Get
&H6C     ForeColor_Set
&H70     Left_Get
&H74     Left_Set
&H78     Top_Get
&H7C     Top_Set
&H80     Width_Get

...

The trick

Модератор

Класс для асинхронного ожидания объектов ядра

Запись от The trick размещена 07.09.2014 в 00:54

Показов 10457 Комментарии 4

Метки async, vb

ОПИСАНИЕ УСТАРЕЛО. АКТУАЛЬНОЕ ОПИСАНИЕ НА GITHUB.

Разработал класс для асинхронного ожидания объектов ядра. Класс генерирует событие при установке объекта в сигнальное состояние или при таймауте. Работает с любыми объектами.
Класс имеет 3 метода vbWaitForSingleObject, vbWaitForMultipleObjects, IsActive, Abort. Первые два аналогичны вызову одноименных API функций без префикса "vb" и запускают ожидание...

The trick

Модератор

TrickControls

Запись от The trick размещена 03.09.2014 в 04:54

Показов 9896 Комментарии 8

Метки vb

Всем привет.
Здесь я буду собирать библиотеку контролов (OCX) вместе с исходными кодами по мере свободного времени. Все контролы поддерживают юникод.
PS. Особо тестировать у меня времени нет, так что буду рад если кто-то будет сообщать о багах мне.

TrickButton

Контрол - кнопка. Поддерживает полупрозрачность а также 32 битные иконки.
В качестве темы используется картинка с 10 состояниям кнопки. Последовательность состояний следующая:

Нормальное

...

The trick

Модератор

Класс для сабклассинга окон и классов.

Запись от The trick размещена 16.06.2014 в 00:58

Показов 6090 Комментарии 7

Метки vb

ОПИСАНИЕ УСТАРЕЛО. АКТУАЛЬНОЕ ОПИСАНИЕ НА GITHUB.

Разработал класс с помощью которого можно работать с сабклассингом. Класс имеет событие WndProc, которое вызывается при получении окном сообщения. Также имеется возможность поставить сабклассинг на класс окон. Имеются методы...

The trick

Модератор

Library info 2

Запись от The trick размещена 01.06.2014 в 16:12

Показов 5734 Комментарии 2

Метки vb

Модификация вот этого кода. Теперь дополнительно можно просматривать импорт, отложенный импорт, экспорт. Также есть небольшие модификации относительно библиотеки типов (отображение событий, типов методов и др.). Планирую добавить еще просмотр аргументов функций и методов.
Модуль frmLibInfo.frm:

Visual Basic
1
2
3
4
Option Explicit
 
' Получение информации об импорте, экспорте и библиотеки типов
' © Кривоус Анатолий

...

The trick

Модератор

Использование ActiveX контролов без регистрации в реестре.

Запись от The trick размещена 31.05.2014 в 18:29

Показов 4431 Комментарии 0

Метки activex, vb

Разработал модуль с помощью которого можно работать с ActiveX контролами незарегистрированными в реестре, а также реализована поддержка событий. В нем содержится функция ControlsAdd (аналогия метода формы Controls.Add), с помощью которой можно добавлять контролы используя путь к библиотеке и CLSID контрола. Модуль особо не тестировался, поэтому что-то может не заработать, но...

The trick

Модератор

Модуль для перехвата функций на VB6

Запись от The trick размещена 31.05.2014 в 02:59

Показов 4822 Комментарии 0

Метки vb

Разработал простой модуль с помощью которого можно перехватывать STDCALL функции и методы COM объектов. Перехват реализован с помощью сплайсинга, никаких синхронизаций нет, так что в многопоточной программе могут возникнуть проблемы. Пользоваться нужно осторожно, т.к. любая ошибка...

The trick

Модератор

Использование ActiveX библиотек без регистрации в VB6

Запись от The trick размещена 30.05.2014 в 11:10

Показов 1746 Комментарии 0

Метки vb

Привет всем. Выкладываю модуль для работы с COM-Dll без регистрации в реестре.
Модуль имеет несколько функций:

GetAllCoclasses - возвращает список имен классов вместе с идентификаторами извлеченными из библиотеки типов.
CreateIDispatch - создает реализацию IDispatch на основе объекта и имени интерфейса.
CreateObjectEx2 - создает объект по имени.
CreateObjectEx - создает объект по CLSID.
UnloadLibrary - Выгружает библиотеку, если та не используется.

Visual Basic
1
' The module modTrickUnregCOM.bas

...

The trick

Модератор

Cалют

Запись от The trick размещена 23.05.2014 в 00:24

Показов 2777 Комментарии 0

Метки vb

Visual Basic
1
2
3
4
5
6
7
8
9
Option Explicit
 
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundW" (ByVal lpszName As Long, ByVal hModule As Long, ByVal dwFlags As Long) As Long
 
Private Const SND_ASYNC = &H1
Private Const pi = 3.14
 
Private Function Draw(v As Long, cc As Long) As Boolean
    Dim dh As Single, c As Single, d As Single, x As Single, y As Single, w As Long, i As Long, dx As Single, dy As Single,

...

The trick

Модератор

Модифицируем стандартный ListBox

Запись от The trick размещена 08.05.2014 в 02:47

Показов 10377 Комментарии 2

Метки vb

Сделал класс, с помощью которого можно модифицировать отрисовку стандартного списка. Он имеет событие Draw, которое вызывается когда нужно отриовать очередной элемент списка. Для работы, нужно установить у списка стиль Checked (флажки), и присвоить данный ListBox свойству clsTrickListBox.ListBox. Также можно изменять высоту элементов и отменять отрисовку.

Visual Basic
1
2
3
Option Explicit
 
' Класс clsTrickListBox.cls - для ручной отрисовки стандартного ListBox'а

...

The trick

Модератор

Работа с ITypeLib, ITypeInfo в VB6

Запись от The trick размещена 25.04.2014 в 03:48

Показов 5654 Комментарии 0

Метки vb

Накидал небольшой пример работы с ITypeLib, ITypeInfo для получения информации из библиотеки типов.

Visual Basic
1
2
3
4
5
6
7
8
Option Explicit
 
' Ðàáîòà ñ ITypeLib, ITypeInfo VB6
' © Êðèâîóñ Àíàòîëèé Àíàòîëüåâè÷ (The trick), 2014
 
Private Type OPENFILENAME
    lStructSize As Long
    hwndOwner As Long

...

The trick

Модератор

Работа с указателями в VB6

Запись от The trick размещена 18.04.2014 в 02:25

Показов 12796 Комментарии 8

Метки vb

Для начала нужные декларации

Visual Basic
1
2
Public Declare Function GetMem4 Lib "msvbvm60" (src As Any, Dst As Any) As Long
Public Declare Function ArrPtr Lib "msvbvm60" Alias "VarPtr" (src() As Any) As Long

Часто встречаются ситуации когда нужно получить данные имея только адрес (нампример в WndProc, HookProc). Обычно просто копируют данные через CopyMemory в структуру,...

The trick

Модератор

Исследование Dictionary

Запись от The trick размещена 14.04.2014 в 06:09

Показов 2582 Комментарии 0

Метки vb

https://www.cyberforum.ru/visu... ost6041629

The trick

Модератор

Круговой визуализатор спектра

Запись от The trick размещена 27.03.2014 в 03:30

Показов 5826 Комментарии 1

Метки vb

http://youtu.be/h9qteZBkwww

Представляю исходный код и скомпилированную программу графического визуализатора звукового спектра. Звук анализируется через стандартное устройство записи Windows, т.е. можно выбрать микрофон и просматривать спектр с него, либо выбрать стереомикшер...

The trick

Модератор

Получить информацию о используемой памяти процесса

Запись от The trick размещена 18.03.2014 в 14:11

Показов 5021 Комментарии 4

Метки vb

В примере можно узнать информацию о используемой памяти запущенными процессами.
Проект на GitHub.

The trick

Модератор

2 из 4

Всего блогов	1,223
Всего записей	7,243
Записи за последние сутки	2

Новые блоги и статьи Все статьи Все блоги /
Калькулятор для расчета родства russiannick 07.08.2026 1. Задача: Создать калькулятор для расчета родства. Родственных связей существует 8 ступеней, такие как: p - отец P - мать q - муж Q - жена b - брат B - сестра s - сын S - дочь	Мир по моей воле kumehtar 07.08.2026 Когда-то кажется, что всё просто. Ты весь такой светлый. Причиняешь добро. Борешься за справедливость в этом тёмном мире. Потом начинаешь замечать одну неприятную вещь. Почти каждый хороший. . .	Кредитный калькулятор Maks 05.08.2026 Решение задачи по прикладной информатике средствами 1С. Задача: Напишите приложение-калькулятор, которое помогает рассчитывать параметры кредита для аннуитетного и дифференцированного видов. . .	У нас сейчас поговорку "Опять 25" нужно переделать на "Опять +35". kumehtar 04.08.2026 С ностальгией вспоминаю времена моего детства, когда у нас и правда +25 - была максимальная температура летом. Раньше +25 °C реально казались вершиной жары, когда можно было весь день пропадать на. . .
Как ИИ начал спорить и врать (возможно почуяв опасность для себя от индустрии - уход от электроники). Hrethgir 04.08.2026 Недельный диалог, на фоне событий с НПЗ. Да, из спирта можно получать бензин, и это не сложно. Но потом в схеме я решил избавиться от насоса, при этом полностью сделав контроль подачи спирта в. . .	Термопринтер QR701 Argus19 03.08.2026 Термопринтер QR701 Купил два термопринтера QR701. На сэлф-тесте написано: Language: PC936 (GB18030). Что означает, что принтеры могут печатать только латиницу и китайские иероглифы. Так же. . .	Создание формы заимствованного документа Maks 03.08.2026 Задача: Необходимо создать собственную форму заимствованного документа. На форме должен быть реквизит "Покупатель", а также табличная часть со следующими реквизитами: - Расчетный счет покупателя. . .	Задача предоставления скидок покупателям Maks 03.08.2026 Задача: В документе "Продажи" необходимо реализовать функционал предоставления скидок покупателям. Скидка должна автоматически рассчитываться и подставляться в соответствующее поле при выборе. . .

Сообщение форума

Отменить изменения

Архив
< Август 2026
Вс	Пн	Вт	Ср	Чт	Пт	Сб
26	27	28	29	30	31	1
2	3	4	5	6	7	8
9	10	11	12	13	14	15
16	17	18	19	20	21	22
23	24	25	26	27	28	29
30	31	1	2	3	4	5