Фотоальбом

@Alvin · Регистрация: 17.01.2010

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

Всем привет. Надеюсь в нужном разделе тему создал.
Надеюсь на вашу помощь, а именно.

Пытаюсь сделать простую программу. Смысл следующий.
Обычное окно, с кнопочками, на них надписи. Нажимаю на кнопочку, программа переходит в сл окошко, где фотография и подробное описание.
Так же кнопочка назад, что бы попасть в общее меню. И так далее..
Пробую сделать 2 день, ничего не выходит. Можете как нибудь помочь? Может есть программа более удобная для реализации этой идеи?

@Alvin · 26.01.2010, 21:41 **[ТС]**

Я говорил что люблю тебя?))

[IMG]http://i012.***********/0911/cd/9f6ebed32b17.jpg[/IMG]

@gaw · 27.01.2010, 00:34

добрый вечер
разрешите пару слов об эффектах,
давно было, по памяти,
на картинку натягиваются например Label1(i).Visible=False i=0 to 9 на высоту картинки
Label1(i).Left=Image().Left + i*int(Image().Width/10)
при смене картинки
---считают ширину каждого (шир.картинки/10)
--- проявляют
--- в таймере стягивают до 15
---и опять Label1(i).Visible=False (в цикле после остановки таймера)

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

Visual Basic
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
Option Explicit
Dim p, o
 
Dim z1
Private Declare Function GetPixel Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal Y As Long) As Long
Private Declare Function SetPixel Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal Y As Long, ByVal crColor As Long) As Long
Dim s As Long, c As ColorConstants
 
Private Sub Command1_Click()
 
For p = 0 To Picture1.Width
For o = 0 To Picture1.Height 'Step 2
c = RGB(255, 255, 255)
s = SetPixel(Picture1.hdc, p + Sin(z1 * o), o + Cos(z1 * p), (GetPixel(Picture1.hdc, p, o)))
Next o
Next p
End Sub
 
Private Sub VScroll1_Change()
z1 = VScroll1.Value
 
End Sub
 
Private Sub Form_Load()
Me.ScaleMode = 3
Picture1.ScaleMode = 1
VScroll1.Min = 1: VScroll1.Max = 10
Picture1.AutoRedraw = False
 
 
End Sub

@Alvin · 29.01.2010, 14:34 **[ТС]**

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

@Alvin · 30.01.2010, 16:40 **[ТС]**

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

@gaw · 07.02.2010, 20:04

еще один эффект нашел - проявление (для примера 3 изображения, но можна и больше)
для удобозримости изображения встроил, при использовании лучше загружать
не лишен недостатков, идин из них--
: тянет ресурсы, - отсюда желательно для маленьких изображений,
в идеале --- изображения одинаковых размеров (тогда можна убрать подгонку)
у меня запускается при наведении курсора или перетягивании
можна эксперементировать (например в таймере по часах, по датах и т.п.)

@sergei102 · 21.04.2010, 16:46

Ребят я тут новенький.Помогите сделать проект фотоальбом на vb срочно очень надо.Мне надо примерно такой.Слева показывает картинки справа меню картинок а снизу описание их.Как так сделать очень прошу помогите.Завтра уже нада сдавать.

Новые блоги и статьи Все статьи Все блоги /
Локальный http сервер Argus19 17.10.2026 Локальный http сервер На работе, на двух локальных компьютерах круглосуточно работают программы опроса приборов с записью в книги Excel,которые раз в сутки записываются на сервер компании. Т. к. . . .	Копировать Windows на новый диск на UEFI damix 17.10.2026 https:/ / uriesk. wordpress. com/ 2016/ 11/ 01/ move-window-10-to-ssd-on-a-uefi-dualboot-system-with-basic-linux-tools/ TL DR Вставляем диск, а старый подключаем через переходник, грузимся с лайва. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .
Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .

@Alvin 1 / 1 / 0 Регистрация: 17.01.2010 Сообщений: 43

	Фотоальбом 17.01.2010, 17:13. Показов 6606. Ответов 45 Метки нет (Все метки) Всем привет. Надеюсь в нужном разделе тему создал. Надеюсь на вашу помощь, а именно. Пытаюсь сделать простую программу. Смысл следующий. Обычное окно, с кнопочками, на них надписи. Нажимаю на кнопочку, программа переходит в сл окошко, где фотография и подробное описание. Так же кнопочка назад, что бы попасть в общее меню. И так далее.. Пробую сделать 2 день, ничего не выходит. Можете как нибудь помочь? Может есть программа более удобная для реализации этой идеи? 0

@Alvin 1 / 1 / 0 Регистрация: 17.01.2010 Сообщений: 43
	26.01.2010, 21:41 [ТС]
	Я говорил что люблю тебя?)) [IMG]http://i012.***********/0911/cd/9f6ebed32b17.jpg[/IMG] 0

@Alvin 1 / 1 / 0 Регистрация: 17.01.2010 Сообщений: 43
	29.01.2010, 14:34 [ТС]
	Добрый день всем=) Такой вопрос, можно как нибудь вставить песню, чтобы она играла во всей программе, и проигрывателя не было видно. То есть, программу включил, и песня играет, пока фотографии смотришь. 0

@Alvin 1 / 1 / 0 Регистрация: 17.01.2010 Сообщений: 43
	30.01.2010, 16:40 [ТС]
	Попробовал, получилось, но не совсем так. Что бы играла песня, нужно ее с собой таскать. А можно как нибудь в программу ее вбить, что бы она там была. То есть просто программу запускаешь и песня играет, на всех формах. 0

@sergei102 0 / 0 / 0 Регистрация: 21.04.2010 Сообщений: 3
	21.04.2010, 16:46
	Ребят я тут новенький.Помогите сделать проект фотоальбом на vb срочно очень надо.Мне надо примерно такой.Слева показывает картинки справа меню картинок а снизу описание их.Как так сделать очень прошу помогите.Завтра уже нада сдавать. 0

Фотоальбом

Решение