Менять содержимое Image

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Dummiel
Бывалый
Бывалый
 
Сообщения: 235
Зарегистрирован: 11.06.2004 (Пт) 9:15
Откуда: Алтай

Менять содержимое Image

Сообщение Dummiel » 12.04.2006 (Ср) 15:06

Нужно, чтобы во время ожидания действия на форме "мигал" кружок.
Загружаю в ImageBox *.ico кругленький синенький, потом через Timer и Image.LoadPicture меняю его на красненький, снова на синенький, и т.п., пока не нажму чего-нибудь.
Может, есть изящнее решение? Ведь ресурс компа хоть чуть, но занят этим LoadPicture.
Спасибо.

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 12.04.2006 (Ср) 15:09

Два Image, один над другим.
Верхний по таймеру делается видимым и невидимым.
Lasciate ogni speranza, voi ch'entrate.

Dummiel
Бывалый
Бывалый
 
Сообщения: 235
Зарегистрирован: 11.06.2004 (Пт) 9:15
Откуда: Алтай

Сообщение Dummiel » 12.04.2006 (Ср) 15:16

Оба-на!
И то сказать. Спасибо.

BV
Thinker
Thinker
Аватара пользователя
 
Сообщения: 3987
Зарегистрирован: 12.09.2004 (Вс) 0:55
Откуда: Молдавия, г. Кишинёв

Сообщение BV » 12.04.2006 (Ср) 16:21

А не лучше ли BitBlt или TransparentBlt? :roll:
const char *out = "|*0>78-,+<|"; size_t cc = char_traits<char>::length(out);
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;

Andrey Fedorov
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
 
Сообщения: 3287
Зарегистрирован: 21.05.2004 (Пт) 9:28
Откуда: Москва

Сообщение Andrey Fedorov » 12.04.2006 (Ср) 16:43

BV писал(а):А не лучше ли BitBlt или TransparentBlt? :roll:


Тогда уж лучше AVI-шку или AniGif крутить... :lol:
Фиг Вам! - Сказал Чебурашка, обгладывая Крокодила Гену...

Роман-вб
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 520
Зарегистрирован: 04.04.2006 (Вт) 9:40
Откуда: Средняя полоса

Сообщение Роман-вб » 12.04.2006 (Ср) 18:29

Dummiel
Попробуй Shape
Жить ещё 2 недели, работы на 8 лет, но я докажу на деле, на что способен аскет!

Nicky
Постоялец
Постоялец
 
Сообщения: 519
Зарегистрирован: 12.08.2004 (Чт) 12:14

Сообщение Nicky » 13.04.2006 (Чт) 7:24

Если вместо кружка покатит квадратик :) , то можно обойтись лабелью

GAGArin
Неистовый флудер
Неистовый флудер
 
Сообщения: 1777
Зарегистрирован: 23.12.2002 (Пн) 12:46
Откуда: я тут взялся, не знаю...

Сообщение GAGArin » 13.04.2006 (Чт) 8:13

ppc... А действительно анимированный гиф совсем никак?

Dummiel
Бывалый
Бывалый
 
Сообщения: 235
Зарегистрирован: 11.06.2004 (Пт) 9:15
Откуда: Алтай

Сообщение Dummiel » 14.04.2006 (Пт) 12:33

Други мои!

С API однозначно не хоца связываться, это круто, но муторно, тем более, что не такой уж я крутой прораммер, мой ник многое говорит.

С Shape пробовал, но мне нужно, чтобы он не просто "мигал", а еще и откликался на клик. А Shape вообще на клики не реагирует, т.е., процедуры типа Shape_Click() и т.п. VB не делает.

А анимированные гифы делать не умею, хотя тоже была такая мысля.

Так что остается .Visible=True/False

Спасибо всем.

Andrey Fedorov
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
 
Сообщения: 3287
Зарегистрирован: 21.05.2004 (Пт) 9:28
Откуда: Москва

Сообщение Andrey Fedorov » 14.04.2006 (Пт) 13:37

Dummiel писал(а):Так что остается .Visible=True/False


Приложен пример работы с AVI-шкой
Вложения
AVI.RAR
(20.07 Кб) Скачиваний: 29
Фиг Вам! - Сказал Чебурашка, обгладывая Крокодила Гену...

Роман-вб
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 520
Зарегистрирован: 04.04.2006 (Вт) 9:40
Откуда: Средняя полоса

Сообщение Роман-вб » 14.04.2006 (Пт) 16:47

Dummiel
процедуры типа Shape_Click() и т.п. VB не делает.
Но можно использовать событ. формы, например, Mousedown
Жить ещё 2 недели, работы на 8 лет, но я докажу на деле, на что способен аскет!


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот, SemrushBot и гости: 132

    TopList  
cron