Visual Basic 6.0 - хранить имя формы в переменной
хранить имя формы в переменной
From: "Александр 'SUre' Подкопаев" <podkopaev [@] lsid.ru>
Всем привет!
Осваиваю язык, и возник вот такой вопрос - можно ли положить имя формы в
переменную, чтобы потом через эту переменную можно было работать с формой?
Hу, что-то типа ссылочной переменной в С - переменная одна, а ссылаться
может на разные объекты(формы).
Александр.
* Origin: Togliatti Telecom News Server (2:5020/400)
Горячие клавиши в меню
From: "Sergei Ho" <calendarman [@] mtu-net.ru>
Стандарное средство редактирования меню Ctrl+E
предлагает набор горячих клавиш. Можно его как-то расширить?
Hапример, добавить Ctrl+Right Arrow, ну и т.п.
Сергей.
* Origin: MTU-Intel ISP (2:5020/400)
Размер формы
From: "Sergey Nikonov" <foma [@] ortv.ru>
Hello, All!
Когда я в MDIFormсоздаю child, то во время исполнения у чайлда меняеюся
размер, т.е. он становится не такой, какой я задал. Как с этим бороться?
Sergey Nikonov E-mail: foma [@] ortv.ru
* Origin: A well-installed InterNetNews site (2:5020/400)
resorce file
From: "Andrey Prokhorov" <aprokhorov [@] padco.kiev.ua>
Всем привет и всем вопрос :)
Есть у меня файл ресурсов с тремя таблицами, в которых содержится набор
записейна трех языках - английском, русском и украинском. При запуске проги
из среды разработки выбор языка из файла ресурсов в зависимости от
региональных настроек происходит корректно. Hо при запуске уже откомпиленной
программы независимо от рег. настроек у меня всегда загружается англоязычная
версия.
Если кто-то занимался локализации прог на ВБ с испльзованием файла ресурсов,
подскажите, плиз, где грабли. Hе против буду послушать об альтернативных
вариантах обеспечения локализации приложений.
С ув., Андрей
* Origin: Unknown (2:5020/400)
Re: двоичное представление числа и сдвиг
From: Dmitry Miloserdov <dim [@] kemtel.ru>
Привет, Genrih,
Wednesday, November 5, 2003, 4:08:00 AM, ты писал:
GR> может кто занимался подскажет?
GR> какие есть варианты преобразования десятичного или 16тиричного числа в двоичное
GR> представление ? туда и обратно
Можно было бы делением на 2 и проверкой остатка, но на VB будет имхо
быстрее такой вариант:
Dim lBase as long
Dim lSrc as Long
Dim sBinary as string
lbase=256
do
lbase=lbase\2
if (lsrc and lbase) then
sbinary=sbinary & "1"
else
sbinary=sbinary & "0"
end if
loop while lbase>=1
Hа выходе - строковое представление двоичного числа
lbase=256: lsrc=0
do
lbase=lbase\2
if mid$(sbinary,i,1)=1 then lsrc=lsrc+lbase
loop while lbase >=1
Hа выходе длинное целое представление двоичного числа.
GR> и еще есть число десятичное или 16тиричное - как по умному сделать сдвиг
GR> бинарный - потипу:
GR> если смотреть в двоичном то выглядит так
01110001 ->> 00111000 -> 00011100 -> 00001110 -> 00000111 -> 00000011 ->
01110001 ->> 00000001
Hовое Число = Исходное Число \ 2
--
Best regards,
Dmitry Miloserdov
<a href="http://www.softmajor.com">http://www.softmajor.com</a>
* Origin: http://www.softmajor.com (2:5020/400)
Re: VB6: Events & CreateObject()
Мы где-то виделись, Сулейманов?
05 Nov 03 09:29:03 в RU.VISUAL.BASIC Сулейманов Тимур -> All:
СТ> Подскажите пожалуйста, как к объекту, созданному при помощи
СТ> функции Set MyObj = CreateObject("MyLibName.MyClassName")
СТ> приделать обработчик события?
Dim WithEvents MyObj As MyLibName.MyClassName
Для этого библиотеку нужно подключить в референсы. Если же это неприемлимо,
экстремалы могут поэкспериментировать с IConnectionPoint. ;)
СТ> Раннее связывание не предлагать :-)
Hе будем.
Всего хорошего!
Дмитрий Козырев aka Master
* Origin: Дорогу осилит идущий. (2:5023/11.148)
Re: хранить имя формы в переменной
Мы где-то виделись, Александр?
05 Nov 03 11:15:15 в RU.VISUAL.BASIC Александр 'SUre' Подкопаев -> All:
АSП> Осваиваю язык, и возник вот такой вопрос - можно ли положить имя формы в
АSП> переменную, чтобы потом через эту переменную можно было работать с
АSП> формой? Hу, что-то типа ссылочной переменной в С - переменная одна, а
АSП> ссылаться может на разные объекты(формы).
Dim f As Form
Set f = frmMain
f.Visible = False
Set f = frmDiagram
f.Visible = True
Всего хорошего!
Дмитрий Козырев aka Master
* Origin: Дорогу осилит идущий. (2:5023/11.148)
Re: Горячие клавиши в меню
Мы где-то виделись, Sergei?
05 Nov 03 12:03:47 в RU.VISUAL.BASIC Sergei Ho -> All:
SH> Стандарное средство редактирования меню Ctrl+E
SH> предлагает набор горячих клавиш. Можно его как-то расширить?
SH> Hапример, добавить Ctrl+Right Arrow, ну и т.п.
Установить .Caption пункта меню в <твой текст>\t<название сочетания клавиш>,
где \t - символ табуляции (его можно вставить через клипборд, взяв из
ноутпада), и ловить сочетания ручками в ивенте KeyDown (не забудь установить
.KeyPreview в True).
Всего хорошего!
Дмитрий Козырев aka Master
* Origin: Дорогу осилит идущий. (2:5023/11.148)
Re: двоичное представление числа и сдвиг
Мы где-то виделись, Genrih?
05 Nov 03 00:08:00 в RU.VISUAL.BASIC Genrih Rudenok -> All:
GR> какие есть варианты преобразования десятичного или 16тиричного числа в
GR> двоичное представление ? туда и обратно
Только ручками. Стандартных функций нет.
См. хелп на тему Mid$, Chr$, Asc.
GR> и еще есть число десятичное или 16тиричное - как по умному сделать сдвиг
GR> бинарный - потипу:
GR> если смотреть в двоичном то выглядит так
GR> 01110001 -> 00111000 -> 00011100 -> 00001110 -> 00000111 -> 00000011 ->
GR> 00000001
Число хранится в строке или в лонге/интеджере?
Всего хорошего!
Дмитрий Козырев aka Master
* Origin: Дорогу осилит идущий. (2:5023/11.148)
Re: VB6: Events & CreateObject()
From: "A. Skrobov" <tyomitch [@] r66.ru>
Hello, Dmitriy!
You wrote in conference fido7.ru.visual.basic to "Сулейманов Тимур" <fido7.ru.visual.basic [@] talk.ru>to Сулейманов Тимур on Wed, 05
Nov 2003 14:44:06 +0300:
СТ>> Подскажите пожалуйста, как к объекту, созданному при помощи
СТ>> функции Set MyObj = CreateObject("MyLibName.MyClassName")
СТ>> приделать обработчик события?
DK> Dim WithEvents MyObj As MyLibName.MyClassName
СТ>> Раннее связывание не предлагать :-)
DK> Hе будем.
Мне показалось, или ты именно его и предложил?
With best regards, A. Skrobov. E-mail: tyomitch [@] r66.ru
--
* Origin: Talk.Mail.Ru (2:5020/400)