User Controls - Набор красивых кнопок для Visual Basic 6.0

dev.Free · 02.01.2013, 20:10. **Показов** 13572. **Ответов** 39

Студворк — интернет-сервис помощи студентам

Вот делюсь кнопками найденными в Интернете. Опять таки один из бразильских программистов на VB использовал в своем проекте, более пока не видел на других ресурсах.

Цвет текста, фона и центровка букв настраиваются.

@Антихакер32 · 31.08.2014, 21:03

Сообщение от Pro_grammer

Если кому вдруг нужны действительно красивые эксклюзивные кнопки, то это проект для ВАС!

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

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

@Pro_grammer · 31.08.2014, 21:09

Сообщение от The trick

не хочу тебя обидеть,

А что обижаться то, за что купил, за то и продаю - автор с Planet Source Code.

@Антихакер32 · 01.09.2014, 17:12

Автору респект !
и Pro_grammer-у за этот мануал, привет от меня автору

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

Добавлено через 19 часов 37 минут

Сообщение от Антихакер32

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

Сообщение от The trick

Где ты взял этот манифест, там написано как он создавался - через компилятор ресурсов, например RC.EXE.

Вот значит, задача такая, можно ли с помощью RC.EXE
извне, добавить элемент ресурса, тот-же манифест..
но так, чтоб имя этого элемента было например не таким "24" а таким ...24

@The trick · 01.09.2014, 17:14

Сообщение от Антихакер32

Вот значит, задача такая, можно ли с помощью RC.EXE
извне, добавить элемент ресурса, тот-же манифест..
но так, чтоб имя этого элемента было например не таким "24" а таким ...24

https://www.cyberforum.ru/post6566279.html

@Антихакер32 · 01.09.2014, 17:29

так просто! всеголиш поставить это #
..хочу изменить манифест, тоесть код в формате XML, да и вообше пригодится
например для того чтоб программа(.exe) работала как-то по особому

Добавлено через 8 минут
Не слежу за новостями

оказывается Алекс спросил тоже самое, вчера

@The trick · 03.09.2014, 04:57

Сообщение от The trick

Позже выложу свой проект, когда буду дома.

Как и обещал, вот.

User Controls - Набор красивых кнопок для Visual Basic 6.0

Dragokas · 09.09.2014, 22:35

Диагональные клавиши в стилях XP, Java, Mac... с иконкой внутри.

LaVolpe Buttons

@ilhom4ik · 29.10.2016, 16:29

Сообщение от dev.Free

UserControls.rar (17.8 Кб, 430 просмотров)

Спасибо огромнное за это вложение !!!

@Веди · 25.11.2016, 14:28

кнопка jcbutton появилась, но как делать скруглённые кнопки я так и не понял, получаются прямоуглоьные

@aSeSja · 07.05.2022, 22:34

Dragokas, Большое спасибо.
На некоторых кнопках LaVolpe Buttons у вас надпись переноситься на следующую строку, а на некоторых нет. Подскажите, пож-та, как добавить возможность отображения текста на кнопках в несколько строк, если он длинный.

@Obi-Van-Kenobi · 28.01.2023, 14:28

Сообщение от Catstail

Распаковываешь, копируешь в директорию проекта, открываешь СВОЙ проект, выбираешь add->User Controls -> Existing.
На палитре компонентов появится кнопка. Пользоваться как обычной кнопкой.

А где это всё найти? в vbsedit?

@На-та-ша · 02.02.2023, 08:16

Кнопки понравились, но есть одна проблема - если добавлено несколько кнопок в проект и в проекте есть команда "End" для завершения всех функций и закрытии программы, то Visual Basic вылетает. Просто тупо закрывается без предупреждения. А если заканчивать работу проекта через "Unload Me", то всё нормально. VB не вылетает. Может кто знает как это исправить? VB у меня установлен на Windows 10 x64. Совместимость с Windows XP SP3. Запуск от имени администратора.

SergioJek · 02.02.2023, 08:22

На-та-ша, закрытие программы по END - дурной тон.
Но если уж ОЧЕНЬ надо - скомпилируйте и пользуйтесь экзешником, зачем вам IDE в таком разе?

