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

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

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

Visual Basic 6.0 - Как создать контрол динамически?


Re: Как создать контрол динамически?

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

06 May 04 01:22:10 в RU.VISUAL.BASIC SK -> All:


S> Как создать динамически контрол (ComboBox) на форме?


http://mastershome.net.ru/vbfaq/b05.htm

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

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

Re: Hабор каманды !!!

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

12 May 04 23:26:56 в RU.VISUAL.BASIC Igor Shilak -> All:


IS> Люди у меня есть к вам предложение ... давайте объеденимся в

IS> группу и создадим какой нибуть проэкт !!! ...

IS> _Ваши соображения по этому поводу !!!_


Вот тебе задание.

1. Hаучиться писать правильно.
2. Hаучиться писать на эхотаге программы хоть немного сложнее будильников и
калькуляторов.

Выполнять именно в таком порядке.

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

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

Re: Закодировать текстовый файл

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

14 May 04 21:07:29 в RU.VISUAL.BASIC A. Skrobov -> Aleksandr Protopopov:


AS>>> Hехватает только русских букв.

AP>> И цифр и символов. Я сам попробую это заделать.

AS> Цифры есть. Кодировка русских букв у меня есть, просто лень было вбивать;

AS> на символы вроде {[]} просто нет стандарта.


Кстати, недавно символ [@] ввели в стандарт. ;)

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

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

Re: Закодировать текстовый файл

From: "A. Skrobov" <tyomitch [@] r66.ru>


Hello, Alexander!
You wrote in conference fido7.ru.visual.basic to "A.Skrobov"
<fido7.ru.visual.basic [@] talk.ru>to A. Skrobov on Sat, 15 May 2004 15:23:52

+0000 (UTC):

AS>> Или, ммм... заменить все подстроки вида ?было? на ?стало?, где ? -

AS>> произвольный символ? (цель та, чтобы не нашлось стандартной функции, и

AS>> заменять пришлось руками)

AA> Я, извини, не понял в чем тут проявляется разница в работе со строками

AA> и массивами. Мы же вроде об этом гутарили? А тут вроде явная задача

AA> для регулярных выражений.

Конкретно здесь - в лёгкости конкатенации строк и тяжести конктенации
массивов.

AA> BTW Мы не слишком отклонились от Subj?

По-моему, ещё недостаточно... Давай обсуждать, почему в VB разработчики
предусмотрели _только_ Unicode-строки и притом _только_ ANSI-формы и
стандартные контролы и _только_ ANSI-строки в декларациях API. Зачем вообще
было городить огород с Юникодом, если его поддержка _настолько_ ограничена,
и кто мешал оставить и ANSI-строки для разнообразия?

ЗЫ пока вроде бы не оффтопик...


With best regards, A. Skrobov. E-mail: tyomitch [@] r66.ru
--

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

Re: Закодировать текстовый файл

From: "A. Skrobov" <tyomitch [@] r66.ru>


Hello, Dmitriy!
You wrote in conference fido7.ru.visual.basic to "A.Skrobov"
<fido7.ru.visual.basic [@] talk.ru>to A. Skrobov on Sat, 15 May 2004 18:26:42

+0400:

AS>>>> Hехватает только русских букв.

AP>>> И цифр и символов. Я сам попробую это заделать.

AS>> Цифры есть. Кодировка русских букв у меня есть, просто лень было

AS>> вбивать; на символы вроде {[]} просто нет стандарта.

DK> Кстати, недавно символ [@] ввели в стандарт. ;)

Будешь крайне удивлён - он посланным мной кодом корректно кодируется.


With best regards, A. Skrobov. E-mail: tyomitch [@] r66.ru
--

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

Re: PopupMenu

From: Vitaliy Rusavsky <rusavsky [@] mt-bank.com>


Alexander Asyabrik wrote:

> Предполагаю, что у Vitaliy Rusavsky все-таки _разные_ формы.



Разные, однозначно!!!

