Подключить библиотеку dll - QBasic - Ответ 12365737

@The trick · 05.05.2018, 19:23

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

Я написал что список фукнций процедурной DLL это аналог методов COM интерфейса. Если сравнивать процедурную и ActiveX DLL.

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

Покажите как загрузить COM не зная интерфейса

Не понимаю тогда что ты имеешь в виду под "загрузить COM не зная интерфейса".

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

Вы ее сами написали, а не компилятор сгенерировал часть кода (как в случае разработки скажем на VB6). Именно об этом я писал.

Ну а что кто-то заставляет на VB6 писать? Вон у bedvit'а она на C++ вообще написана. В VC++ вообще написал #import и все классы и интерфейсы автоматически декларируются.

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

В Linux и MacOS такой вид DLL обычно не используют и нет стандарта как в случае ActiveX в винде. Результат не стоит затраченных усилий.

Стандарта в чем? COM объект это просто указатель на виртуальную таблицу методов. Все! Насколько мне известно в C++ (по крайней мере от MS) указатель на виртуальную таблицу функций используется в обычных C++ классах для виртуальных методов. А C++ классы тоже не используют? Расскажи в чем концептуальная разница между COM объектом и C++ объектом с виртуальными методами? Просто в COM это стандартизировано на бинарном уровне и предоставляется базовый набор для автоматического слежения за жизнью объекта и запроса нужного интерфейса. Результат стоит, т.к. мы имеем поддержку ЯП в которых работа с COM тривиальна, а в некоторых вообще невозможна работа с DLL импортом.

Вернуться к обсуждению:
Подключить библиотеку dll QBasic

Следующий ответ

Другие темы раздела
QBasic Уравнение sin(x)^3 = cos(x)^3 https://www.cyberforum.ru/ qbasic/ thread1928777.html Решить уравнение sin(x)^3 = cos(x)^3 REM REM sin(x)^3 = cos(x)^3 REM REM x = 0.7853 REM x = 3.9269 REM	Уравнение lg(sin(x) + lg(sin(5x) = -1 QBasic Найти корни уравнения lg(sin(x)) + lg(sin(5x)) = -1 на интервале (0; 1) REM REM lg(sin(x)) + lg(sin(5x)) = -1 REM REM 0 < x < 1 x = 0.1484 REM x = 0.5923 REM x = 0.6283
*QBasic Уравнение ln(sin x) (sin x - 1/4 cos x) = 3** Решить уравнение ln(sin x) * (sin x - 1/4 cos x) = 3 REM REM ln(sin x) * (sin x - 1/4 cos x) = 3 REM REM Решений НЕТ REM DECLARE FUNCTION f! (x!) https://www.cyberforum.ru/ qbasic/ thread1928184.html	*QBasic Решение уравнения ln8 cos(x)^2 * sin x = 1/2** Решить уравнение ln8 * cos(x)^2 * sin x = 1/2 примечание поскольку на интервале все решения найдены а функция является периодической с периодом T = 2pi то для получения всех решений достаточно к частному решению добавить слагаемое 2pi*n, где n - целое число. REM https://www.cyberforum.ru/ qbasic/ thread1928182.html
Решение неравенства sin\|lg x\| + cos\|lg x\| > 1 QBasic Решить неравенство sin\|lg x\| + cos\|lg x\| > 1 REM REM sin\|lg x\| + cos\|lg x\| > 1 REM REM 0.0265 < x < 37.2213 REM DECLARE FUNCTION f! (x!)	QBasic Решение уравнения arcsin(2x) + arcsin(x) = 1 / 3 https://www.cyberforum.ru/ qbasic/ thread1927561.html Решить уравнение arcsin(2x) + arcsin(x) = 1 / 3 примечание обратите внимание на цикл REM REM arcsin(2x) + arcsin(x) = 1 / 3 REM REM x = 0.11037
QBasic Найти все точки локальных минимумов функции sin x - cos(x)^2 - 1 Найти все значения икс локальных минимумов функции y = sin x - cos(x)^2 - 1 ... Посмотрите удивительный код. Такой вы не видели. REM REM sin x - cos(x)^2 - 1 REM REM Xmin = ? https://www.cyberforum.ru/ qbasic/ thread1927556.html	*Найти максимум функции y = sin2x sin(2x - 6 ) QBasic** Найти максимум функции y = sin2x * sin(2x - 6 ) REM REM y = sin2x * sin(2x - 6 ) REM REM Ymax = 0.980085; Xmax = 0.7145 REM DECLARE FUNCTION f! (x!)
QBasic Два массива в одном цикле на двух строках https://www.cyberforum.ru/ qbasic/ thread1927489.html решения задачи: два массива в одном цикле на двух строках. CLS DATA 7, 11, 5, 13, 18 DIM A(5) DATA 14, 12, 8, 2, 21 DIM B(5) PRINT FOR i = 1 TO 10 IF i <= 5 THEN	QBasic Максимальный элемент двумерного массива Максимальный элемент Минимальный элемент двумерного массива. двумерного массива. CLS CLS RANDOMIZE TIMER RANDOMIZE TIMER DIM X(5, 4) ... https://www.cyberforum.ru/ qbasic/ thread1927486.html
QBasic Вычислить сумму ряда Вычислить сумму ряда 1 / (1 * 2 * 3) + ... + 1 / (n * (n + 1) * (n+2)) при n = 5000 примечание сумма вычислена двумя способами 1. слева направо 2. справа налево (этот способ более точный) посмотрите результат и сделайте для себя вывод.	QBasic Решение уравнения [tg5x] = 1 Решить уравнение = 1 где - означает функцию INT(x) решение 1. для начала обратим внимание, что функция периодическая с периодом T = pi / 5 2. теперь обратим внимание, что все решения неравенства 1 <= tg(x) < 2 тоже подходят в наше уравнение, ибо целая часть равна во всех случаях 1. 3. то есть по сути нам надо решить два уравнения https://www.cyberforum.ru/ qbasic/ thread1927382.html

	05.05.2018, 19:23