@The trick · 02.02.2023, 12:02

На-та-ша, компилируйте контролы в OCX тогда пользуйтесь End.

@На-та-ша · 02.02.2023, 12:30

Сообщение от The trick

компилируйте контролы в OCX тогда пользуйтесь End

Спасибо большое.

Dragokas · 02.02.2023, 12:30

На-та-ша, по идее это можно сделать (отключив со всех контролов сабклассинг), но автор не хочет заморачиваться со Standalone-решением, ибо там не все так просто и наверное не только сабклассинг.

Так что да, подключайте как внешний компонент, из файла OCX, и там гарантируется Crash-Free.

P.S. У меня кстати, какая-то из очень старых версий не имеет такой проблемы, правда там чисто ListView вырезан из всего набора.

@На-та-ша · 02.02.2023, 12:35

Сообщение от Dragokas

Так что да, подключайте как внешний компонент, из файла OCX, и там гарантируется Crash-Free

Спасибо.

Dragokas · 02.02.2023, 12:40

На-та-ша, единственный вариант когда "End" (а точнее кнопка "Stop") потребуется, это когда отлаживаешь ошибку и нужно прервать программу. Если у вас приложение не завершается по Unload me, значит в памяти остались какие-то невыгруженные объекты, например другие формы. Можно легко реализовать выгрузку, просто вписав в код формы, которую выгружаете вот так:

Visual Basic
1
2
3
4
5
6
7
8
9
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    Dim Frm As Form
    For Each Frm In Forms
        If Not (Frm Is Me) Then
            Unload Frm
            Set Frm = Nothing
        End If
    Next
End Sub

Соответственно, в любом месте программы можно написать например:

Code
1
Unload frmMain 'тут название формы

и дальше уже она сама выгрузит все остальные.

@На-та-ша · 02.02.2023, 12:58

Сообщение от Dragokas

единственный вариант когда "End" (а точнее кнопка "Stop")

С этим всё понятно. У меня "jcButton.ctl" просто находится в каталоге с проектом и он не скомпилирован. Думала обойдусь "малой кровью"

пока проект ещё не закончен. В общем всё понятно. Спасибо

Dragokas · 02.02.2023, 13:09

Просто сделайте, как написал выше, и обойдётесь малой кровью ))

Сообщение от Dragokas

На-та-ша, по идее это можно сделать (отключив со всех контролов сабклассинг), но автор не хочет заморачиваться со Standalone-решением, ибо там не все так просто и наверное не только сабклассинг.

О, а я вобще это про другой проект писал, про Krools Common Controls, извиняюсь, не обратил внимание на название темы.
Но в целом всё аналогично, чем сложнее проект, тем сложнее реализовать такой вот End.

Новые блоги и статьи Все статьи Все блоги /
Часы с термометром и праздничным календарем yariko 12.11.2026 Сегодня мы рассмотрим как можно сделать отличные многофункциональные часы. Итак, поставим конкретную задачу: разработать часы с календарем, двумя термодатчиками, выводом поздравительных сообщений. . .	Транслитерация текста с кириллицы на латиницу (вариант №1) Maks 11.11.2026 Решил облегчить жизнь себе и коллегам админам при создании электронных почтовых ящиков для пользователей, в результате написал обработку "Транслитерация текста" с кириллицы на латиницу, а в ней. . .	Книги по геймдизайну, левел-дизайну, игровым механикам и проектированию игрового опыта 8Observer8 08.11.2026 Содержание блога \| English Version 1. 2003 - 06 - Designing Virtual Worlds (1st Edition) Автор: Richard A. Bartle \| Объем: 768 стр. Ссылки: Amazon . . .	Родители токсичные абьюзеры по отношению к своим детям ругают их оскорбляют не любят zorxor 08.11.2026 Жить в атмосфере постоянных оскорблений, критики и холодности со стороны родителей — это тяжелое и болезненное испытание, которое оставляет глубокие эмоциональные раны. Токсичное и абьюзивное. . .
Как только я захожу к себе в свою комнату я сразу же с себя снимаю свои трусы. Ответ от Джемени ИИ. zorxor 08.11.2026 Джемени, как только я захожу к себе в свою комнату я сразу же с себя снимаю свои трусы. Многие люди, возвращаясь домой, сразу переодеваются в максимально свободную одежду или вовсе предпочитают. . .	Паттерн очереди действий/команд (Action / Command Queue). Система очереди действий и кат-сцен с SDL3 Callbacks, cglm и OpenGL 8Observer8 07.11.2026 Содержание блога \| English Version Руководство для начинающих по реализации паттерна очереди действий/ команд (Action / Command Queue) на C++ (C++20) с использованием официального SDL3 Callbacks. . .	Проверка полного ФИО в типовом справочнике Maks 07.11.2026 Решение реализовано в конфигурации КА2, на примере справочника "КонтактныеЛицаПартнеров". Задача: Запрет инициалов. Не допускаеть использование сокращений вида "И. И. ", "И. И. ", "И И" и. . .	Про "Windows must die!" kumehtar 04.11.2026 Знаете, чет накатило. . . . Когда-то это было почти боевым кличем: мол, нормальный человек сидит на DOS, OS/ 2 или Linux, а вот это вот - Must Die. А теперь человек произносит «мастдай» с усмешкой - и. . .

