Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.87/15: Рейтинг темы: голосов - 15, средняя оценка - 4.87
1 / 1 / 0
Регистрация: 28.01.2013
Сообщений: 102

Сравнить картинки в PictureBox

25.11.2013, 12:18. Показов 3127. Ответов 7
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Как сравнить две картинки в двух разных PictureBox?
Т.е. например у меня в двух боксах изображены картинки карточных мастей (для примера трефы и бубны), как мне их сравнить между собой чтобы выдать сообщение типа "картинки одинаковые".
если поможет вот код программы
Кликните здесь для просмотра всего текста
VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
Public Class Form1
    Public x, y, z As Integer
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        start1.Enabled = True
        start2.Enabled = True
        start3.Enabled = True
        stop1.Enabled = True
        stop2.Enabled = True
        stop3.Enabled = True
    End Sub
 
    Private Sub start1_Tick(sender As Object, e As EventArgs) Handles start1.Tick
        Randomize()
        x = Int(Rnd() * 4) + 1
        Select Case x
            Case 1
                card1.Image = Image.FromFile("D:\1.png")
            Case 2
                card1.Image = Image.FromFile("D:\2.png")
            Case 3
                card1.Image = Image.FromFile("D:\3.png")
            Case 4
                card1.Image = Image.FromFile("D:\4.png")
        End Select
    End Sub
 
    Private Sub start2_Tick(sender As Object, e As EventArgs) Handles start2.Tick
        Randomize()
        y = Int(Rnd() * 4) + 1
        Select Case y
            Case 1
                card2.Image = Image.FromFile("D:\1.png")
            Case 2
                card2.Image = Image.FromFile("D:\2.png")
            Case 3
                card2.Image = Image.FromFile("D:\3.png")
            Case 4
                card2.Image = Image.FromFile("D:\4.png")
        End Select
    End Sub
 
    Private Sub start3_Tick(sender As Object, e As EventArgs) Handles start3.Tick
        Randomize()
        z = Int(Rnd() * 4) + 1
        Select Case z
            Case 1
                card3.Image = Image.FromFile("D:\1.png")
            Case 2
                card3.Image = Image.FromFile("D:\2.png")
            Case 3
                card3.Image = Image.FromFile("D:\3.png")
            Case 4
                card3.Image = Image.FromFile("D:\4.png")
        End Select
    End Sub
 
    Private Sub stop1_Tick(sender As Object, e As EventArgs) Handles stop1.Tick
        start1.Enabled = False
        stop1.Enabled = False
    End Sub
 
    Private Sub stop2_Tick(sender As Object, e As EventArgs) Handles stop2.Tick
        start2.Enabled = False
        stop2.Enabled = False
    End Sub
 
    Private Sub stop3_Tick(sender As Object, e As EventArgs) Handles stop3.Tick
        start3.Enabled = False
        stop3.Enabled = False
    End Sub
End Class
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
25.11.2013, 12:18
Ответы с готовыми решениями:

Сравнить картинки в PictureBox и в ресурсах
If PictureBox5.Image.Equals(My.Resources.testPicture) Then ' ... End If или If PictureBox5.Image Is...

Передвижение картинки внутри PictureBox
Здравствуйте! Пытаюсь реализовать алгоритм работы с картой, так что бы при наведении на мышки на определенные объекты на карте, всплывало...

Печать картинки с picturebox контролла?
Господа! Здраствуйте! Возникла потребность распечать графическое изображение находящиеся в picturebox. Заранее блогадарен.

7
1652 / 715 / 47
Регистрация: 11.03.2012
Сообщений: 1,855
Записей в блоге: 1
25.11.2013, 12:35
ttt_xx, сравнивай по имени и все.
0
1 / 1 / 0
Регистрация: 28.01.2013
Сообщений: 102
25.11.2013, 12:48  [ТС]
Цитата Сообщение от Release Посмотреть сообщение
ttt_xx, сравнивай по имени и все.
как их так сравнивать? объясните на примере, я пробовал у меня не получалось
0
 Аватар для Artain
14 / 14 / 2
Регистрация: 24.10.2013
Сообщений: 24
25.11.2013, 13:16
Лучший ответ Сообщение было отмечено Тим70 как решение

Решение

У меня вот так получилось
VB.NET
1
2
3
4
5
6
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim Img As Image = My.Resources.images
        PictureBox1.Image = Img
        PictureBox2.Image = Img
        If PictureBox1.Image.Equals(PictureBox2.Image) Then MsgBox("eq") Else MsgBox("not eq")
    End Sub

Не по теме:

Правда не уверен что в этом есть смысл :D

1
1 / 1 / 0
Регистрация: 28.01.2013
Сообщений: 102
25.11.2013, 13:29  [ТС]
Цитата Сообщение от Artain Посмотреть сообщение
My.Resources.images
ругается на эту фразу
0
 Аватар для Петррр
6721 / 3570 / 900
Регистрация: 28.10.2010
Сообщений: 5,937
25.11.2013, 13:38
ООП подход не рулит?
0
 Аватар для Юпатов Дмитрий
1721 / 1208 / 228
Регистрация: 23.12.2010
Сообщений: 1,544
25.11.2013, 13:40
там должно быть имя картинки в ресурсах. Напиши My.Resources и появился список объектов в ресурсах. Выбери нужное. Естественно, в ресурсы должны быть предварительно вкинуты картинки.
Ну а если делаешь из файлов (как у тебя в коде), то тогда по имени файла. Если брать полные пути к картинкам, то их совпадение будет означать и совпадение картинок в пикчерах (т.е. в несколько пикчеров загружен один файл).
0
835 / 643 / 101
Регистрация: 20.08.2013
Сообщений: 2,524
25.11.2013, 14:09
ttt_xx, лучше картинки всё-таки не сравнивать...

PS: См. ответ про их выбор в соседней теме.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
25.11.2013, 14:09
Помогаю со студенческими работами здесь

Вывод часть картинки в PictureBox
Можно ли вывести часть картинки в PictureBox по определенным координатам, заданного размера? Если да - то как это сделать? Или для...

Загрузка картинки из PictureBox в базу данных
Здравствуйте. Необходимо загрузить картинку из PictureBox в базу данных,. Как загрузить из файла на диске я разобрался: Dim foto As...

Загрузка картинки в PictureBox, выбранной в ComboBox
Здравствуйте! Есть такая задачка: В папке есть набор картинок. На форме - комбобокс и пикчербокс. В комбобокс при нажатии кнопки...

PictureBox изменить яркость и контрастность картинки
Элемент управления PicterBox как задать программно сохранение картинки с параметрами яркость, контрастность и другие характеристики при...

Удаление файла картинки, загруженной в PictureBox
Всем знатокам доброго времени суток! Вставляю картинку в PictureBox кодом PictureBox1.Image =...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer
8Observer8 08.02.2026
Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств
8Observer8 07.02.2026
Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm
8Observer8 30.01.2026
Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 29.01.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru