Twin Basic

@Argus19 · Регистрация: 24.09.2017

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

Несмотря на то, что проект Twin Basic по словам авторов в заключительной стадии "бета", скачал и попробовал.
Непривычный интерфейс.
Открыл проект, созданный в IDE Visual Basic 6.0, скомпилировал и 32 и 64 разрядные версии. По объёму результирующего кода получилось больше. Может быть нет оптимизации кода.
Кто-нибудь из форумчан может что-то сказать об этой IDE ?

@testuser2 · 03.12.2024, 13:49

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

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

Будто бы туда нрод сразу набежит. По факту там будут те же самые лица, которые тут пишут. Еще вопрос на засыпку, у разделов VBA и VB разные модераторы?

@locm · 03.12.2024, 14:19

Сообщение от Mikle Quits

Можно просто переименовать раздел "Pure Basic" в "Pure Basic, Twin Basic, Power Basic и т. д."

И зачем?

Может лучше раздел VB переименовать в "Visual Basic, Twin Basic, Power Basic, Free Basic, Real Basic и др."?

Чтобы была тут куча тем по всем диалектам!
Кстати, на форуме не редко появляются вопросы про Free Basic, а раздела нет.

@testuser2 · 03.12.2024, 14:23

Я бы сказал, Twin Basic не надо мешать с чем-то другим, имхо, это нечто выдающееся, как бы цветок среди камней, это уже видно сейчас.

I can · 03.12.2024, 14:38

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

у разделов VBA и VB разные модераторы?

А самому слабО посмотреть?

@testuser2 · 03.12.2024, 14:51

Сообщение от I can

А самому слабО

Это был не вопрос..

I can · 03.12.2024, 14:53

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

Это был не вопрос..

Извини, знак вопроса привиделся:

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

у разделов VBA и VB разные модераторы?

и слово "вопрос" тоже

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

вопрос на засыпку

@testuser2 · 03.12.2024, 15:15

Сообщение от I can

Извини, знак вопроса привиделся:

Это как бы предложение ответить себе на вопрос )

Добавлено через 16 минут
Для тех, кому этот вопрос актуален. Сам то я давно знаю ответ на этот вопрос..)

@HackerVlad · 03.12.2024, 17:20

Я почему-то сразу понял что это был сарказм)

Добавлено через 9 минут
testuser2, в VBA кстати shanemac51, The trick, Catstail, zss
shanemac51 ещё добавляется как видишь сам

@testuser2 · 03.12.2024, 17:22

shanemac51 еще по Access-у специализируется вроде

@HackerVlad · 03.12.2024, 17:22

Посмотри например в vb.net совсем другие модеры
Yury Komar, Элд Хасп, zss

zss только совпадает он вездесущ походу

@testuser2 · 03.12.2024, 17:49

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

Yury Komar, Элд Хасп, zss

Они кстати там всем Нетом заведуют..

@The trick · 03.12.2024, 18:17

Комментарий модератора

Заканчиваем офтоп

@testuser2 · 04.12.2024, 17:22

Неплохо если бы Twin basic перенял у Free basic 2 вещи, струкрутры-классы и еще мне нравятся там строки. В FB в строках ZString инфрмация о размере содержистя в заголовке, а не в буфере строки, по моему это удобнее во многих случаях, чем когда размер в буфере строки.

Сообщение от Замабувараев

Во фрибесике структура — это почти что класс, а переменная — это экземпляр этого класса (объект). Если вы добавляете инициализатор в структуру, то фрибесик сгенерирует конструктор класса (и деструктор), в котором полю Age будет присвоено 35.
Цитата Сообщение от Power_Basic Посмотреть сообщение
Помню, писал однажды программу, в которой был массив UDT. А в том UDT как раз были имена и фамилии
В компиляторных потрохах фрибесика тип данных String — это структура следующего устройства:

PureBasic
1
2
3
4
5
6
7
8
Type FBSTRING
 ' Указатель на данные + нулевой символ
 Data As ZString Ptr
' Длина строки без учёта нулевого символа
 Len As Integer
' Размер занимаемой памяти
 Size As Integer
End Type

@The trick · 04.12.2024, 20:40

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

В FB в строках ZString инфрмация о размере содержистя в заголовке, а не в буфере строки, по моему это удобнее во многих случаях, чем когда размер в буфере строки.

