Оформление кнопок в стиле xp

@li2nk · Регистрация: 12.01.2010

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

Уж очень хочется, что бы оформление у программы было, как у xp. Как мне установить вот такие кнопочки и какой контрол использовать?

@BasicMan · 21.01.2010, 21:38

сделай кнопки картинками в элементе Image и обработку событий MouseDawn, MouseUp, MouseMove

@li2nk · 21.01.2010, 21:50 **[ТС]**

Мне надо что бы при наведении они становились голубоватыми(цветом), а нарисовать, так они не нажимаются, можешь по подробнее объяснить, что и как сделать, просто я только не давно начал учить бейсик.

@XIST · 22.01.2010, 13:30

ДЕРЖИ.

@arch-vile · 22.01.2010, 15:41

li2nk, понадобятся соответственно три картинки... Первая - стандарт - кнопка по умолчанию... Две другие описываете в программе: при нажатии (MouseDown) - изображение меняется на одно, при отпускании "кнопки" - на стадартное, при наведении курсора (MouseMove, вроде) - на другое...

Добавлено через 7 минут
Ну а использовать как обычную кнопочку...

@gaw · 23.01.2010, 22:37

если по простому, то

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Private Sub Form_Load()
With Shape1 'можна определить в свойствах
.BorderStyle = 0
.Visible = False
.Top = Image1(0).Top
.Width = Image1(0).Width
.Height = Image1(0).Height
.ZOrder 0
.BackColor = vbBlue '
.DrawMode = 15      '
End With
End Sub
 
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Shape1.Visible = True Then Shape1.Visible = False
End Sub
'Image1(Index) набор картинок для кнопок
Private Sub Image1_MouseMove(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
If Shape1.Visible = False Then Shape1.Visible = True
If Shape1.Left <> Image1(Index).Left Then Shape1.Left = Image1(Index).Left
End Sub

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11680&d=1772460536 Одним из. . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .

@li2nk 0 / 0 / 0 Регистрация: 12.01.2010 Сообщений: 28

	Оформление кнопок в стиле xp 21.01.2010, 21:23. Показов 3025. Ответов 5 Метки нет (Все метки) Уж очень хочется, что бы оформление у программы было, как у xp. Как мне установить вот такие кнопочки и какой контрол использовать? Изображения 0

@BasicMan 19318 / 2626 / 84 Регистрация: 17.02.2009 Сообщений: 30,364
	21.01.2010, 21:38
	сделай кнопки картинками в элементе Image и обработку событий MouseDawn, MouseUp, MouseMove 2

@li2nk 0 / 0 / 0 Регистрация: 12.01.2010 Сообщений: 28
	21.01.2010, 21:50 [ТС]
	Мне надо что бы при наведении они становились голубоватыми(цветом), а нарисовать, так они не нажимаются, можешь по подробнее объяснить, что и как сделать, просто я только не давно начал учить бейсик. 0

@arch-vile 3215 / 774 / 26 Регистрация: 12.07.2009 Сообщений: 3,184
	22.01.2010, 15:41
	li2nk, понадобятся соответственно три картинки... Первая - стандарт - кнопка по умолчанию... Две другие описываете в программе: при нажатии (MouseDown) - изображение меняется на одно, при отпускании "кнопки" - на стадартное, при наведении курсора (MouseMove, вроде) - на другое... Добавлено через 7 минут Ну а использовать как обычную кнопочку... 0

Опции темы