Работа с картинками

@zangetsu · Регистрация: 05.11.2011

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

как сделать так, чтобы при клике на определённые картинки высвечивалось сообщение? например если кликнуть на определённые 4(Image) картинки из 10(Image) высветилось сообщение.

@zangetsu · 10.03.2012, 18:54 **[ТС]**

а в procedure Procces нужно указывать image1.tag,image2.tag и так далее?

@thebvog · 10.03.2012, 18:56

zangetsu, а зачем, просто в каждом обработчике ImageN.OnClick - надо присвоить ячейке массива с индексом изображения единицу (mas[n] := 1).

@zangetsu · 10.03.2012, 19:24 **[ТС]**

а в procedure Procces там где ок указать верную комбинацию mas[n]?

@thebvog · 10.03.2012, 19:36

zangetsu, там уже указана верная комбинация из 4 нажатых и остальных не нажатых. Поэтому там код сообщения только нужен.

@zangetsu · 10.03.2012, 19:49 **[ТС]**

я дурак, я не догоняю, где в коде указана нужная мне комбинация?

@thebvog · 10.03.2012, 19:52

zangetsu,

Delphi
1
2
3
4
5
6
7
8
9
  if (sr = 4) then
  begin
    if  (sw = 0) then
    begin
      // Ok
      ...
      CleanM;
    end
    ...

Если нажаты все нужные кнопки и не одной другой.

@zangetsu · 10.03.2012, 19:53 **[ТС]**

а где указываются верные 4, а не верное кол-во?

@thebvog · 10.03.2012, 19:59

zangetsu, верные 4 загоняются в первые 4 ячейки массива.

@zangetsu · 10.03.2012, 20:01 **[ТС]**

т,е первыми я указываю правильные, а дальше не правильные?

@thebvog · 10.03.2012, 20:02

zangetsu, так точно.

deathNC · 10.03.2012, 20:17

zangetsu, чтобы проверить комбинацию, просто сделай условие:

Delphi
1
2
3
If (arr[1] = 1) and (arr[2] = 1) and (arr[3] = 1) 
   and (arr[3] = 0) and ... then
  ShowMessage('Выбрана нужная комбинация');

В операторе If указывай сколько тебе угодно условий. Вот я для примера написал 3 - и проверил, не нажаты ли первые три картинки. Если они все нажаты, то выводится сообщение...
если уж и так непонятно, то завтра тебе пример напишу простенький...

@thebvog · 10.03.2012, 20:19

deathNC, чего-то будет длинное условие, если ненужных картинок штук 100

deathNC · 10.03.2012, 21:09

thebvog, ну, тогда и компонентов Image придётся 100 на форме ещё постараться разместить...

Ладно, завтра я покажу, как это сделать, и ещё сделаю кол-во картинок динамическим. А то эти статичные условия - чистой воды мазохизм

@thebvog · 10.03.2012, 21:13

deathNC, форма размером 10000 на 1000 пикселей

deathNC · 10.03.2012, 21:18

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

(а это ещё надо видеокарту особую, которая по кускам на три монитора всё выведет

)

@thebvog · 10.03.2012, 21:23

deathNC, три монитора по 3333.3 пикселя

@zangetsu · 11.03.2012, 18:05 **[ТС]**

может знаете как сделать чтобы при повторном клике на Image, то что появилось при первом клике исчезло?

Добавлено через 1 минуту
короче если image1 находиться на image2, и при клике на image1 на image2 рисуется многоугольник?

deathNC · 12.03.2012, 16:35

Я уж чуть не забыл про эту тему...

В общем, накалякал я примерчик. Открой его в делфи, скомпилируй и запусти.
В нём задаётся размер матрицы картинок. Когда выберешь нужные числа, жми кнопку "Создать". На форме появятся картинки. Суть в том, что нужно выбрать только зелёные картинки. Если хотя бы одна из зелёных не будет выделена, или хотя бы одна из жёлтых будет выбрана, то на форме будет написано "не совпало", а если всё будет выбрано правильно, то на форме напишется - "СОВПАЛО".
Чтобы установить/снять выделение картинки, надо только щёлкнуть по ней.

Не по теме:

Я постарался код прокомментить, но всё же я уже не раз говорил - с меня учитель плохой, та что я мог и непонятно чего объяснить. Кстати, для понимания примера надо знать самые основы Булевой Алгебры. То есть надо знать как работают такие штуки, как AND, OR, NOT, XOR, SHL, SHR :)
Если совсем не сможешь разобраться, отпишись, я постараюсь выложить более подробное описание. Хотя, на мой взгляд, там и так всё предельно ясно :)

deathNC · 12.03.2012, 16:37

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

может знаете как сделать чтобы при повторном клике на Image, то что появилось при первом клике исчезло?

Можно простым флагом.

