|
Помощь в языке программирования - Visual Basic
|
|
| PBPROG | Дата: Четверг, 15 Ноября 2012, 01:14 | Сообщение # 21 |
|
постоянный участник
Сейчас нет на сайте
| Quote (Froster) Может есть другие компиляторы (более лучше)?
Но предупреждаю сразу, не совместим по коду с VB. ИМХО синтаксис у PureBasic более логичен чем у VB.
|
|
|
| |
| -Mikle- | Дата: Четверг, 15 Ноября 2012, 10:20 | Сообщение # 22 |
Изобретатель велосипедов
Сейчас нет на сайте
| Quote (Froster) А что она исправляет в проекте, что проект будет идти нормально?
Она автоматом собирает в архив все нужные компоненты, но это не трудно сделать самому.
Она автоматом регистрирует ActiveX компоненты, это тоже, при желании, можно сделать вручную.
Всё, что подключается через меню "ссылки" или "компоненты" - это ActiveX, их надо регистрировать в системе с помощью команды regsvr32, так:
Это нужно выполнить в командной строке или с помощью 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 компоненты придётся регистрировать ВСЁ РАВНО. |
|
|
| |
| 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 |
Уолтер Брайт
Сейчас нет на сайте
| Я тут пропадал не на долго  Проблемы были. Вижу тема не стояла на месте 
-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
Сообщение отредактировал 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.
У меня все работает (а почему бы ему и не работать?)
Не спеши никогда повторять и тупо запоминать код. Сначала посиди и старайся понимать, что к чему относится и понять алгоритм самой программы. Потом, когда уже понял, начинай (не подглядывая в источник) воплотить код и придумать с ним какую-то программу, для закрепления навыков.
На счет кода:
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
Будущее зависло от тебя
|
|
|
| |
