Тестирование полезных кодов и примеров

Dragokas · Регистрация: 25.12.2011

Студворк — интернет-сервис помощи студентам

Если Ваш код из темы Готовые решения и полезные коды на Visual Basic 6.0

неправильно собран или неработоспособен, он будет перенесен сюда.

Для доведения кода в рабочее состояние в порядке обсуждения создайте новую тему

@fever brain · 09.11.2017, 20:42

Расскажите что такое линковка

Добавлено через 2 минуты
Мы тут вроде взрослые, и нас не напугать ! новыми словами

@The trick · 09.11.2017, 21:33

Сообщение от VBOrion

А существует возможность статической линковки непосредственно в VB6 или нужно устанавливать какие-то дополнительные инструменты?

Статическая линковка "из коробки" возможна, но довольно ограниченно и некрасиво. В секции LinkSwitches прописывается нужная либа и экспортируются нужные символы из этой либы. В исполняемом файле делается декларации API из себя-же этой функции.
Недостатки:

привязка к имени исполняемого файла (лечится вызовом по указателю);
Нежелательный экспорт;
Невозможность инициализации, к примеру CRT. Поэтому очень ограничено;
Не работает в IDE.

Второй вариант более правильный, но более трудоемкий. Нужно перехватить обращение к линкеру и сделать замену какого-либо модуля заглушки, на переходник на нужный символ.
К примеру если хотим прилинковать какой-либо lib файл к нашему EXE, то нужно создать модуль с функциями-заглушками, с нужными прототипами. Существует проблема манглинга в именовании функций (к примеру имя символа функции foo модуля bar будет ?foo@bar@@AAGXXZ), поэтому нужно будет делать переходник (к примеру на FASM'е или руками) который будет иметь эти символы и jmp'ать на линкуемые. Если линкуется какой-нибудь модуль C++, то нужно указать в качестве стартовой или mainCRTStartup, _DllMainCRTStartup или другую необходимую, а в переходнике из main, _DllMain или другой делать прыжок на ___vbaS. Способ не содержит вышеприведенных недостатков кроме последнего.
Для обоих вариантов можно юзать DLL вместо либы, для отладки в IDE.

@fever brain · 09.11.2017, 21:43

The trick, ну что значит если у меня есть заготовки к проекту
есть у тебя инфа на этот счет, расскажи кто не знает

Добавлено через 1 минуту
и где он собственно размещается этот самый линкер

@The trick · 09.11.2017, 21:47

Сообщение от fever brain

The trick, ну что значит если у меня есть заготовки к проекту
есть у тебя инфа на этот счет, расскажи кто не знает

Я бы скинул пример, но мой Add-in работает нестабильно. Так что нужно либо ждать фикса чтобы правильно перехватить вызов к линкеру, либо как-то самим перехватывать. Первый способ я кидал где-то в блоге.

@fever brain · 09.11.2017, 21:54

Ну ястно, в общих чертах дополню что это сообщение компилятору, оно находится в самом низу проекта если проект открыть например блокнотом...

Добавлено через 39 секунд
в обычной ситуации такой линкер:
[MS Transaction Server]
AutoRefresh=1

Ну расскажи пожалуйста, не ходи вокруг да около

Добавлено через 3 минуты
И чем замечательна эта запись:
[MS Transaction Server]
AutoRefresh=1
явно не случайно ее ставят ?

@The trick · 09.11.2017, 21:59

Сообщение от fever brain

в обычной ситуации такой линкер:
[MS Transaction Server]
AutoRefresh=1

Нет. Линкер - это компоновщик LINK.exe в папке VB98.

@VBOrion · 09.11.2017, 22:06

Сообщение от fever brain

Мы тут вроде взрослые, и нас не напугать ! новыми словами

Чтобы не распространять лишние длл, можно готовый код "вшить" непосредственно в ехе. В C++ это к примеру обычная практика

:

C++
1
#pragma comment(lib,"ntdll.lib")

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

.

@fever brain · 09.11.2017, 22:18

Переваривайте.. , только не перестарайиесь )) почитайте его блоги ...

Добавлено через 5 минут
VBOrion, Вы впервые здесь ?

@VBOrion · 09.11.2017, 22:52

Сообщение от fever brain

Переваривайте.. , только не перестарайиесь ))