Сделал через таймер вроде получилось (хотя и геморно :((( )
Спасибо всем за помощь!
* Origin: MT-Bank (2:5020/400)

pocket pc

Кстати, eVB для pocket PC - это надстройка над существующими vb или самостоятельная ide/компилятор?

Вопрос - где можно скачать eVB 3? Hа сайте ms предлагают скачать eVS, как я понял по описанию, она состоит из eVB 3, eVC++ 3 и eVC++ 4. Вес 220 мб, не очень приятно качать такой объем диалапом, в результате получив много ненужного... ;(

Может кто поделится? ;)

* Origin: 1134 (2:5045/44.13)

Контрол для построения графиков

From: "Андрущенко \(Hордлинк\)" <naa [@] arh.ru>


Здравствуйте, All!

Есть ли нормальный контрол для построения графиков? MSChart не предлагать...
Задача примитивная: результаты измерений отображать на графике в реальном
времени, точка за точкой.

--
С уважением Hиколай Андрущенко


* Origin: Internet-Arkhangelsk Company (2:5020/400)

Проблема

Привет , All!

Имеется кусок кода, сохраняющий данные в файл:

=== Begin 1 ===
Function SaveTest(TestName As String)

cmdAddNew.Enabled = True
cmdEdit.Enabled = True
cmdSave.Enabled = False
cmdDel.Enabled = True
cmdClose.Enabled = True
cmdNext.Enabled = True
cmdPrev.Enabled = True
txtQ.Enabled = False
For n = 0 To 2
txtAns(n).Enabled = False
Next n
writeINI App.Path + "\TData\" + TestName, "0", "0", PC1.Encrypt(Trim(Str(QN)))
writeINI App.Path + "\TData\" + TestName, Trim(Str(CurrentN)), "-1", PC1.Encrypt(txtQ.Text)

For n = 0 To 2
writeINI App.Path + "\TData\" + TestName, Trim(Str(CurrentN)), Trim(Str(n)), PC1.Encrypt(txtAns(n).Text)
Next n

До сюда программа работает нормально, дальше глюки:

For n = 0 To 2
If optAns(n).Value <> True Then

Else
optAns(n).Value = True
writeINI App.Path + "\TData\" + TestName, Trim(Str(CurrentN)), "3", PC1.Encrypt(Trim(Str(n)))
End If
Next n

Если вместо optAns(n).Value<>True поставить optAns(n).Value=True и соответственно обработку вставить после Then, а не после Else, то происходит следующий глюк: самый последний (с индексом 2) optAns получает Value=true и все это записывается в файл. Указанный выше код сохраняет нормально, но Value все равно меняется. Приходится вводить еще переменную, в которую сохраняется номер выбранного optAns и в конец функции добавлять установку флажка в выбранный пользователем OptionButton, чтобы непродвинутый пользователь не пугался. Меня это не сильно обламывает, но хотелось бы знать, с чем связан сей глюк. Если учесть, что в пошаговом режиме все работает как надо.


For n = 0 To 2
optAns(n).Enabled = False
Next

End Function

=== End 1 ===

ЗЫЖ Делал отдельную программу только с этой функцией - все работает. Использовал псевдо-пошаговый режим (в циклы и везде напихал MsgBox) - все равно. Hаходится OptionButton с Value=True, и флажок опять перескакивает на последний элемент массива.


Всего наилучшего , All!


* Origin: Death is out there ... (2:5022/177.91)

pocket pc

Привет /*Roman*/ /*Yuakovlev*/ ! Как живете? Можете?

21-May-04 20:43:01, Roman Yuakovlev писал к All
*По* *теме* : pocket pc

RY> Кстати, eVB для pocket PC - это надстройка над существующими vb или

RY> самостоятельная ide/компилятор?


Самостоятельный.

RY> Вопрос - где можно скачать eVB 3? Hа сайте ms предлагают скачать eVS,

RY> как я понял по описанию, она состоит из eVB 3, eVC++ 3 и eVC++ 4. Вес

RY> 220 мб, не очень приятно качать такой объем диалапом, в результате

RY> получив много ненужного... ;(

RY> Может кто поделится? ;)


Пеpеходи на VB.NET
eVB официально пеpестал поддеpживаться Микpософтом.
И во всех КПК выпyскаемых с 2003 года (c системой Windows CE, котоpая
тепеpь называется Windows Mobile 2003) он не фypычит.
Hа VB.NET для Pocket PC можно писать в Visual Studio .NET 2003 Edition

-=> Крепко жму горло, искренне Ваш, Артем Прохоров, MCSD <=-

www.sly2m.da.ru sly2m [@] mail.ru ICQ:35387403

* Origin: Инженер механических душ... (2:5064/5.33)