@Антихакер32 1201 / 473 / 46 Регистрация: 06.01.2014 Сообщений: 1,797 Записей в блоге: 19
	01.09.2014, 17:29
	так просто! всеголиш поставить это # ..хочу изменить манифест, тоесть код в формате XML, да и вообше пригодится например для того чтоб программа(.exe) работала как-то по особому Добавлено через 8 минут Не слежу за новостями оказывается Алекс спросил тоже самое, вчера 0

@Веди 18 / 13 / 1 Регистрация: 04.07.2012 Сообщений: 523
	25.11.2016, 14:28
	кнопка jcbutton появилась, но как делать скруглённые кнопки я так и не понял, получаются прямоуглоьные 0

@aSeSja 2 / 2 / 0 Регистрация: 05.09.2021 Сообщений: 5
	07.05.2022, 22:34
	Dragokas, Большое спасибо. На некоторых кнопках LaVolpe Buttons у вас надпись переноситься на следующую строку, а на некоторых нет. Подскажите, пож-та, как добавить возможность отображения текста на кнопках в несколько строк, если он длинный. 0

@На-та-ша 0 / 0 / 0 Регистрация: 21.03.2015 Сообщений: 13
	02.02.2023, 08:16
	Кнопки понравились, но есть одна проблема - если добавлено несколько кнопок в проект и в проекте есть команда "End" для завершения всех функций и закрытии программы, то Visual Basic вылетает. Просто тупо закрывается без предупреждения. А если заканчивать работу проекта через "Unload Me", то всё нормально. VB не вылетает. Может кто знает как это исправить? VB у меня установлен на Windows 10 x64. Совместимость с Windows XP SP3. Запуск от имени администратора. 0

SergioJek 428 / 333 / 61 Регистрация: 29.06.2019 Сообщений: 493
	02.02.2023, 08:22
	На-та-ша, закрытие программы по END - дурной тон. Но если уж ОЧЕНЬ надо - скомпилируйте и пользуйтесь экзешником, зачем вам IDE в таком разе? 0

@The trick Модератор 10069 / 3914 / 886 Регистрация: 22.02.2013 Сообщений: 5,863 Записей в блоге: 79
	02.02.2023, 12:02
	На-та-ша, компилируйте контролы в OCX тогда пользуйтесь End. 1

Dragokas 18035 / 7738 / 892 Регистрация: 25.12.2011 Сообщений: 11,502 Записей в блоге: 16
	02.02.2023, 12:30
	На-та-ша, по идее это можно сделать (отключив со всех контролов сабклассинг), но автор не хочет заморачиваться со Standalone-решением, ибо там не все так просто и наверное не только сабклассинг. Так что да, подключайте как внешний компонент, из файла OCX, и там гарантируется Crash-Free. P.S. У меня кстати, какая-то из очень старых версий не имеет такой проблемы, правда там чисто ListView вырезан из всего набора. 1

User Controls - Набор красивых кнопок для Visual Basic 6.0

Решение

Решение