Четверг, 28 Марта 2024, 19:22

Приветствую Вас Гость

[ Новые сообщения · Игроделы · Правила · Поиск ]
  • Страница 2 из 2
  • «
  • 1
  • 2
Форум игроделов » Программирование » Basic » Помощь в языке программирования - Visual Basic (Предлагаем руку помощи...)
Помощь в языке программирования - Visual Basic
PBPROGДата: Четверг, 15 Ноября 2012, 01:14 | Сообщение # 21
постоянный участник
Сейчас нет на сайте
Quote (Froster)
Может есть другие компиляторы (более лучше)?
Попробуй PureBasic. Создает нативный код и не требует никаких DLL для работы программ.

Но предупреждаю сразу, не совместим по коду с VB. ИМХО синтаксис у PureBasic более логичен чем у VB.
-Mikle-Дата: Четверг, 15 Ноября 2012, 10:20 | Сообщение # 22
Изобретатель велосипедов
Сейчас нет на сайте
Quote (Froster)
А что она исправляет в проекте, что проект будет идти нормально?

Она автоматом собирает в архив все нужные компоненты, но это не трудно сделать самому.
Она автоматом регистрирует ActiveX компоненты, это тоже, при желании, можно сделать вручную.
Всё, что подключается через меню "ссылки" или "компоненты" - это ActiveX, их надо регистрировать в системе с помощью команды regsvr32, так:
Code
regsvr32 MyDll.dll

Это нужно выполнить в командной строке или с помощью Shell, вместо MyDll.dll подставь своё. Достаточно это выполнить один раз, потом будет работать даже после перезагрузки компьютера. Это и делают инсталлеры.
Если, как советует PBPROG, воспользуешься его любимым Pure Basic - ActiveX компоненты придётся регистрировать ВСЁ РАВНО. С другой стороны на VB6, как и на Pure Basic, тоже можно писать, не используя сторонних DLL, кроме msvbvm60.dll, но это не проблема, так как она есть в любой Windows, по последним данным даже в восьмёрке. А если даже там её не будет - достаточно в папку с проектом положить эту DLL, больше никаких действий.
Правка:
С Pure Basic и ActiveX скорее всего ещё сложнее, ведь в Pure Basic нет ООП.


Сообщение отредактировал -Mikle- - Четверг, 15 Ноября 2012, 11:38
PBPROGДата: Четверг, 15 Ноября 2012, 11:40 | Сообщение # 23
постоянный участник
Сейчас нет на сайте
Quote (-Mikle-)
Pure Basic - ActiveX компоненты придётся регистрировать ВСЁ РАВНО.
ActiveX нужно будет регистрировать только в том случае, если они явно используются в проекте. И в этом случае, их может зарегистрировать сама программа при ее запуске. Поэтому проблем нет.
FrosterДата: Пятница, 16 Ноября 2012, 18:57 | Сообщение # 24
почетный гость
Сейчас нет на сайте
-Mikle-, попробую регистрировать. Думаю получиться

Quote (PBPROG)
Попробуй PureBasic.


При чем тут PureBasic? Я же задал вопрос на VB, так зачем мне советовать PureBasic?

-Mikle-, а Вы регистрируете ActiveX в своих проектах программа в реестр?

Quote (PBPROG)
по последним данным даже в восьмёрке. А если даже там её не будет - достаточно в папку с проектом положить эту DLL, больше никаких действий.
Правка:


А программа на VB пойдет на стороннюю ОС (к примеру Linux), если в папку с программой кинуть файл msvbvm60.dll, компоненты (*.ocx, *.dll), которые будет использоваться в проекте и при запуске, что бы они регистрировались в реестре. Пойдет тогда программа?
-Mikle-Дата: Пятница, 16 Ноября 2012, 19:44 | Сообщение # 25
Изобретатель велосипедов
Сейчас нет на сайте
Quote (Froster)
А программа на VB пойдет на стороннюю ОС (к примеру Linux), если в папку с программой кинуть файл msvbvm60.dll

На линуксе под вайном работает, по крайней мере без ActiveX компонентов. По идее и с ними дожно, не пробовал.
Quote (Froster)
а Вы регистрируете ActiveX в своих проектах программа в реестр?

Я не люблю ActiveX, стараюсь не использовать. Например, мне не нравится, что без админских прав пользователь их не сможет зарегистрировать, то есть не сможет запустить мою программу. Да и не нужны особо ActiveX компоненты в играх. Файловые диалоги и т. п. не сложно и самому написать.
FirstДата: Пятница, 16 Ноября 2012, 22:01 | Сообщение # 26
Уолтер Брайт
Сейчас нет на сайте
Я тут пропадал не на долго biggrin Проблемы были. Вижу тема не стояла на месте smile