Попробую что-нибудь написать, по результатам здесь отпишу.
The trick, а как лучше сделать. По мне видится два пути - либо написать свой линкер, который будет передавать данные уже в родной линкер или попробовать выяснить каким способом вызывается линкер и если это выполняется через к примеру CreateProcess то перезаписать на свою фильтрующую функцию в IAT?

Добавлено через 1 минуту

Не по теме:

Сообщение от fever brain

VBOrion, Вы впервые здесь ?

Здесь, да.

@The trick · 10.11.2017, 09:24

Сообщение от VBOrion

The trick, а как лучше сделать. По мне видится два пути - либо написать свой линкер, который будет передавать данные уже в родной линкер или попробовать выяснить каким способом вызывается линкер и если это выполняется через к примеру CreateProcess то перезаписать на свою фильтрующую функцию в IAT?

Проще - написать линкер с переадресацией аргументов. С перехватом CreateProcess тоже неплохая идея. Как хочешь - так делай.

@VBOrion · 10.11.2017, 12:49

The trick, спасибо!

@locm · 26.08.2018, 16:17

Чем эта библиотека лучше скажем GDI+?

@The trick · 27.08.2018, 11:47

locm, ну к примеру она поддерживает режимы смешивания, которых нет в GDI+. Есть поддержка OpenGL с рендерингом на GPU. Даже на CPU либа в общем работает быстрее чем GDI+. Также эта библиотека с открытым исходным кодом, соответственно изучив данное API с легкостью можно программировать под любую платформу. Плюс другие возможности как работа с SVG/PDF.

@Pro_grammer · 27.08.2018, 14:15

Сообщение от locm

Чем эта библиотека лучше

Её можно на Пурике пощупать, есть рабочий враппер, я как то качал с оф.форума Пурика пару лет назад.
Но после встроенных в Пурик 2DDrawing library, Sprite и VectorDrawing это конечно выглядит более примитивно.
Для VB6 нормально.

@The trick · 28.08.2018, 12:02

Сообщение от Pro_grammer

Но после встроенных в Пурик 2DDrawing library, Sprite и VectorDrawing это конечно выглядит более примитивно

Чем выглядит? Поверхностный анализ (без углубления) наоборот показывает то что cairo более мощная чем любая из этих библиотек. Я могу ошибаться и поправьте меня те кто разбирается если это так.
VectorDrawing не поддерживает блендинг, не позволяет отключать AA, использует примитивные заливки и т.п. Насколько я понял использует урезанную cairo (да и это видно по функциям работы с SVG и PDF и способу рисования). 2DDrawing еще более урезанная либа не поддерживает антиалиасинг, произвольные маски, заливки и т.п. Sprite предназначена для спрайтов и не поддерживает рисование примитивов, только работа со спрайтами.

@locm · 05.09.2018, 15:30

Сообщение от The trick

Насколько я понял использует урезанную cairo

VectorDrawing использует GDI+
SVG только для Linux, а PDF для Linux и MacOS X.
Преимущество 2DDrawing и VectorDrawing в данном случае в том, что используются библиотеки ОС и размер приложения получается небольшим и не нужно вместе с ним распространять dll размером десятки мегабайт.

Сообщение от The trick

2DDrawing еще более урезанная либа не поддерживает антиалиасинг, произвольные маски, заливки

Потому что GDI и кроссплатформенность.

Сообщение от The trick

VectorDrawing не поддерживает блендинг

Может не так понял, но это разве не оно? https://www.purebasic.com/docu... layer.html

@The trick · 05.09.2018, 15:50

Сообщение от locm

Преимущество 2DDrawing и VectorDrawing в данном случае в том, что используются библиотеки ОС и размер приложения получается небольшим и не нужно вместе с ним распространять dll размером десятки мегабайт.

Десятки? Про преимущество ничего сказано не было, было сказано про примитивность. Насчет использования cairo я эту информацию взял отсюда:

