Тестирование полезных кодов и примеров

Если Ваш код из темы Готовые решения и полезные коды на Visual Basic 6.0

неправильно собран или неработоспособен, он будет перенесен сюда.

Для доведения кода в рабочее состояние в порядке обсуждения создайте новую тему

2

Полупрозрачный *Диспетчер задач*.. ✰

что это?

И что означает безопасный список?

0

Dragokas, фигня какая-то. Никакой полезной ценности и куча ошибок.
https://www.cyberforum.ru/blog... g2134.html

0

Сообщение от Dragokas И что означает безопасный список?

ну это если, какую-то системную прогу, которую лучше не останавливать
программа будет вносить в отдельный список, и помнить

Добавлено через 2 минуты

Сообщение от Dragokas SendKeys "%{f4}"

а это вызывает клавишное выключение, там я как мог исправил
глюк при выходе из программы .. но это работает

Добавлено через 3 минуты
сам по себе код открытый, и удобный для понимания
я не претендую что там все правильно..
там кстати я так и не придумал, как отловить пункт меню
без использования отдельного модуля, так и не придумал
..ну тоесть приоритет ввести.., ну да ладно, и так сойдет

0

Сообщение от Антихакер32 а это вызывает клавишное выключение, там я как мог исправил глюк при выходе из программы .. но это работает

Стандартные средства никаких глюков не вызывают.
Видимо ты что-то не освобождаешь.
В моем случае обычного:
хватает.

Удивленно видеть SendKeys рядом с апишными функциями

0

Сообщение от Антихакер32 а это вызывает клавишное выключение, там я как мог исправил глюк при выходе из программы .. но это работает

Это глюк проектирования. Для чего цикл сообщений обрабатывать? Чтобы породить кучу ошибок? Разве не понятно что если это так работает, то это неправильно? Куча лишних вызовов вообще левых, для чего?

Сообщение от Антихакер32 ну да ладно, и так сойдет

Зачем тогда на обозрение выкладывать если и так сойдет?

0

Сообщение от Dragokas Удивленно видеть SendKeys рядом с апишными функциями

Для достижения результата, любой способ сгодиться, ..и слава богу что я про него вспомнил
обычно я такими примитивами не пользуюсь

0

Permission Denied тяжело не заметить.
В остальное особо не всматривался.
Удачи в разработке.

Заказы принимаешь?
Нужен один контрол.

Вроде FolderTreeview:
http://ccrp.mvps.org/index.htm... rpftv6.htm

Но нужно чтобы каждый файл (папку) можно было отметить галочкой.
Можно отметить или снять галочки сразу со всех файлов папки.
Возможность прокручивать дерево колесом мыши или стрелочками (полоса прокрутки).

Подобное дерево иногда в антивирусах используется, чтобы отметить проверяемые файлы.

При этом должна оставаться возможность самому строить дерево по своим критериям
(а не просто читать содержимое диска).

0

Сообщение от Dragokas Заказы принимаешь? Нужен один контрол. Вроде FolderTreeview:

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

Добавлено через 11 минут
..ну да вспомнил, я выстраивал подобные деревья
во всех случаях использовалась рекурсия, ну там еще надо
прорисовку чеков реализовать, а так в целом задачу понял
и у меня тоже есть подобные антивирусные программы

0

Сейчас думаю внести еще пару функций
в нативную DLL которую я уже выкладывал UbgradeVB
а именно возможность работы с оконными процедурами
..после чего всё что угодно можно будет сделать с окном ..
https://www.cyberforum.ru/post6316214.html

0

Этот код - недоделанный и опасный.
Некоторые баги - Как сделать DLL для VBA?
Для автора, читаем шапку темы

Сообщение от Dragokas Для доведения кода в рабочее состояние в порядке обсуждения создайте новую тему

0

Сообщение от The trick Этот код - недоделанный и опасный.

Ссылка невалидна (у меня).

0

Сообщение от Dragokas Ссылка невалидна (у меня).

40-й пост в этой теме

0

40-й пост темы примеров это выложенный мною Api Viewer, при чем не мой.
Бери всегда ссsлку с цифры, рядом с словом "permlink", а то не понятно о чем речь.

Добавлено через 1 минуту
А все. Понял. Этой темы, значит конкретно этой

0

Ссылку обновил (с цифры взял, а не с permalink'а)

0

Помогите найти пользователя 8iclass (забыл как правильно его ник).
У него были интересные темы. (Sorry за оффтоп, не знаю, где еще спросить).

0

Сообщение от Dragokas Помогите найти пользователя 8iclass (забыл как правильно его ник). У него были интересные темы. (Sorry за оффтоп, не знаю, где еще спросить).

https://www.cyberforum.ru/members/331143.html

1

Антихакер32, а разрешение у автора на модификацию его кода не забыл спросить?

Сообщение от Антихакер32 Option Explicit ' ' © Кривоус Анатолий Анатольевич (The trick), 2014 ' Модифицированно Антихакер32 (CyberForum.ru) ' Класс, для использования DLL и OCX без регистрации '

Это как понимать?
Получается код изменил ты, а по шапке, как будто это код от автора.
Это шантаж?
Или я даже подходящего слова не могу подобрать для такого тяжелого случая.

0

Нет, авторство его, я только правку сделал, но все придумал The Trick

0

Антихакер32, ты сделал нерабочим код. Почему ты игнорируешь мои советы? Я тебе сказал почитать книжку сначала прежде чем что-то делать. Попробуй создать объект из zipfldr? Что облом? Попробуй создать своим кодом любой объект без библиотеки типов внутри. А попробуй напиши так myClass.CreateObject_Int("stdole2.tlb")? Что случилось? Библиотека типов то загрузилась, классы есть, а почему то объекты не создаются? Короче кури доки сначала. Я не против усовершенствования моих кодов, но это должно быть нормальное усовершенствование, и без всяких лишних библиотек типа tlbinf32, когда можно сделать намного проще через ITypeLib, ITypeInfo.
И еще - ПРЕКРАТИ РЕДАКТИРОВАТЬ ПОСТ КАЖДЫЕ 5 СЕКУНД! Подписчикам раздела куча сообщений приходит из-за тебя ненужных.
Кстати я тебе писал откуда можно взять CLSID. VB6 при компиляции библиотеки может создавать TLB. CLSID можно посмотреть в реестре, в самой библиотеке, во внешней TLB. Можно использовать мой код, можно OLEVIEW, можно свой написать. CLSID - это уникальный идентификатор который должен использоваться для создания объекта, если ты его не знаешь, значит ты не сможешь создать объект. ProgID может вообще не быть. ProgID может описывать много CLSID'ов для разных версий.

0

0