Delphi
1
2
3
flag: boolean;
...
flag := not flag; // изменить значение флага на противоположное

Но лучше сначала с примером разберись

@thebvog · 12.03.2012, 16:50

deathNC, не сложновато ли для такой простой задачи?

Новые блоги и статьи Все статьи Все блоги /
Access VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .	Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .	Фото: Daniel Greenwood kumehtar 13.11.2025

@zangetsu 2 / 2 / 2 Регистрация: 05.11.2011 Сообщений: 170

	Работа с картинками 09.03.2012, 23:18. Показов 4457. Ответов 43 Метки нет (Все метки) как сделать так, чтобы при клике на определённые картинки высвечивалось сообщение? например если кликнуть на определённые 4(Image) картинки из 10(Image) высветилось сообщение. 0

@zangetsu 2 / 2 / 2 Регистрация: 05.11.2011 Сообщений: 170
	10.03.2012, 18:54 [ТС]
	а в procedure Procces нужно указывать image1.tag,image2.tag и так далее? 0

@thebvog 74 / 54 / 12 Регистрация: 20.02.2012 Сообщений: 239
	10.03.2012, 18:56
	zangetsu, а зачем, просто в каждом обработчике ImageN.OnClick - надо присвоить ячейке массива с индексом изображения единицу (mas[n] := 1). 1

@zangetsu 2 / 2 / 2 Регистрация: 05.11.2011 Сообщений: 170
	10.03.2012, 19:24 [ТС]
	а в procedure Procces там где ок указать верную комбинацию mas[n]? 0

@thebvog 74 / 54 / 12 Регистрация: 20.02.2012 Сообщений: 239
	10.03.2012, 19:36
	zangetsu, там уже указана верная комбинация из 4 нажатых и остальных не нажатых. Поэтому там код сообщения только нужен. 1

@zangetsu 2 / 2 / 2 Регистрация: 05.11.2011 Сообщений: 170
	10.03.2012, 19:49 [ТС]
	я дурак, я не догоняю, где в коде указана нужная мне комбинация? 0

@zangetsu 2 / 2 / 2 Регистрация: 05.11.2011 Сообщений: 170
	10.03.2012, 19:53 [ТС]
	а где указываются верные 4, а не верное кол-во? 0

@thebvog 74 / 54 / 12 Регистрация: 20.02.2012 Сообщений: 239
	10.03.2012, 19:59
	zangetsu, верные 4 загоняются в первые 4 ячейки массива. 0

@zangetsu 2 / 2 / 2 Регистрация: 05.11.2011 Сообщений: 170
	10.03.2012, 20:01 [ТС]
	т,е первыми я указываю правильные, а дальше не правильные? 0

@thebvog 74 / 54 / 12 Регистрация: 20.02.2012 Сообщений: 239
	10.03.2012, 20:02
	zangetsu, так точно. 1

@thebvog 74 / 54 / 12 Регистрация: 20.02.2012 Сообщений: 239
	10.03.2012, 20:19
	deathNC, чего-то будет длинное условие, если ненужных картинок штук 100 0

deathNC 1905 / 1016 / 123 Регистрация: 08.12.2009 Сообщений: 2,792 Записей в блоге: 2
	10.03.2012, 21:09
	thebvog, ну, тогда и компонентов Image придётся 100 на форме ещё постараться разместить... Ладно, завтра я покажу, как это сделать, и ещё сделаю кол-во картинок динамическим. А то эти статичные условия - чистой воды мазохизм 0

@thebvog 74 / 54 / 12 Регистрация: 20.02.2012 Сообщений: 239
	10.03.2012, 21:13
	deathNC, форма размером 10000 на 1000 пикселей 0

deathNC 1905 / 1016 / 123 Регистрация: 08.12.2009 Сообщений: 2,792 Записей в блоге: 2
	10.03.2012, 21:18
	thebvog, такую по-моему даже сделать нельзя, если не взять три монитора по три с лишним тысячи пикселей в ширину для каждого (а это ещё надо видеокарту особую, которая по кускам на три монитора всё выведет ) 0

@thebvog 74 / 54 / 12 Регистрация: 20.02.2012 Сообщений: 239
	10.03.2012, 21:23
	deathNC, три монитора по 3333.3 пикселя 0

@zangetsu 2 / 2 / 2 Регистрация: 05.11.2011 Сообщений: 170
	11.03.2012, 18:05 [ТС]
	может знаете как сделать чтобы при повторном клике на Image, то что появилось при первом клике исчезло? Добавлено через 1 минуту короче если image1 находиться на image2, и при клике на image1 на image2 рисуется многоугольник? 0

@thebvog 74 / 54 / 12 Регистрация: 20.02.2012 Сообщений: 239
	12.03.2012, 16:50
	deathNC, не сложновато ли для такой простой задачи? 1