А в чем проблема создать такую структуру?

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

Во фрибесике структура — это почти что класс, а переменная — это экземпляр этого класса (объект).

Для 100% обратной совместимости объекты должны являться COM объектами.

@testuser2 · 05.12.2024, 02:05

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

А в чем проблема создать такую структуру?

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

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

Для 100% обратной совместимости объекты должны являться COM объектами.

Так обратная совместимость пусть будет регрессивная. Просто как новую дополнительную возможность бы добавили.

@The trick · 07.12.2024, 10:45

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

Да раздел-то хрен с ним, у нас сильно отстает обсуждение, хотя отчасти понятно почему.

testuser2, для создания отдельного раздела пока мало тем, я думаю что на данный момент это неактуально. Тут даже для FreeBasic нет раздела, хотя тем намного больше. Т.к. Twin Basic позиционирует себя как на 100% совместимый с VB6 то его обсуждение в этом разделе легитимно. Если потом будет поток вопросов и тем по нему, то с легкостью можно будет создать подраздел и темы из основного раздела перенести в него.

@testuser2 · 07.12.2024, 12:15

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

Visual Basic
1
2
3
    Dim a As Long, b As Long, c As Long
     Array(a, b, c) = Array(1, 2, 3)
     Debug.Print a, b, c

Показалось мне сначала, что подобный вид выражения можно легко воспроизвести на VB, однако на деле оказались тоже просто, но с некторыми нюансами.. Вместо RefArray можно использовать и обычный Array, однако если представить присвоение таким способом больших строк или массивов, логичней было бы избежать лишних копирований, для чего и сделана функця RefArray, создающая массив ссылок на переменные. Параметр lp0 в ней используется лишь для вычисления указателя массива параметра, поскольку напрямую этот указатель не получить в виду ограничений VB для массива параметров, также, к сожалению нельзя задать этот параметр как Optional в виду другого ограничения использования Optional параметров вместе с ParamArray.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Private Declare Sub GetMem4 Lib "msvbvm60" (Src As Any, Dst As Any)
Private Declare Function vbaAryMove Lib "msvbvm60" Alias "__vbaAryMove" (Dst() As Any, ByVal pSrc As Long) As Long
 
Private Sub testArray()
    Dim a$, b&, c#
    Dim e$, f&, g#    
    
    LeftArray(a, b, c) = RefArray(0, "afff", 4343, 989.879)
    LeftArray(e, f, g) = RefArray(0, a, b, c)
    Debug.Print a, b, c; vbCr; e, f, g
End Sub
 
Property Get RefArray(ByVal lp0&, ParamArray arInp()) As Variant()
    Dim ptr&
    GetMem4 ByVal VarPtr(lp0) + 4, ptr
    vbaAryMove RefArray, ptr
End Property
 
Property Let LeftArray(ParamArray arDst(), arSrc())
    Dim i&
    For i = 0 To UBound(arDst)
        arDst(i) = arSrc(i)
    Next
End Property

@Замабувараев · 07.12.2024, 12:47

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

логичнее было бы сливать все строки в единый буфер через разделитель ноль

Это неудобно. И вот почему.

Допустим, есть массив строк:

Code
1
Dim Vector(2) As String = {"Первый", "Второй", "Третий"}

И все символьные данные хранятся друг за другом.

Нам нужно заменить второй элемент:

Code
1
Vector(1) = "Другой элемент"

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

Итого имеем две проблемы: фрагментация памяти + перерасход памяти.

@testuser2 · 07.12.2024, 13:51

Сообщение от Замабувараев

Нам нужно заменить второй элемент:

Это не удобно для общего случая использования массива, но удобно в каких-то отдельных случаях. Допустим надо быстро находить какую-то подстроку во всем массиве. Или заменить какую-то подстроку во всем массиве, тогда удобнее взять весь буфер как одну строку и выполнить замены, затем пересчитать указатели и размеры в заголовочном массиве

Добавлено через 4 минуты
Удобнее искать, можно задать подстроку, находящуюся в начале каждой строки, как Chr(0) & "подстрока", а со строками bstr так уже не сделать, там вначале будет размер

@HackerVlad · 07.12.2024, 19:23

Да, я помню что в огромной строке искать быстрее, чем в большом многострочном массиве

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

