Голосование:
Нет тем!
Доска почёта:
Sergey Y. Tkachev
Кононенко Роман
Kirill
Sergey Sapozhnikov
Sobic
Ссылки:
Несколько слов от автора:
Новый 64-ый выпуск рассылки!!!
Читайте!
Читайте!
Содержание выпуска
- Книги
- Citycat by Email
- Новости сайта VBNet
- Новости сайта VBMania
- Новости сайта Азбука VB
- Доска объявлений
- Вопрос/Ответ
Книги
Остальные книги о VB можно найти здесь.
наверх
Citycat by Email
Программа Citycat by Email позволяет работать с сервером Subscribe.ru с помощью электронной почты. Теперь Вам не нужно тратить деньги на работу в online и просматривать мегабайты рекламы для того, чтобы подписаться на нужную рассылку! Вам просто необходимо скачать небольшую базу данных по всем рассылкам каталога с нашего сайта, после чего Вы сможете подписываться и отписываться от рассылок, заказывать архивы прошлых выпусков, выполнять поиск по каталогу рассылок и многое другое.
Программу Citycat by Email можно бесплатно загрузить с сайта http://sapisoft.h1.ru.
наверх
Новости сайта VBNet
Последние 20 тем форума на VBNet.Ru:
07:51 / 8 июн. ВНИМАНИЕ! Завтра будет новый форум! | Ответов: 3
02:44 / 8 июн. Два вопроса по внешним DLL (+) | Ответов: 1
01:48 / 8 июн. Наследование | Ответов: 1
20:15 / 7 июн. Сортировка базы | Ответов: 2
15:37 / 7 июн. Как через API вытащить размер каталога. | Ответов: 1
15:30 / 7 июн. Help NetShareEnum | Ответов: 1
15:23 / 7 июн. Crystal Report... HELP!!!! | Ответов: 3
13:48 / 7 июн. Private, Public и др. | Ответов: 2
12:31 / 7 июн. DataReport | Ответов: 1
01:41 / 7 июн. Должен же быть способ лучше? (+) | Ответов: 1
15:51 / 23 мар. попробуй так | Ответов: 1
15:31 / 23 мар. zapusk ishodnikov s neta | Ответов: 0
09:27 / 23 мар. Error: Logon session doesn't exist | Ответов: 0
03:21 / 23 мар. Перекодировка текста WIN/DOS | Ответов: 1
03:03 / 23 мар. эй тут есть крутые или нет? | Ответов: 1
22:33 / 22 мар. Как минимизировать любое окно проги (игры)???? | Ответов: 0
20:59 / 22 мар. Outlook отправка почты | Ответов: 0
17:59 / 22 мар. Сортировка таблицы в базе данных | Ответов: 1
19:58 / 21 мар. Печать рисунка | Ответов: 0
14:32 / 21 мар. Точка и восклицательный знак | Ответов: 1
Последние поступления в Библиотеку кодов:
наверх
Новости сайта VBMania
наверх
Новости сайта Азбука VB
наверх
Доска объявлений
наверх
Мои программы
BalloonMessage for MS Agent
Автор: Шатрыкин Иван. Соавтор: Павел Сурменок.
наверх
Вопрос/Ответ
Автор вопроса: AngySacin
Ответ ожидается по этому адресу
Можно ли програмно вставить сообщение в папку "Исходящие" Outlook Express(не Microsoft Outlook!)? (VB6)
Автор вопроса: Виталий
Ответ ожидается по этому адресу
Здравствуйте, подскажите, как средствами VB просмотреть изображение с видеовхода на видеокарте к которому подключен, скажем, видеомагнитофон. Или хотябы вывести картинку?
Автор вопроса: Alex
Ответ ожидается по этому адресу
Как сделать, чтобы с яапуском программы яапускалась моя программа (например, с InternetExplorer,Notepage или Soliter). Может есть какой-то ключ в реестре, или есть другой способ?
Ответы:
Вопрос:
У меня несколько вопросов (пишу на VBasice 3.0 и Visual Basic 6.0) :
1)Где можно найти программу для перевода из VB любой версии в DELPHI (желательно 6-версии)?
2)Как сделать , чтобы программа автоматически запускалась после загрузки КОМПа?
3) Как работать с реестром?
4) Допустим я нашел нужную мне функцию winAPI, как определить, какие к ней нужны константы и тд?
6)Можно ли сделать так, чтобы тому, кому я даю проги не надо было устанавливать VBasic 3.0 или 6.0 ?
Ответ:
Автор ответа: Kurt Haeldar
2. Эту прогу нужно будет прописать в автозагрузку.
4. Если работать с VB - то обязательно нужно заглянуть на сайт www.allapi.net. Там лежит прога API-Guide, очень удобный справочник по API функциям. В Дэлфи параметры функций можно узнать из справки, а вот список самих функций там все равно отсутствует.
6. Просто создать установочный пакет при помощи Setup Toolkit в самом VB. Другое дело, что SETUP для программы, которая делает всего лишь 2+2=5 :-))) этот SETUP будет весить никак не менее 2 с лишним Mb
Вопрос:
У меня несколько вопросов (пишу на VBasice 3.0 и Visual Basic 6.0) :
1)Где можно найти программу для перевода из VB любой версии в DELPHI (желательно 6-версии)?
2)Как сделать , чтобы программа автоматически запускалась после загрузки КОМПа?
3) Как работать с реестром?
4) Допустим я нашел нужную мне функцию winAPI, как определить, какие к ней нужны константы и тд?
6)Можно ли сделать так, чтобы тому, кому я даю проги не надо было устанавливать VBasic 3.0 или 6.0 ?
Ответ:
Автор ответа: Игорь Шаронов
1) скорее всего, нет такой
2) http://vbnet.ru/faq/showtopic.asp?id=355 или http://vbnet.ru/faq/showtopic.asp?id=182
6) сам пакет не надо устанавливать, достаточно установить пакет необходимым библиотек для запуска программ, написанных на ВБ6.0 весом около мегабайта. Если у пользователя Виндоуз-98, NT4.0 и выше, то ничего устанавливать не надо.
Вопрос:
У меня несколько вопросов (пишу на VBasice 3.0 и Visual Basic 6.0) :
1)Где можно найти программу для перевода из VB любой версии в DELPHI (желательно 6-версии)?
2)Как сделать , чтобы программа автоматически запускалась после загрузки КОМПа?
3) Как работать с реестром?
4) Допустим я нашел нужную мне функцию winAPI, как определить, какие к ней нужны константы и тд?
6)Можно ли сделать так, чтобы тому, кому я даю проги не надо было устанавливать VBasic 3.0 или 6.0 ?
Ответ:
Автор ответа: Кершенгольц Андрей
1) Мечтать не вредно. Однозначно перевести прогу с одного языка на другой вряд ли возможно. Все равно придется поработать ручками.
2) Самое простое - помести ее в группу Автозагрузка (StartUp). Или в реестре -
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
3) Через функции API. Если тебе хватит маленького кусочка реестра, то можно использовать функции VB (в VB 6.0 они точно есть, в 3.0 - не знаю) - GetSetting, SaveSetting и DeleteSetting. Они работают с веткой
HKEY_CURRENT_USER\Software\VB and VBA Program Setting
4) В VB 6.0 есть такая программулина (может встраиваться в оболочку) - API Text Viewer. Там все есть.
6) А создать инсталляцию через Package and Deployment Wizard слабо?
Вопрос:
Как использовать параметры в командной строке при загрузке программы, откомпилированной в EXE файл?
Ответ:
Автор ответа: Игорь Шаронов
Вам достаточно посмотреть здесь - http://vbnet.ru/faq/showtopic.asp?id=241 или здесь - http://vbnet.ru/faq/showtopic.asp?id=176
Вопрос:
Как использовать параметры в командной строке при загрузке программы, откомпилированной в EXE файл?
Ответ:
Автор ответа: Real
dim CmdLine as string
CmdLine = Command()
' В CmdLine хранятся параметры командной строки
Вопрос:
Как использовать параметры в командной строке при загрузке программы, откомпилированной в EXE файл?
Ответ:
Автор ответа: Анатолий
Для того, чтобы обработать параметр, заданный в командной строке, в нужном месте(например, при открытии формы программы) необходимо использовать функцию Command().
Dim strComm As String
StrComm = Command()
После этого в strComm окажется строка параметров запуска, ее и надо использовать...
Вопрос:
Как использовать параметры в командной строке при загрузке программы, откомпилированной в EXE файл?
Ответ:
Автор ответа: Кершенгольц Андрей
В VB есть такая функция - Command (Command$). Первая возвращает командную строку в переменную типа Variant, вторая - в пеерменную типа String. Ну а дальше уже дело техники.
Вопрос:
Пишу программу, где по ходу яаполнения списка сояда?тся динамический массив. На каждый элемент списка-один массив.Элементов может быть сколько угодно.Как давать имена таким массивам? По идее List1.List(i)в цикле, но на такие имена VB ругается.
Ответ:
Автор ответа: Анатолий
Вот небольшая иллюстрация: на форме два листбокса и кнопка
Private Sub Command1_Click()
Dim i As Integer
Dim iList() As String
For i = 1 To 10
List1.AddItem Str$(i)
Next
ReDim iList(List1.ListCount)
For i = 0 To List1.ListCount - 1
iList(i + 1) = List1.List(i)
Next
For i = 1 To UBound(iList)
List2.AddItem iList(i)
Next
End Sub
Масссив объявлен без размерности, затем переопределен через Redim. Если нечто подобное делать после каждого обновления листвокса, то в массиве iList() всегда будет свежая инфа... Если нужно создавать именно массивы, а не элементы, то надо объявить массив массивов :-) через пользовательский тип, ну, примерно
Type Mass
UserMas(10) As String
End Type
Dim iList() as Mass
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Kurt Haeldar
Если меняет свое местоположение прога, то придется указывать полностью имя файла, который надо открыть.
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Ivan
Если запускаемый exe файл лежит в той же директории, что и текстовый файл, то:
App.path & “\a.txt”
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Мунгалов Андрей
для этого есть функция App.Path
возвращает путь откуда была запущена программа, одно замечание возвращенный путь не содержит на конце знак "\" его нужно добавить самостоятельно например так:
progpath = App.Path & "\"
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Анатолий
Есть в VB6 параметр App.Path(дает путь к папке запущенного приложения) -
strPath = App.Path & ["\" & ]"A.txt"
То что в [] может и не понадобиться - надо проверять последний символ App.Path, и если это не "\", тогда ее добавить.
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Ewgeniy
Чтобы узнать место расположения программы:
MsgBox App.Path
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Real
Команда App.path возвращает директорий откуда запускается программа. Но только нужно будет обработать два варианта, так как команда возвращает директорий либо со слэшем в конце либо без него, это зависит от того где лежит эзешка , в корне дисков С:\ или D:\ и т.п. или же в какой либо директории C:\xxx\ccc ....
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Иван
Используй app.path - даёт путь своей проги
То есть имя твоего A.TXT = app.path & "\a.txt"
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Кершенгольц Андрей
App.Path возвращает путь к каталогу с программой (без символа "\")
Вопрос:
1.Как проследить яапуск конкретной программы?
2.Как получить список открытых программ?
Ответ:
Автор ответа: Ivan
Получение заголовка всех запущенных приложений.
Public Declare Function GetDesktopWindow Lib "user32" () As Long
Public Declare Function GetWindow Lib "user32" (ByVal hwnd As Long, ByVal wCmd As Long) As Long
Public Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Public Declare Function GetWindowTextLength Lib "user32" Alias "GetWindowTextLengthA" (ByVal hwnd As Long) As Long
Public Const GW_HWNDFIRST = 0
Public Const GW_HWNDLAST = 1
Public Const GW_HWNDNEXT = 2
Public Const GW_HWNDPREV = 3
Public Const GW_OWNER = 4
Public Const GW_CHILD = 5
Использование: Поместите на форму объекты ListBox1 и CommandButton1. В модуле формы поместите следующий код:
Private Sub Command1_Click()
Dim hwnd&
Dim dummy&
Dim strCaption$
List1.Clear
' Рабочий стол - самое первое окно
hwnd& = GetDesktopWindow()
' Первое дочернее окно - окно первого уровня
hwnd& = GetWindow(hwnd&, GW_CHILD)
' Теперь получим заголовки окон всех уровней
Do
dummy& = GetWindowTextLength(hwnd&)
If dummy <> 0 Then
strCaption = String(dummy + 1, " ")
dummy = GetWindowText(hwnd&, strCaption, dummy + 1)
List1.AddItem strCaption
End If
hwnd& = GetWindow(hwnd&, GW_HWNDNEXT)
Loop While hwnd& <> 0
End Sub
Вопрос:
как можно назначить hotkey, для вызова проги, т.е. я свернул её в трэй и мне надо её вызвать.
Ответ:
Автор ответа: Игорь Шаронов
Ответ на ваш вопрос вы можете найти здесь - http://vbnet.ru/faq/showtopic.asp?id=172
Вопрос:
1) Есть прога убирающая с экрана значки, а как убрать значки из Панели Задач.
2) Как програмно изменить разрешение экрана.
Ответ:
Автор ответа: Игорь Шаронов
2) Ответ смотрите тут - http://vbnet.ru/faq/showtopic.asp?id=130
Вопрос:
Как отключить клавиатуру?
Ответ:
Автор ответа: Игорь Шаронов
Только глобально...
Предупреждение: после запуска этого кода для активизации клавиатуры вам надо перезагрузить компьютер
Shell "rundll32 keyboard,disable"
Вопрос:
Подскажите как объявлять перечисления на VB_6.0.
Ответ:
Автор ответа: Кершенгольц Андрей
Через Enum. Например:
Public Enum asd
asd1 = 0
asd2 = 27
asd3 = 6678
End Enum
Можешь объявить переменные, например
Dim sdf As asd
Можете заполнить эту форму, либо отослать вопрос СЮДА
Форма для добавления нового вопроса в этот раздел. Информация отсылается по E-mail владельцу сайта.
наверх
|
Переход на VB .NET. Стратегии, концепции, код (цена ~ 158 руб.) Эта книга была задумана как одна из первых книг о.NET, которая ознакомит читателя с основными идеями новой архитектуры и подготовит его к знакомству с более детальной литературой, например документацией Microsoft и ее толкованиями, которая неизбежно появится на рынке. Она поможет вам взглянуть на эту технологию с позиций ваших собственных рабочих планов и быстро освоить те концепции, которые покажутся необычными для большинства прогр... |
||
|
Автор(ы): Дан Эпплман, Издательство: Питер, 2002 г.
|
|||
|
Программирование на VB.NET. Учебный курс (цена ~ 119 руб.)
Эта книга является вводным курсом по
изучению языка программирования Visual Basic .NET.
Даны основные принципы объектно-ориентированного
программирования в контексте языка VB .NET,
поскольку без хорошей подготовки в этой
области невозможно в полной мере
пользоваться всеми преимуществами VB .NET. |
||
|
Автор(ы): Г. Корнелл, Дж. Моррисон, Издательство: Питер, 2002 г.
|
|||
|
VB.NET для разработчиков (цена ~ 125 руб.) Основная задача книги - быстро ознакомить разработчиков Visual Basic с изменениями в .NET Framework. Программисты, использующие Java, C++, Delphi или другие инструменты разработки приложений и интересующиеся Visual Basic или технологией .NET Framework, также найдут эту книгу полезной. Хотя книга посвящена Visual Basic.NET, ее основная цель - продемонстрировать взаимодействие Visual Basic и ... |
||
|
Автор(ы): Кит Франклин, Издательство: Вильямс, 2002 г.
|
|||
Остальные книги о VB можно найти здесь.
наверх
Citycat by Email
Программа Citycat by Email позволяет работать с сервером Subscribe.ru с помощью электронной почты. Теперь Вам не нужно тратить деньги на работу в online и просматривать мегабайты рекламы для того, чтобы подписаться на нужную рассылку! Вам просто необходимо скачать небольшую базу данных по всем рассылкам каталога с нашего сайта, после чего Вы сможете подписываться и отписываться от рассылок, заказывать архивы прошлых выпусков, выполнять поиск по каталогу рассылок и многое другое.
Программу Citycat by Email можно бесплатно загрузить с сайта http://sapisoft.h1.ru.
наверх
Новости сайта VBNet
|
Дата: 06.06.2002 06:14 | Раздел: Примеры кода | Автор: Перминов Андрей |
|
WinampAPI - Если вы еще не видели ни одного примера управления Winamp'ом из собственной программы - тогда вот первый, к тому же в нем новый класс WinampAPI, в котором реализованы основные функции управления этого замечательного агрегата, живущего почти что в каждом компьютере. |
|
Дата: 04.06.2002 06:12 | Раздел: Примеры кода | Автор: Черенков Дмитрий |
|
HorsReb - Программа для блокирования перезагрузки и выключения компьютера программным способом. Когда программе приходит сообщение о закрытии, она сопротивляется и просит ввести пароль. Пароль сохраняет в реестре. При несанкционированном доступе заносит его в журнал. Единственный недостаток, в Windows NT, XP, 2000 прогу можно убить CTRL-ALT-DEL. |
|
Дата: 02.06.2002 06:16 | Раздел: Примеры кода | Автор: Неизвестный автор |
|
AutoEnter - Пример как можно организовать автозавершение ввода текста в ListBox. Все сделано очень грамотно и, самое главное, работает. Обязательно посмотрите это очень интересный пример. |
Последние 20 тем форума на VBNet.Ru:
07:51 / 8 июн. ВНИМАНИЕ! Завтра будет новый форум! | Ответов: 3
02:44 / 8 июн. Два вопроса по внешним DLL (+) | Ответов: 1
01:48 / 8 июн. Наследование | Ответов: 1
20:15 / 7 июн. Сортировка базы | Ответов: 2
15:37 / 7 июн. Как через API вытащить размер каталога. | Ответов: 1
15:30 / 7 июн. Help NetShareEnum | Ответов: 1
15:23 / 7 июн. Crystal Report... HELP!!!! | Ответов: 3
13:48 / 7 июн. Private, Public и др. | Ответов: 2
12:31 / 7 июн. DataReport | Ответов: 1
01:41 / 7 июн. Должен же быть способ лучше? (+) | Ответов: 1
15:51 / 23 мар. попробуй так | Ответов: 1
15:31 / 23 мар. zapusk ishodnikov s neta | Ответов: 0
09:27 / 23 мар. Error: Logon session doesn't exist | Ответов: 0
03:21 / 23 мар. Перекодировка текста WIN/DOS | Ответов: 1
03:03 / 23 мар. эй тут есть крутые или нет? | Ответов: 1
22:33 / 22 мар. Как минимизировать любое окно проги (игры)???? | Ответов: 0
20:59 / 22 мар. Outlook отправка почты | Ответов: 0
17:59 / 22 мар. Сортировка таблицы в базе данных | Ответов: 1
19:58 / 21 мар. Печать рисунка | Ответов: 0
14:32 / 21 мар. Точка и восклицательный знак | Ответов: 1
Последние поступления в Библиотеку кодов:
наверх
Новости сайта VBMania
- 15.04 - В связи с резким увеличением числа вопросов, поступающих на e-mail администрации сайта, было решено не дожидаться открытия форума, и начать отвечать на вопросы прямо на главной странице. Обсуждению последней новости ответы на вопросы не помешают. Вашего совета ждут, на ваш вопрос ответят.
- 25.01 - Сегодня открылся новый раздел, в котором вы можете найти ссылки на целую кучу книг по тематике VB и около него.
- 22.01 - 22 января вышел второй номер он-лайн журнала о Visual Basic 'VB Мания'. В нем можно почитать авторские статьи в уже устоявшихся разделах: Технологии, Система, Графика, Профессия, Человечество и Юмор. Так же не обошлось без новшеств: появился новый раздел dotNET и особенно рецензии ActiveX-компонентов. Обязательно заходите.
- 17.12 - В связи с тем что форум не горел желаением вести себя так, как должен обычный, порядочный форум, мы его прикрыли для проведения разъяснительных мероприятий. Надеемся, что они не затянутся и форум образумится.
- 06.12 - С сегодняшнего дня все желающие могут добавлять свои новости и статьи в наши архивы.
Да здраствует открытость! - 27.11 - Наконец-то, после долгих дней и бессонных ночей это свершилось! Сайт объявляется открытым! Непременно прочитайте первый номер нашего журнала. Оцените наши дополнительные проекты. И конечно мы ждем ваших откликов в гостевой книге и по почте.
- 01.12 - Произошло несколько косметических улучшений, касающихся исключительно удобства работы с сайтом. Во-первых, можно видеть количество записей обсуждения новостей на главной странице; а во-вторых чуточку подправились директории.
Оценяйте!
наверх
Новости сайта Азбука VB
- 1 мая 2001 года
Представление всех компрьютеров в сети (сетевое окружение). Показывается, как можно представить все компрьютеры в сети и сетевое окружение. Показывает все сервера, совместно используемые ресурсы и принтеры в данной сети. Используются Api-функции WNetOpenEnum, WNetEnumResource и WNetCloseEnum.
Пример смены `Региональных Установок` с помощью Sendkeys, без применения API функций (Win95/98). Показывается, как можно произвести смену Региональных Установок с помощью Sendkeys, без применения API функций (Win95/98)
Пример отправки сообщений в локальной сети - NT/Win2000. Показывается, как можно отправлять сообщения на компьютеры находящиеся в локальной сети. Используются API-функции NetMessageBufferSend, GetUserName, GetComputerName.
Отправка писем с Attach и без него на основе MAPI. Отправка писем с Attach и без него на основе MAPI. Используется Microsoft MAPI Controls 6.0
Kак в VBA сделать чтобы картинка, либо другое окно появлялось после запуска макроса и через некоторое время сама закрывалась. Показывается, как в VBA сделать чтобы картинка, либо другое окно появлялось после запуска макроса и через некоторое время сама закрывалась.
Полоска подчеркивающая меню - 3 (динамика). Дается совет, как сделать динамическую полоску подчеркивающую меню.
наверх
Доска объявлений
Ищу телеработу.
- Переводы: английский, украинский, русский.
- Cipper программист.
- Assembler программист.
- PIC разработчик
- композитор
- Прогрессивные стили
- 3D анимация
- GIF анимация
наверх
Мои программы
BalloonMessage for MS Agent
BalloonMessage for Microsoft Agent реализует диалог программы с
пользователем, используя при этом технологию Microsoft Agent. OCX реализует три
типа диалоговых окон: InputBox, MsgBox и MsgLabels.
Автор: Шатрыкин Иван. Соавтор: Павел Сурменок.
наверх
Вопрос/Ответ
Здесь Вы можете задать вопрос, или ответить на уже имеющиеся вопросы.
Вопросы:Автор вопроса: AngySacin
Ответ ожидается по этому адресу
Можно ли програмно вставить сообщение в папку "Исходящие" Outlook Express(не Microsoft Outlook!)? (VB6)
Автор вопроса: Виталий
Ответ ожидается по этому адресу
Здравствуйте, подскажите, как средствами VB просмотреть изображение с видеовхода на видеокарте к которому подключен, скажем, видеомагнитофон. Или хотябы вывести картинку?
Автор вопроса: Alex
Ответ ожидается по этому адресу
Как сделать, чтобы с яапуском программы яапускалась моя программа (например, с InternetExplorer,Notepage или Soliter). Может есть какой-то ключ в реестре, или есть другой способ?
Ответы:
Вопрос:
У меня несколько вопросов (пишу на VBasice 3.0 и Visual Basic 6.0) :
1)Где можно найти программу для перевода из VB любой версии в DELPHI (желательно 6-версии)?
2)Как сделать , чтобы программа автоматически запускалась после загрузки КОМПа?
3) Как работать с реестром?
4) Допустим я нашел нужную мне функцию winAPI, как определить, какие к ней нужны константы и тд?
6)Можно ли сделать так, чтобы тому, кому я даю проги не надо было устанавливать VBasic 3.0 или 6.0 ?
Ответ:
Автор ответа: Kurt Haeldar
2. Эту прогу нужно будет прописать в автозагрузку.
4. Если работать с VB - то обязательно нужно заглянуть на сайт www.allapi.net. Там лежит прога API-Guide, очень удобный справочник по API функциям. В Дэлфи параметры функций можно узнать из справки, а вот список самих функций там все равно отсутствует.
6. Просто создать установочный пакет при помощи Setup Toolkit в самом VB. Другое дело, что SETUP для программы, которая делает всего лишь 2+2=5 :-))) этот SETUP будет весить никак не менее 2 с лишним Mb
Вопрос:
У меня несколько вопросов (пишу на VBasice 3.0 и Visual Basic 6.0) :
1)Где можно найти программу для перевода из VB любой версии в DELPHI (желательно 6-версии)?
2)Как сделать , чтобы программа автоматически запускалась после загрузки КОМПа?
3) Как работать с реестром?
4) Допустим я нашел нужную мне функцию winAPI, как определить, какие к ней нужны константы и тд?
6)Можно ли сделать так, чтобы тому, кому я даю проги не надо было устанавливать VBasic 3.0 или 6.0 ?
Ответ:
Автор ответа: Игорь Шаронов
1) скорее всего, нет такой
2) http://vbnet.ru/faq/showtopic.asp?id=355 или http://vbnet.ru/faq/showtopic.asp?id=182
6) сам пакет не надо устанавливать, достаточно установить пакет необходимым библиотек для запуска программ, написанных на ВБ6.0 весом около мегабайта. Если у пользователя Виндоуз-98, NT4.0 и выше, то ничего устанавливать не надо.
Вопрос:
У меня несколько вопросов (пишу на VBasice 3.0 и Visual Basic 6.0) :
1)Где можно найти программу для перевода из VB любой версии в DELPHI (желательно 6-версии)?
2)Как сделать , чтобы программа автоматически запускалась после загрузки КОМПа?
3) Как работать с реестром?
4) Допустим я нашел нужную мне функцию winAPI, как определить, какие к ней нужны константы и тд?
6)Можно ли сделать так, чтобы тому, кому я даю проги не надо было устанавливать VBasic 3.0 или 6.0 ?
Ответ:
Автор ответа: Кершенгольц Андрей
1) Мечтать не вредно. Однозначно перевести прогу с одного языка на другой вряд ли возможно. Все равно придется поработать ручками.
2) Самое простое - помести ее в группу Автозагрузка (StartUp). Или в реестре -
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run
3) Через функции API. Если тебе хватит маленького кусочка реестра, то можно использовать функции VB (в VB 6.0 они точно есть, в 3.0 - не знаю) - GetSetting, SaveSetting и DeleteSetting. Они работают с веткой
HKEY_CURRENT_USER\Software\VB and VBA Program Setting
4) В VB 6.0 есть такая программулина (может встраиваться в оболочку) - API Text Viewer. Там все есть.
6) А создать инсталляцию через Package and Deployment Wizard слабо?
Вопрос:
Как использовать параметры в командной строке при загрузке программы, откомпилированной в EXE файл?
Ответ:
Автор ответа: Игорь Шаронов
Вам достаточно посмотреть здесь - http://vbnet.ru/faq/showtopic.asp?id=241 или здесь - http://vbnet.ru/faq/showtopic.asp?id=176
Вопрос:
Как использовать параметры в командной строке при загрузке программы, откомпилированной в EXE файл?
Ответ:
Автор ответа: Real
dim CmdLine as string
CmdLine = Command()
' В CmdLine хранятся параметры командной строки
Вопрос:
Как использовать параметры в командной строке при загрузке программы, откомпилированной в EXE файл?
Ответ:
Автор ответа: Анатолий
Для того, чтобы обработать параметр, заданный в командной строке, в нужном месте(например, при открытии формы программы) необходимо использовать функцию Command().
Dim strComm As String
StrComm = Command()
После этого в strComm окажется строка параметров запуска, ее и надо использовать...
Вопрос:
Как использовать параметры в командной строке при загрузке программы, откомпилированной в EXE файл?
Ответ:
Автор ответа: Кершенгольц Андрей
В VB есть такая функция - Command (Command$). Первая возвращает командную строку в переменную типа Variant, вторая - в пеерменную типа String. Ну а дальше уже дело техники.
Вопрос:
Пишу программу, где по ходу яаполнения списка сояда?тся динамический массив. На каждый элемент списка-один массив.Элементов может быть сколько угодно.Как давать имена таким массивам? По идее List1.List(i)в цикле, но на такие имена VB ругается.
Ответ:
Автор ответа: Анатолий
Вот небольшая иллюстрация: на форме два листбокса и кнопка
Private Sub Command1_Click()
Dim i As Integer
Dim iList() As String
For i = 1 To 10
List1.AddItem Str$(i)
Next
ReDim iList(List1.ListCount)
For i = 0 To List1.ListCount - 1
iList(i + 1) = List1.List(i)
Next
For i = 1 To UBound(iList)
List2.AddItem iList(i)
Next
End Sub
Масссив объявлен без размерности, затем переопределен через Redim. Если нечто подобное делать после каждого обновления листвокса, то в массиве iList() всегда будет свежая инфа... Если нужно создавать именно массивы, а не элементы, то надо объявить массив массивов :-) через пользовательский тип, ну, примерно
Type Mass
UserMas(10) As String
End Type
Dim iList() as Mass
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Kurt Haeldar
Если меняет свое местоположение прога, то придется указывать полностью имя файла, который надо открыть.
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Ivan
Если запускаемый exe файл лежит в той же директории, что и текстовый файл, то:
App.path & “\a.txt”
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Мунгалов Андрей
для этого есть функция App.Path
возвращает путь откуда была запущена программа, одно замечание возвращенный путь не содержит на конце знак "\" его нужно добавить самостоятельно например так:
progpath = App.Path & "\"
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Анатолий
Есть в VB6 параметр App.Path(дает путь к папке запущенного приложения) -
strPath = App.Path & ["\" & ]"A.txt"
То что в [] может и не понадобиться - надо проверять последний символ App.Path, и если это не "\", тогда ее добавить.
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Ewgeniy
Чтобы узнать место расположения программы:
MsgBox App.Path
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Real
Команда App.path возвращает директорий откуда запускается программа. Но только нужно будет обработать два варианта, так как команда возвращает директорий либо со слэшем в конце либо без него, это зависит от того где лежит эзешка , в корне дисков С:\ или D:\ и т.п. или же в какой либо директории C:\xxx\ccc ....
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Иван
Используй app.path - даёт путь своей проги
То есть имя твоего A.TXT = app.path & "\a.txt"
Вопрос:
Программа должна открыть файл A.TXT в своем каталоге. Как это осуществить, если путь к программе меняется?
Ответ:
Автор ответа: Кершенгольц Андрей
App.Path возвращает путь к каталогу с программой (без символа "\")
Вопрос:
1.Как проследить яапуск конкретной программы?
2.Как получить список открытых программ?
Ответ:
Автор ответа: Ivan
Получение заголовка всех запущенных приложений.
Public Declare Function GetDesktopWindow Lib "user32" () As Long
Public Declare Function GetWindow Lib "user32" (ByVal hwnd As Long, ByVal wCmd As Long) As Long
Public Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Public Declare Function GetWindowTextLength Lib "user32" Alias "GetWindowTextLengthA" (ByVal hwnd As Long) As Long
Public Const GW_HWNDFIRST = 0
Public Const GW_HWNDLAST = 1
Public Const GW_HWNDNEXT = 2
Public Const GW_HWNDPREV = 3
Public Const GW_OWNER = 4
Public Const GW_CHILD = 5
Использование: Поместите на форму объекты ListBox1 и CommandButton1. В модуле формы поместите следующий код:
Private Sub Command1_Click()
Dim hwnd&
Dim dummy&
Dim strCaption$
List1.Clear
' Рабочий стол - самое первое окно
hwnd& = GetDesktopWindow()
' Первое дочернее окно - окно первого уровня
hwnd& = GetWindow(hwnd&, GW_CHILD)
' Теперь получим заголовки окон всех уровней
Do
dummy& = GetWindowTextLength(hwnd&)
If dummy <> 0 Then
strCaption = String(dummy + 1, " ")
dummy = GetWindowText(hwnd&, strCaption, dummy + 1)
List1.AddItem strCaption
End If
hwnd& = GetWindow(hwnd&, GW_HWNDNEXT)
Loop While hwnd& <> 0
End Sub
Вопрос:
как можно назначить hotkey, для вызова проги, т.е. я свернул её в трэй и мне надо её вызвать.
Ответ:
Автор ответа: Игорь Шаронов
Ответ на ваш вопрос вы можете найти здесь - http://vbnet.ru/faq/showtopic.asp?id=172
Вопрос:
1) Есть прога убирающая с экрана значки, а как убрать значки из Панели Задач.
2) Как програмно изменить разрешение экрана.
Ответ:
Автор ответа: Игорь Шаронов
2) Ответ смотрите тут - http://vbnet.ru/faq/showtopic.asp?id=130
Вопрос:
Как отключить клавиатуру?
Ответ:
Автор ответа: Игорь Шаронов
Только глобально...
Предупреждение: после запуска этого кода для активизации клавиатуры вам надо перезагрузить компьютер
Shell "rundll32 keyboard,disable"
Вопрос:
Подскажите как объявлять перечисления на VB_6.0.
Ответ:
Автор ответа: Кершенгольц Андрей
Через Enum. Например:
Public Enum asd
asd1 = 0
asd2 = 27
asd3 = 6678
End Enum
Можешь объявить переменные, например
Dim sdf As asd
Можете заполнить эту форму, либо отослать вопрос СЮДА
Форма для добавления нового вопроса в этот раздел. Информация отсылается по E-mail владельцу сайта.