Современные решения

для защиты Windows приложений

и восстановления исходного кода

Обсуждение программирования на Visual Basic в конференции ru.visual.basic


DLL в ресурсе

||*()*|| Ах это вы, Sergei ? А я вас не узнал без санитара...

07 июн 04 года ты писал(а) к мне:

[...skipped...]

SH> Hет мне не надо с EXE сплавлять. Более того в моем проекте вообще нет
SH> EXE. Есть только DLL, которая Add-in.

Так и DLL c DLL можно тоже...

I'll be back, Sergei !
www.caligari.zp.ua - реальная психологическая и психиатрическая помощь. Анонимно. Пока бесплатно.

* Origin: Иисус изменил вашу жизнь. Сохранить? [Y/N] (2:4641/500.99)


VB .NET Русская версия

Glad To Read You, Sergey Chubchenko !

09.06.2004 Было когда-то 10:15:54, базарил некто Sergey Chubchenko с All, и
задумал я приаттачиться:

SC> Кто нибудь знает, где можно взять сабж?
eMule (emule-project.net) и прочиее Р2Р сетки. У меня другстянул за пару дрен
на
широком канале. По его мнению полная фигня, неудобно после работы на
англайской версии.

Пока,Sergey Chubchenko!!! С вами был,есть и будет:Max Irgiznov [.NET][FreeBSD]
* Origin: Чем бы жаба не тешилась, лишь бы не дyшила. (2:5051/36.20)


Как ???

Здорова All! Пишет тебе Igor

Как можно сделать чтобы к примеру :
"Вот эта строчка"
передвигалась при нажатии на кнопку в низ, и все
последующие за ней строки тоже, и появлялась новая.
Как это сделать ???

С уважением, Igor

* Origin: NORA (2:5062/24.8)


Re: DLL в ресурсе

From: "Sergei Ho"

"Alexander Belinsky" wrote in message news:1086974831 [@] p99.f500.n4641.z2.ftn...
> ||*()*|| Ах это вы, Sergei ? А я вас не узнал без санитара...
>
> 07 июн 04 года ты писал(а) к мне:
>
> [...skipped...]
>
> SH> Hет мне не надо с EXE сплавлять. Более того в моем проекте вообще нет
> SH> EXE. Есть только DLL, которая Add-in.
>
> Так и DLL c DLL можно тоже...
>
> I'll be back, Sergei !
> http://www.caligari.zp.ua - реальная психологическая и психиатрическая помощь.
> Анонимно. Пока бесплатно.

Спасибо,
вопрос закрыт.
Hочью написал свой вариант той DLL,
так что прятать не придется.

Сергей.


* Origin: Demos online service (2:5020/400)


Re[3]: vbscript

From: Alexander Asyabrik

Привет, Alexei.

Вы, было дело, писали 12 июня 2004 г., 18:03:


AK>> Set filesys = CreateObject("Scripting.FileSystemObject")

AT> Попpобовал, полyчил ошибкy:

AT> невозможно создание объекта контейнеpом ActiveX: "Scripting.FileSystemObject"

AT> ы? Где копать?

Hайди и зарегистрируй (например, с помощью regsvr32) библиотеку
scrrun.dll. Если вдруг ее нет - пошарь в дистрибутиве Windows или IE.




--
С уважением, Alexander
12:30:50 PM



* Origin: Talk.Mail.Ru (2:5020/400)


Re[2]: vbscript

Здpавствyй, Andrey.

Пятница Июнь 11 2004, 10:13 Andrey Kosiantchuk писал All:

AK> создание файла в vbs

AK> dim filesys, filetxt, getname, path, textfile
AK> textfile = "myfile.cpp"
AK> Set filesys = CreateObject("Scripting.FileSystemObject")
AK> Set filetxt = filesys.CreateTextFile(textfile, True)
AK> getname = filesys.GetFileName(path)
Попpобовал, полyчил ошибкy:

Error:
невозможно создание объекта контейнеpом ActiveX: "Scripting.FileSystemObject"

ы? Где копать?

С yважением, Alexei.
* Origin: Far East (2:5040/37.36)


Re: Как ???

Мы где-то виделись, Igor?

11 Jun 04 15:30:56 в RU.VISUAL.BASIC Igor Shilak -> All:

IS> Как можно сделать чтобы к примеру :
IS> "Вот эта строчка"
IS> передвигалась при нажатии на кнопку в низ, и все
IS> последующие за ней строки тоже, и появлялась новая.
IS> Как это сделать ???

В чем у тебя хранится текст - TextBox, PictureBox (рисуется ручками) или
что-то еще? Или пока нигде не хранится? :)

Всего хорошего!
Дмитрий Козырев aka Master

* Origin: Дорогу осилит идущий. (2:5023/11.148)


Как ???

IS> Как можно сделать чтобы к примеру :
IS> "Вот эта строчка"
IS> передвигалась при нажатии на кнопку в низ, и все
IS> последующие за ней строки тоже, и появлялась новая.
IS> Как это сделать ???
Откуда строчка?

