Страница 5 из 7
Добавлено: Пт дек 19, 2008 10:21:02
PB_EXPERT
оф топ
В библиотеке NET
Использование данной библиотеки считаю не очень дальновидным!
Если бы она была бы нужна только при разработке приложения, то как говорится вопросов нет, но она ведь нужна и для выполнения скомпилированого приложения!
И что будет делать юзер, в системе которого нет требуемой версии этобй библиотеки (которая кстати весит пару десятков метров)?
Правильно, он матерясь сбросит приложение в корзину и забудет о нём как о страшном сне!
А если так, то какой смысл кодить программу, если её смогут использовать не все желающие, а только некоторые?
Это моё личное мнение и вы праве с ним не согласится.
Добавлено: Пт дек 19, 2008 12:00:59
pirotehnick
PB_EXPERT писал(а):Если бы она была бы нужна только при разработке приложения, то как говорится вопросов нет, но она ведь нужна и для выполнения скомпилированого приложения!
А в чём проблемы? Приложение просто подогружает требуемые библиотеки и берёт из них то, что ему нужно.
PB_EXPERT писал(а):И что будет делать юзер, в системе которого нет требуемой версии этобй библиотеки (которая кстати весит пару десятков метров)?
Я не думаю, что для кого-то это будет такой уж непреодолимой проблемой в её добычи и установки. Тоже самое вы моли бы сказать и про другой софт.
PB_EXPERT писал(а):Правильно, он матерясь сбросит приложение в корзину и забудет о нём как о страшном сне!
А что же сделает чел у которого нет архиватора или PDF ридера,... что он удалит все свои архивы и pdf файлы???
Кроме того, если прога написана под NET, а его у вас нету, то она должна выкинуть сообщение, о небходмости установки Framework требуемой версии.
И надо сказать что у Basic NET есть несомненные приимущества перед 6 бейсиком. Другое дело если писать на Си, здесь лучше юзать MFC, т.к. платформа NET всё равно дюже тормознутая, хотя и по шустрее явы
Добавлено: Сб дек 20, 2008 22:04:35
pro_grammer
pirotehnick писал(а):
И надо сказать что у Basic NET есть несомненные приимущества перед 6 бейсиком.
В VB 6 не было нормального ООП. А в VB.Net оно есть.Если это для вас не (главное) приемущество, то смысла переходить с VB6 нет.
А уж то, что надо для каждой новой версии свой Framework( весом 20-30 метров), так это и вообще дурдом. У меня лично уже есть 1.1, 2.0, 3.0 и последняя для Visual Studio 2008 RUS Framework v.3.5
Если это для конечного пользователя не проблема, то что тогда проблема, когда для исполнения 10 кб. файла нужна 35 Мб библиотека?
Добавлено: Вс дек 21, 2008 08:13:16
Jack_A
По-чайницки вдруг заинтересовался : а есть VB - free В смысле халявный?
Добавлено: Пн дек 22, 2008 11:00:18
pro_grammer
Jack_A писал(а):По-чайницки вдруг заинтересовался : а есть VB - free В смысле халявный?
Microsoft Visual Basic 2008 экспресс выпуск, халявный, с русификацией.
Из ограничений основное, на мой взгляд - отсутствие средств программирования мобильных устройств под Win Mobile.
Это из новейших, а из старых VB6 - самый распространенный, вроде тоже денег не просит, PRO версия в составе VisualStudio платная, а сам по себе распространяется даром, по крайней мере есть "облегченные" версии.
Добавлено: Пт янв 02, 2009 15:42:07
Деня
как и чем писать прги под Win Mobile.
Добавлено: Пт янв 02, 2009 18:20:30
Деня
Пол нета перелапател, скоро глаза вылезут, настройки на с++ вроде есть
а на VB вроде нет; есть умная книга, но стоит кучу денег, халява не получается хоть совет какой дайте
Добавлено: Пт янв 02, 2009 21:33:28
pro_grammer
Можно в Viaual Studio 2005 на VB ( может и в других, но у меня их нет). Как обычно, выбираешь соответствующий проект(Smart App.) и кодишь!
Добавлено: Сб янв 03, 2009 22:06:13
Деня
Спасибо, домой доберусь домой буду ковырять.
Добавлено: Сб янв 10, 2009 19:42:56
demson
кто знает почему так
X=2
form1.show
form1.textbox1.text=X
все работает
но если
X=2
form1.show 1
form1.textbox1.text=X
работает строго после второго открытия формы-открыл, закрыл, открыл и только тогда срабатывает передача.
Добавлено: Пн янв 12, 2009 15:47:55
Ivan_83
Хелп читай.
Там описаны все константы.
Кроме того, там не 1 должна передаватся, а по уму, что то из набора констант, типа vbShowNormal или что то в этом роде.
Добавлено: Сб янв 24, 2009 19:10:48
demson
буду искать helps (не установлены, дистрибутив плохой). а еще такой вопрос:
надо сделать функцию, чтобы при её вызове на форме появлялось
image поле -- программным путем
НО поле будет не одно а несколько так вот надо
внедрить в имя поля index
image(0)
image(1)
image(2)
...
пока получается только так
Код: Выделить всё
For i = 0 To UBound(pribor, 2)
image_prib = "image_" & i
Set image_prib = Controls.Add("VB.Image", image_prib)
With image_prib
.DragMode = 1
.Height = pribor(6, i)
.Width = pribor(7, i)
.Top = pribor(8, i)
.Left = pribor(9, i)
.BorderStyle = 0
.Stretch = True
.Visible = True
End With
local_image = local_pribor_image & i & "_1image.jpg"
If Not Dir(local_image) = vbNullString Then image_prib.Picture = LoadPicture(local_image) Else image_prib.Picture = LoadPicture(local_pribor_image & "no_image.JPG")
j = "imageLab_" & i
Set j = Controls.Add("VB.Label", j)
With j
.DragMode = 1
.Height = 20
.Width = pribor(6, i)
.Top = pribor(8, i) + pribor(7, i) / 1
.Left = pribor(9, i)
.BorderStyle = 1
.Visible = True
End With
j.Caption = pribor(0, i) & pribor(1, i)
Next i
помогите c indexом
Добавлено: Сб янв 24, 2009 23:26:53
\\Sergey//
Ivan_83 писал(а):Кроме того, там не 1 должна передаватся
Необязательно. Можно передать как непосредственное значение, так и константу.
Например, зачем писать
FILE_ATTRIBUTE_ARCHIVE, когда можно просто поставить
&H20?
Ivan_83 писал(а):типа vbShowNormal или что то в этом роде
vbShowNormal - такой константы нет.
demson писал(а):надо сделать функцию, чтобы при её вызове на форме появлялось image поле -- программным путем
НО поле будет не одно а несколько так вот надо внедрить в имя поля index
image(0)
image(1)
image(2)
Это имелось ввиду (пример с PictureBox)?:
Код: Выделить всё
Private Sub Command1_Click()
Dim x(2) As PictureBox
For i = 0 To 2
Set x(i) = Controls.Add("VB.PictureBox", "picName" & i)
x(i).Visible = True
x(i).Top = i * x(i).Height
Next i
x(0).BackColor = vbWhite
x(1).BackColor = vbBlue
x(2).BackColor = vbRed
End Sub
Добавлено: Вс янв 25, 2009 18:40:56
demson
Set x(i) = Controls.Add("VB.PictureBox", "picName" & i) - это то что надо
а как сделать событие у динамически созданного элемента
- Private Sub x_DragDrop(Index As Integer, Source As Control, X As Single, Y As Single)
Text1.Text = Index & "d" & X & " " & Y & " " & pr_img(Index).Top & " x " & pr_img(Index).Left
End Sub
не срабатывает.
Добавлено: Вс янв 25, 2009 19:35:12
\\Sergey//
В данном случае это реализуется с помошью модулей класса.
Добавьте в проект модуль класса и в него скопируйте вот такой код:
Код: Выделить всё
Public WithEvents X As VB.PictureBox
Private Sub X_Click()
MsgBox X.Tag
End Sub
А вот этот код вставьте в форму:
Код: Выделить всё
Private XX(9) As Class1
Private Sub Form_Load()
Dim i As Integer
For i = 0 To 2
Set XX(i) = New Class1
Set XX(i).X = Controls.Add("VB.PictureBox", "XX" & i)
XX(i).X.Visible = True
XX(i).X.Top = i * XX(i).X.Height
XX(i).X.Tag = i
Next i
XX(0).X.BackColor = vbWhite
XX(1).X.BackColor = vbBlue
XX(2).X.BackColor = vbRed
End Sub
Добавлено: Вс янв 25, 2009 21:26:39
demson
Private XX(9) As Class1
а что обозначает эта строка?
Добавлено: Вс янв 25, 2009 22:58:52
\\Sergey//
Объявляем массив.
Добавлено: Чт янв 29, 2009 20:31:08
demson
и еще вопрос как class модуля поменять свойство visible некоторого объекта например text.visible?
Добавлено: Сб фев 14, 2009 21:41:13
demson
ладно со свойствами разобрался, просто имя формы. имя контрола
и еще вопрос а динамически модули подключить можно?
Добавлено: Пн фев 23, 2009 00:54:33
Sounds
Кто знает как работать с USB 2.0 в Visual Basic 6.0?
Поделитесь ссылками. В заранее спасибо!!!