On Linux the result is a cairo_t pointer, so you can use cairo_set_operator() (http://cairographics.org/manual/cairo-c ... t-operator) to do the same thing.

, т.е. получается она использует cairo на Linux. Насколько я понял в этом случае код cairo включается в exe, а не использует библиотеки ОС (могу ошибаться т.к. не силен в Linux/MacOS).

Сообщение от locm

Потому что GDI и кроссплатформенность.

~~Пожалуйста скомпилируй пример с CustomFilterCallback.~~
Сам сделал. Вижу что GDI не используется для рисования примитивов в этом случае:

PureBasic
1
2
3
4
5
6
7
      DrawingMode(#PB_2DDrawing_CustomFilter)      
      CustomFilterCallback(@FilterCallback())
      
      Line(0, 0, 300, 500, 1234)
      Box(100, 10,50,80)
      Circle(100, 100, 100, $0000FF)   
      Circle(300, 100, 100, $000000)

Смотрю имопрт:

Нет ни MoveToEx, ни LineTo, ни Rectangle, ни Ellipse.

Кликните здесь для просмотра всего текста

Сразу скажу что и динамически не подгружаются функции, а рисуется все кодом, т.к. GDI не предоставляет такую функциональность.

Сообщение от locm

Может не так понял, но это разве не оно? https://www.purebasic.com/docu... layer.html

Нет, в GDI+ этого нет. Это как тут (Darken, Multiply, LinearBurn, Screen и т.д.).

@locm · 05.09.2018, 17:14

Сообщение от The trick

Насчет использования cairo я эту информацию взял отсюда:

Это для Linux. Для Windows используется GDI+. Библиотеки PB построены так чтобы по максимуму использовать средства ОС. К примеру GUI в винде строится средствами WinAPI, в Linux на выбор, GTK2, GTK3 и Qt. Что в MacOS X точно не помню. Т. е. кроссплатформенные функции одни и те же, а что используется зависит от платформы и выбора подсистемы. К примеру в винде для библиотеки спрайтов можно выбрать DX7, DX9, DX11 или OpenGL что удобно поскольку код код остается прежним, а изменяется только подсистема в опциях проекта.

Вот как-то так.

Сообщение от The trick

Насколько я понял в этом случае код cairo включается в exe

Непохоже. Размер исполняемого файла около 150 КБ.
Архив *.tar.gz форум не позволяет загрузить.

@The trick · 05.09.2018, 18:18

Сообщение от locm

Непохоже. Размер исполняемого файла около 150 КБ.

Вижу что используется cairo. Согласно документации GTK+ использует cairo, получается просто динамически привязывается.

@kreotodr · 01.03.2019, 08:43

Сообщение от Dragokas

В режиме IDE возвращается правильная версия системы (Major / Minor / Build) вне зависимости, подключен манифест или нет.
Используется запрос к WMI. Это нужно для нормальной отладки программ под IDE.
В релизе подсистема WMI не ипользуется, поэтому Вам все равно обязательно нужно подключать манифест. См. детали по ссылке выше.
Перед использованием класса, замените все обработчики ошибок AppendErrorLogFormat на свои или закомментируйте автозаменой.

на win 10 14393
Возвращает: Os Version :Windows 10 x64 Unknown Edition (Build 14393)

Новые блоги и статьи Все статьи Все блоги /
Транслитерация текста с кириллицы на латиницу (вариант №2) Maks 13.11.2026 Обновленная версия ранее созданной обработки. Добавлено: - Проверка исходного текста на кириллицу, через обращение к стандартной функции "ТолькоКириллицаВСтроке" из общего модуля. . .	Часы с термометром и праздничным календарем yariko 12.11.2026 Сегодня мы рассмотрим как можно сделать отличные многофункциональные часы. Итак, поставим конкретную задачу: разработать часы с календарем, двумя термодатчиками, выводом поздравительных сообщений. . .	Транслитерация текста с кириллицы на латиницу (вариант №1) Maks 11.11.2026 Решил облегчить жизнь себе и коллегам админам при создании электронных почтовых ящиков для пользователей, в результате написал обработку "Транслитерация текста" с кириллицы на латиницу, а в ней. . .	Книги по геймдизайну, левел-дизайну, игровым механикам и проектированию игрового опыта 8Observer8 08.11.2026 Содержание блога \| English Version 1. 2003 - 06 - Designing Virtual Worlds (1st Edition) Автор: Richard A. Bartle \| Объем: 768 стр. Ссылки: Amazon . . .
Родители токсичные абьюзеры по отношению к своим детям ругают их оскорбляют не любят zorxor 08.11.2026 Жить в атмосфере постоянных оскорблений, критики и холодности со стороны родителей — это тяжелое и болезненное испытание, которое оставляет глубокие эмоциональные раны. Токсичное и абьюзивное. . .	Как только я захожу к себе в свою комнату я сразу же с себя снимаю свои трусы. Ответ от Джемени ИИ. zorxor 08.11.2026 Джемени, как только я захожу к себе в свою комнату я сразу же с себя снимаю свои трусы. Многие люди, возвращаясь домой, сразу переодеваются в максимально свободную одежду или вовсе предпочитают. . .	Паттерн очереди действий/команд (Action / Command Queue). Система очереди действий и кат-сцен с SDL3 Callbacks, cglm и OpenGL 8Observer8 07.11.2026 Содержание блога \| English Version Руководство для начинающих по реализации паттерна очереди действий/ команд (Action / Command Queue) на C++ (C++20) с использованием официального SDL3 Callbacks. . .	Проверка полного ФИО в типовом справочнике Maks 07.11.2026 Решение реализовано в конфигурации КА2, на примере справочника "КонтактныеЛицаПартнеров". Задача: Запрет инициалов. Не допускаеть использование сокращений вида "И. И. ", "И. И. ", "И И" и. . .

Dragokas 18035 / 7738 / 892 Регистрация: 25.12.2011 Сообщений: 11,502 Записей в блоге: 16

	Тестирование полезных кодов и примеров 15.10.2012, 00:56. Показов 32589. Ответов 301 Метки нет (Все метки) Если Ваш код из темы Готовые решения и полезные коды на Visual Basic 6.0 неправильно собран или неработоспособен, он будет перенесен сюда. Для доведения кода в рабочее состояние в порядке обсуждения создайте новую тему 2

@fever brain oh my god 1456 / 796 / 161 Регистрация: 05.01.2016 Сообщений: 2,307 Записей в блоге: 8
	09.11.2017, 20:42
	Расскажите что такое линковка Добавлено через 2 минуты Мы тут вроде взрослые, и нас не напугать ! новыми словами 0

@fever brain oh my god 1456 / 796 / 161 Регистрация: 05.01.2016 Сообщений: 2,307 Записей в блоге: 8
	09.11.2017, 21:43
	The trick, ну что значит если у меня есть заготовки к проекту есть у тебя инфа на этот счет, расскажи кто не знает Добавлено через 1 минуту и где он собственно размещается этот самый линкер 0

@fever brain oh my god 1456 / 796 / 161 Регистрация: 05.01.2016 Сообщений: 2,307 Записей в блоге: 8
	09.11.2017, 21:54
	Ну ястно, в общих чертах дополню что это сообщение компилятору, оно находится в самом низу проекта если проект открыть например блокнотом... Добавлено через 39 секунд в обычной ситуации такой линкер: [MS Transaction Server] AutoRefresh=1 Ну расскажи пожалуйста, не ходи вокруг да около Добавлено через 3 минуты И чем замечательна эта запись: [MS Transaction Server] AutoRefresh=1 явно не случайно ее ставят ? 0

@fever brain oh my god 1456 / 796 / 161 Регистрация: 05.01.2016 Сообщений: 2,307 Записей в блоге: 8
	09.11.2017, 22:18
	Переваривайте.. , только не перестарайиесь )) почитайте его блоги ... Добавлено через 5 минут VBOrion, Вы впервые здесь ? 0

@VBOrion 10 / 6 / 0 Регистрация: 06.11.2017 Сообщений: 21
	10.11.2017, 12:49
	The trick, спасибо! 0

@locm 7239 / 3417 / 348 Регистрация: 28.10.2011 Сообщений: 13,462 Записей в блоге: 7
	26.08.2018, 16:17
	Чем эта библиотека лучше скажем GDI+? 0

@The trick Модератор 10069 / 3914 / 886 Регистрация: 22.02.2013 Сообщений: 5,863 Записей в блоге: 79
	27.08.2018, 11:47
	locm, ну к примеру она поддерживает режимы смешивания, которых нет в GDI+. Есть поддержка OpenGL с рендерингом на GPU. Даже на CPU либа в общем работает быстрее чем GDI+. Также эта библиотека с открытым исходным кодом, соответственно изучив данное API с легкостью можно программировать под любую платформу. Плюс другие возможности как работа с SVG/PDF. 1