Сообщение от Замабувараев

Dim Vector(2) As String = {"Первый", "Второй", "Третий"}

Это где вы такой синтаксис видели? Это не работает даже в TwinBasic, не говоря уже про VB6

Новые блоги и статьи Все статьи Все блоги /
Генератор паролей (вариант №1) Maks 29.10.2026 Реализация из решения ниже выполнена исключительно по моей инициативе, дабы облегчить себе работу в создании паролей для администрируемых мною сервисов и пользователей. Самым главным критерием для. . .	Установка ChatGPT (Codex) на Windows без использования Microsoft Store Fabien159 28.10.2026 Здравствуйте всем читающим! Опишу процесс установки ChatGPT (Codex) на Windows, если по каким-то причинам у вас не получается устанавить его через Microsoft Store. И так: 1. Скачиваем с. . .	Программное добавление префикса в нумерацию документов Maks 27.10.2026 Реализация из решения ниже выполнена в самописной конфигурации на БСП (помощь начинающему коллеге). Задача: Программно добавить префикс в нумерацию документов. Решение: В модуле объекта. . .	После закрытия оутлука продолжает висеть процесс в диспетчере задач Maks 27.10.2026 С недавнего времени в продакшене возникла проблема: при закрытии оутлука в диспетчере задач продолжал висеть процесс outlook. exe. Проблема возникла после установки MS Office 2021 LTSC на машинах, под. . .
Baragoz - DPS/HPS бот для WoW 3.3.5a, многоязычный AmbA 26.10.2026 Хотите ещё ботов? У меня есть один! А я пока отдохну от него. https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=12062&stc=1&d=1793007952 Инструкция внутри. https:/ / youtu. be/ VpfFZSUDGnQ. . .	Особенности gif сгенерированных в Си russiannick 21.10.2026 Рассмотрим генерацию gif файлов, которые в Си имеют свои особенности. Gif представляет собой графический формат популярный в интернете. Посмотрим на палитру. Gif файл сгенерированный в си отличается. . .	FPS контроллер с анимированными Y-Bot и 3D-звуком miniaudio (Box3D, Recast, BehaviorTree.CPP, ozz-animation, ImGui, OpenGL и SDL3) 8Observer8 18.10.2026 Содержание блога \| English Version Полное мультиплатформенное руководство по стартовому проекту с FPS-контроллером игрока, анимированными роботами Y-Bot с 4-слойным блендингом, 3D-физикой Box3D,. . .	Локальный http сервер Argus19 17.10.2026 Локальный http сервер На работе, на двух локальных компьютерах круглосуточно работают программы опроса приборов с записью в книги Excel,которые раз в сутки записываются на сервер компании. Т. к. . . .

@Argus19 1732 / 476 / 78 Регистрация: 24.09.2017 Сообщений: 2,573 Записей в блоге: 27

	Twin Basic 27.10.2024, 20:05. Показов 36364. Ответов 335 Метки нет (Все метки) Несмотря на то, что проект Twin Basic по словам авторов в заключительной стадии "бета", скачал и попробовал. Непривычный интерфейс. Открыл проект, созданный в IDE Visual Basic 6.0, скомпилировал и 32 и 64 разрядные версии. По объёму результирующего кода получилось больше. Может быть нет оптимизации кода. Кто-нибудь из форумчан может что-то сказать об этой IDE ? 3

@testuser2 1412 / 877 / 93 Регистрация: 08.02.2017 Сообщений: 3,742 Записей в блоге: 2
	03.12.2024, 14:23
	Я бы сказал, Twin Basic не надо мешать с чем-то другим, имхо, это нечто выдающееся, как бы цветок среди камней, это уже видно сейчас. 1

@HackerVlad Вернулся 1778 / 673 / 46 Регистрация: 10.09.2021 Сообщений: 2,822
	03.12.2024, 17:20
	Я почему-то сразу понял что это был сарказм) Добавлено через 9 минут testuser2, в VBA кстати shanemac51, The trick, Catstail, zss shanemac51 ещё добавляется как видишь сам 0

@testuser2 1412 / 877 / 93 Регистрация: 08.02.2017 Сообщений: 3,742 Записей в блоге: 2
	03.12.2024, 17:22
	shanemac51 еще по Access-у специализируется вроде 0