-Mikle-, спасибо за поддержку.
DarkbasicДата: Пятница, 23 Ноября 2012, 14:24 | Сообщение # 27
Revival Deiphi
Сейчас нет на сайте
Всем здрасьте! Учусь по онлайн учебнику который дали в первом посте.
Code
Private Sub ShowKod()
Dim X As Long
VScroll1.Max = Len(Text1.Text)
For X = ZnachenieScroll To ZnachenieScroll + 4
Text2(X - ZnachenieScroll).Text = Mid(Text1.Text, X, 1)
If Len(Text2(X - ZnachenieScroll).Text) > 0 Then
Text3(X - ZnachenieScroll).Text = Asc(Text2(X - ZnachenieScroll).Text)
Else
Text3(X - ZnachenieScroll).Text = ""
End If
Next X
End Sub
При этом коде выскакивает ошибка: Methor or data member not found! что делать? при ошибке выделяет VScroll1.Max = Len(Text1.Text)





Сообщение отредактировал Darkbasic - Пятница, 23 Ноября 2012, 14:25
-Mikle-Дата: Пятница, 23 Ноября 2012, 16:02 | Сообщение # 28
Изобретатель велосипедов
Сейчас нет на сайте
Darkbasic, очевидно на форме должен быть текстбокс с названием Text1 и вертикальный скроллбар VScroll1.
DarkbasicДата: Суббота, 24 Ноября 2012, 05:02 | Сообщение # 29
Revival Deiphi
Сейчас нет на сайте
Quote (-Mikle-)
очевидно на форме должен быть текстбокс с названием Text1 и вертикальный скроллбар VScroll1.

Это есть. Проблему решил, но появилась другая!
Code
Text2(X - ZnachenieScroll).Text = Mid(Text1(0).Text, X, 1)
пишет что инвалид процедур! Что делать?



FirstДата: Суббота, 24 Ноября 2012, 16:22 | Сообщение # 30
Уолтер Брайт
Сейчас нет на сайте
Quote (Darkbasic)
Что делать?


Во-первых, убери ноль и получишь:

Code
Text2(X - ZnachenieScroll).Text = Mid(Text1.Text, X, 1)


Так как у тебя массив объектов только Text2 и Text3.

У меня все работает (а почему бы ему и не работать?) biggrin

Не спеши никогда повторять и тупо запоминать код. Сначала посиди и старайся понимать, что к чему относится и понять алгоритм самой программы. Потом, когда уже понял, начинай (не подглядывая в источник) воплотить код и придумать с ним какую-то программу, для закрепления навыков.

На счет кода:

Code


Private Sub ShowKod()
Dim X As Long

VScroll1.Max = Len(Text1.Text)

For X = ZnachenieScroll To ZnachenieScroll + 4

Text2(X - ZnachenieScroll).Text = Mid(Text1.Text, X, 1)

If Len(Text2(X - ZnachenieScroll).Text) > 0 Then
Text3(X - ZnachenieScroll).Text = Asc(Text2(X - ZnachenieScroll).Text)
Else
Text3(X - ZnachenieScroll).Text = ""
End If

Next X
End Sub



Как бы полный код твоей процедуры.


Сообщение отредактировал First - Вторник, 11 Декабря 2012, 01:27
GritkhSaironДата: Воскресенье, 08 Декабря 2013, 01:53 | Сообщение # 31
уже был
Сейчас нет на сайте
Цитата Кристинчик ()
Здравствуйте. я когда то пыталась выучить бейсик но он слишком сложный. Бывает захожу на сайты и пытась выучить его. думала сделать свой движок раньше. вот меня интерисует создание своей библиотеки на нем. как писать к нему библиотеку и что бы он же (бейсик) ее прочитал??? можно ли потом эту библиотеку использовать в конструкторах игр и т.д... ??? мне больше всего нужно для конструкторов

Basic не сложный, иногда бывает тяжело
нормальный форум найти где есть литература,
а главное специалисты готовые помочь

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


Будущее зависло от тебя
Форум игроделов » Программирование » Basic » Помощь в языке программирования - Visual Basic (Предлагаем руку помощи...)
  • Страница 2 из 2
  • «
  • 1
  • 2
Поиск:

Все права сохранены. GcUp.ru © 2008-2024 Рейтинг