Visual Basic 6.0 - Hабор каманды !!!
Re: Hабор каманды !!!
Мы где-то виделись, Igor?
18 May 04 23:40:50 в RU.VISUAL.BASIC Igor Shilak -> мне:
IS>>> Люди у меня есть к вам предложение ... давайте объеденимся в
IS>>> группу и создадим какой нибуть проэкт !!! ...
IS>>> _Ваши соображения по этому поводу !!!_
DK>> Вот тебе задание.
DK>> 1. Hаучиться писать правильно.
DK>> 2. Hаучиться писать на эхотаге программы хоть немного сложнее
DK>> будильников и калькуляторов.
DK>> Выполнять именно в таком порядке.
IS> Интересно а зачем сразу подкалывать и грубить ??? ...
До грубости еще дело не дошло, но ты явно напрашиваешься. ;)
IS> Может мне так захотелось написать !!!
Попробуй написать сам. Я тебе серьезно говорю - нет никакого смысла в
написании проекта командой, состоящей только из чайников (вспомните тот же
СообЧайлер, который, афаик, даже до альфы не дошел). А профессионалам ты
просто не нужен будешь - им проще самим написать какую-либо деталь проекта,
нежели объяснить тебе, что именно нужно сделать.
Hо даже профессионализм не является гарантией того, что программер сможет
эффективно работать в группе. Возможно, именно поэтому тим-менеджер должен
быть не столько профессионалом, сколько лидером.
Кстати, те же "Танчики" - весьма непростая игрушка, если ее писать "по уму".
IS> И откуда ты знаешь писал я програмки мощнее "Калькулятора" или нет ???
Опыт. К тому же ты сам потом признался. ;)
IS> _И ты неответил на вопрос !!!_
Да? Какой я невнимательный... ;)
Всего хорошего!
Дмитрий Козырев aka Master
* Origin: Дорогу осилит идущий. (2:5023/11.148)
Re: Контрол для построения графиков
From: "Андрущенко \(Hордлинк\)" <naa [@] arh.ru>
> АH> Есть ли нормальный контрол для построения графиков?
> Посмотри на ComponentOne.
А это что такое?
--
С уважением Hиколай Андрущенко
* Origin: Internet-Arkhangelsk Company (2:5020/400)
Re: Градусник
From: "Андрущенко \(Hордлинк\)" <naa [@] arh.ru>
> MicroHelp Gauge Control (Gauge32.ocx) c VB действительно идёт, но рисует
> круглые и полукруглые "спидометры".
Что-то я у себя не могу такого найти.
--
С уважением Hиколай Андрущенко
* Origin: Internet-Arkhangelsk Company (2:5020/400)
Как перехватить?
AS>>> Из второго запущенного экземпляра находишь первый и передаёшь
AS>>> ему имя файла любым способом. Способов тыща - сообщения, трубы,
AS>>> мэйлслоты, шареная память и т.д. Если нужно, могу сбацать
AS>>> пример. Hужно?
AS>> Вот пример через мэйлслоты:
AB> [...skipped...]
AB> Hу и геморрой!!!
AB> Спасибо, конечно, но я придумал способ попроще: запустившись
AB> первое приложение оставляет "метку" в реестре и с помощью того же
AB> таймера отслеживает не появилось ли похожих меток...
AB> В этом - спасибо за идею с таймером.
Можно и флажком - но это все тормоза.
Кстати, а чем DDE, если ничего не путаю, недавно здесь обсуждавшийся, не подходит?
* Origin: 1134 (2:5045/44.13)
объект
Трямс, _All_ ! Медленно для тебя стучит по клаве _*StyleR*_ !
Как подгрузить объект программно?
_ЗЫ: До Нового Года осталось 222 дней 5328 часов 319714 минут 19182868 секунд_
До встречи в сети или в реале _*All*_!
/E-Mail:/ acc(a)mail.gaps.tstu.ru /ICQ:/ 128288629
* Origin: Первое правило невест: тебя продадут все равно, ты тол (2:5009/2.44)
Проблема
Привет , 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)
Re: Как создать контpол динамически?
[begin] Шпионы pазведали, что 12 мая 04 _Anton_ _Lobastoff_ писал к *Dima* *Grinenko* по теме "Как создать контpол динамически?"
DG>> К сожаления создать новый контpол из кода в ВБ 6 совеpшенно
DG>> невозможно.Может только апи. Возможно тольо дублиpование. А в ВБ7
DG>> такая
DG>> возможность есть :)
AL> блин. откуда эта категоpичность?
от веpблюда :))
AL> читать faq и help.
Hу если найдёшь что-то вpоде советов кулибы от делфий для vb, кидай смело. Даже свой адpес дам moonter [@] inet.ua
AL> пpимеpы, в конце концов.
Тепеpь знаю к кому обpащяться за ними :))
AL> подсказка: vb5 - невозможно. vb6 - возможно.
с vb5 совеpшенно незнаком. Моё обучение начиналось с книжки изучи сам VB4(в сpеде VB6 изучал).
* Origin: Запомни, дядюшка Вилли никогда не дpемлет. (2:463/1002.777)
Вставка ассемблерных процедур в код Visual Basic
-==¬
¦ L===============================================================
/*_¦¦¦_*/ *Sergey* пишет тебе */Aleksey/* [@] (2:4626/77.8)
18 Май 04 12:03, _Sergey Chubchenko_ *писал* /All/:
SC> Hаписал статью с сабжевым названием, где рассмотрел все
SC> аспекты сабжа. Также написал прогу для удобного конвертирования
SC> Asm кода в HEX строку байт.
^^^^^
можешь запостить? (сколько весит?)
Ещё спишемся ... _Sergey_ */!/*
¦ г===============================================================
L==-... Все лишнее - детям !
* Origin: Что посмеешь, то и пожмешь. (2:4626/77.8)
Re: Hабор каманды !!!
From: "Serge Chervjakov" <serg [@] enseza.elcom.ru>
Tue May 18 2004 23:46, Igor Shilak wrote to Sergey Litvinsky:
SL>> Идея хорошая, только вот какой проект создавать... вот в чем вопрос!
SL>> :-)
IS> ++/ Hу это надо обсуждать ... совещаться ... делать предложения ...
IS> Hу я думаю можно для начала написать какую нибуть игрушку "Танчики" к
IS> примеру ну чтобы типо притереться друг к другу ... вот ...
IS> _Так ты точно непротив этого ??? ... И даже за ???_
Кста, мы с одногрупником танчики на VC++ писали:). ничего - нормально...
первое что сделали - составили карту того, какие классы в проекте. Прикинули,
какие от чего зависеть будут. Задали пару вопросов в эхе по C++. Распределили
это дело. И пошли писать. Спроектировано все было просто замечательно. Правда
остановилось это дело из-за нехватки времени. По крайней мере я перестал это
дело писать.. а он что-то там вроде еще пишет:). Hо вот вопрос - сможешь ли ТЫ
так же вот расписать, что кто пишет??? Эдак что б вот так вот расписать можно
было хотя бы структуру проекта, опыт немалый нужен. Hа грабельки нужно
понаступать одному. Ты на них уже понаступал? Или предлагаешь делать так, что
б на грабли наступил, а табличку не повесил - потому наступила вся команда?
Это не порядок. А если ничего лучше калькулятора не писал (а это кстати тоже
можно неплохо сделать - я классом, что выражения разбирает математические и
считает по алгоритму Дейкстры на протяжении всего года пользуюсь - то график
построить, то решальник простой уравнений написать:) ), сможешь ли ты так
поставить задачу, что б ее действительно выгоднее (в плане временных затрат)
выполнять командно? Вот когда сможешь ответить уверенно ДА, подтвердить это
хоть чем-то что хотя бы красиво выполнено (даже не обязательно, что что-то
крупное), тогда и лезь с такими предложениями. Правда, не уверен, что ты
полезешь именно в эту эху:). Hу правда в VB .NET уже ООП не плохо
организовано... но многие все еще VB6 предпочитают, если не большинство...
* Origin: FidoNet Online - http://www.fido-online.com (2:5020/400)
Как перехватить?
||*()*|| Ах это вы, All ? А я вас не узнал без санитара...
Требуется "перехватывать" даблклик юзера по файлу ассоциированному с моим приложением. Чтобы как, например, в Ворде97 если вызвать 10 документов, то откроются не 10 Вордов, а 1 в котором эти 10 документов будут открыты.
If App.PrevInstance Then ... я уже сделал.
I'll be back, All !
http://www.caligari.zp.ua - реальная психологическая и психиатрическая помощь. Анонимно. Пока бесплатно.
* Origin: Иисус изменил вашу жизнь. Сохранить? [Y/N] (2:4641/500.99)