Куда передвигалась?

Как ты собрался строчку из фидошного сообщения двигать?

У меня, как минимум несколько вариантов, что ты имел ввиду. Укажи верный.


* Origin: 1134 (2:5045/44.13)


ООП

Good to see you, _All_!

Сижу в VBA для Excel.

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

Пытаюсь делать так:
=======================================================================
'Метод должен назначать первый дочерний узел(FirstChild) по отношению к 'заданному(ChosenCell)
'Переменная-член WhoIsFirstChild определялась как тип ExcellNode
'
Public Sub SetFirstChild(ByVal FirstChild As ExcellNode, Optional ByVal _ ChosenCell As ExcellNode = Nothing)
ChosenCell.WhoIsFirstChild = FirstChild
End Sub
=======================================================================

При попытке работать с экземпляром класса:
Object variable or With block variable not set (Error 91)

Отлаживал... Выяснилось, что ошибка происходит при инициализации WhoIsFirstChild значением Nothing.
============================================================
Private Sub Class_Initialize()
bIsFontBold = False
bIsFontCursive = True
bIsFontUnderlined = False
iPictureNumber = 1
longColumnCoordinate = 2
longRowCoordinate = 2
strCommentString = "Just comment"
Tag = "Something"
WhoIsFirstChild = Nothing ' Вот тут-то и умираем!
WhoIsNextNode = Nothing
WhoIsParent = Nothing
End Sub
============================================================
Т.е. как я понял, экземпляр класса с хоть одной неинициализированной переменной жить и работать не будет...
После того как убрал из аргументов экземпляры классов и связанные с ними методы/переменные-члены всё остальное работало.

1.Если вообще так нельзя, то где бы почитать про создание связанных списков в VB?
2. Как нужно ссылаться из метода на текущий экземпляр класса? (в C++ это оператор this)
3. Как следует инициализировать WhoIsFirstChild, WhoIsNextNode, WhoIsParent?
4. Как загрузить класс обратно в Class Wizard, если вдруг захотелось что-то добавить/изменить?

¦ Послано в RU.VISUAL.BASIC
¦ Также послано в RU.VISUAL.BASIC.CHAINIK

* Origin: Riddle here, riddle there. Riddles almost everywhere (2:5011/105.52)


ООП

From: "A. Skrobov"

Sat Jun 12 2004 19:09, Alexei Gunyakov wrote to All:

AG> Пытаюсь делать так:
AG> =======================================================================
AG> 'Метод должен назначать первый дочерний узел(FirstChild) по отношению к
AG> 'заданному(ChosenCell) 'Переменная-член WhoIsFirstChild определялась как
AG> тип ExcellNode
AG> '
AG> Public Sub SetFirstChild(ByVal FirstChild As ExcellNode, Optional ByVal _
AG> ChosenCell As ExcellNode = Nothing)
AG> ChosenCell.WhoIsFirstChild = FirstChild
Set ChosenCell.WhoIsFirstChild = FirstChild

AG> End Sub
AG> =======================================================================

AG> При попытке работать с экземпляром класса:
AG> Object variable or With block variable not set (Error 91)

AG> Отлаживал... Выяснилось, что ошибка происходит при инициализации
AG> WhoIsFirstChild значением Nothing.
AG> ============================================================
AG> Private Sub Class_Initialize()
AG> bIsFontBold = False
AG> bIsFontCursive = True
AG> bIsFontUnderlined = False
AG> iPictureNumber = 1
AG> longColumnCoordinate = 2
AG> longRowCoordinate = 2
AG> strCommentString = "Just comment"
AG> Tag = "Something"
AG> WhoIsFirstChild = Nothing ' Вот тут-то и умираем!
Set WhoIsFirstChild = Nothing

AG> WhoIsNextNode = Nothing
Set ...

AG> WhoIsParent = Nothing
Set ...

AG> End Sub
AG> ============================================================
AG> Т.е. как я понял, экземпляр класса с хоть одной неинициализированной
AG> переменной жить и работать не будет...
Ерунда, все переменные инициализируются сами.

AG> После того как убрал из аргументов экземпляры классов и связанные с
AG> ними методы/переменные-члены всё остальное работало.

AG> 1.Если вообще так нельзя, то где бы почитать про создание связанных
AG> списков в VB?
Можно; просто для присваивания объектных типов используется оператор Set.

AG> 2. Как нужно ссылаться из метода на текущий экземпляр класса? (в C++
AG> это оператор this)
Me

AG> 3. Как следует инициализировать WhoIsFirstChild, WhoIsNextNode,
AG> WhoIsParent?
Set Whatever = Nothing, или, с таким же эффектом, не инициализировать никак -
в Nothing оно инициализируется само.

AG> 4. Как загрузить класс обратно в Class Wizard, если вдруг захотелось
AG> что-то добавить/изменить?
Add-Ins -> Class Wizard

* Origin: FidoNet Online (2:5020/175.2)



Назад Содержание Вперед