Конференция VBStreets

**Mario** » 12.12.2005 (Пн) 7:08

Вопрос такой! :arrow:

Имеется картинка в picture1 с черным фоном или белым (не важно главное чтобы фон был однотонный). Нужно поместить эту картинку в picture2 уже без этого фона. Т.е. прозрачной.
И потом сохранить прозрачную картинку в нужном формате!

**Мамонт** » 12.12.2005 (Пн) 8:20

Ищи функцыю BitBlt!

**Tin** » 12.12.2005 (Пн) 8:35

Помоему бан нужно за такие вещи довать - поройся в поиски с десяток ответов на свой вопрос найдешь

**keks-n** » 12.12.2005 (Пн) 17:17

Tin
Ты кол-во постов у чела видел? Он на форуме не привык еще, я вон тоже, первый месяц о существовании кнопки "Поиск" не знал, и еще с неделю пользовать учился.
Надо это в FAQ добавить, а темы пришибать просто.

**Мамонт** » 12.12.2005 (Пн) 19:42

Да щас накаждом углу посылают в поиск! везде написано что прежде чем спрашывать юзайте поиск!

**vvs_adm** » 13.12.2005 (Вт) 1:50

Format C: писал(а):Везде написано что прежде чем спрашивать юзайте поиск!

Ага, везде написано, только никто не читает

Потому что нужно при регистрации не писать : "А теперь введите число, которое видите на картинке", а писать типа : "А теперь напечатайте в этом окошке FAQ нашего форума". А FAQ сделать в виде картинки, чтоб скопипастить не смог, и нераспознаваемым для FineReader-а :lol:

(по той же причине)

**Mario** » 13.12.2005 (Вт) 8:01

Ребята делаю так!!!
Только ни чего неполучается в чем ошибка?!

**Tin** » 13.12.2005 (Вт) 12:04

вместо вот этого &H80000009 'белый поставь vbWhite

**keks-n** » 13.12.2005 (Вт) 16:57

vvs_adm писал(а):
Format C: писал(а):Везде написано что прежде чем спрашивать юзайте поиск!
Ага, везде написано, только никто не читает Потому что нужно при регистрации не писать : "А теперь введите число, которое видите на картинке", а писать типа : "А теперь напечатайте в этом окошке FAQ нашего форума". А FAQ сделать в виде картинки, чтоб скопипастить не смог, и нераспознаваемым для FineReader-а (по той же причине)

Только больно жестоко... новых пользователей не будет и все под гостями писать начнут

Посему предлагаю написать там: "А теперь ответьте на несколько вопросов по нашему FAQ", и сделать там штук 40 вопросов с 15 вариантами ответа, и пока на все правильно не ответит не пускать :wink:

**Бяка** » 14.12.2005 (Ср) 1:49

с тя кружка пива
твою прогу несмотрел но код такоу

Код: Выделить всё: Private Declare Function TransparentBlt Lib "msimg32.dll" (ByVal hDC As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal nSrcWidth As Long, ByVal nSrcHeight As Long, ByVal crTransparent As Long) As Boolean Private Sub Command1_Click() Picture1 = Picture1.Image Picture3 = Picture3.Image Picture1.ScaleMode = 3 Picture3.ScaleMode = 3 Picture1.AutoRedraw = True Picture3.AutoRedraw = True TransparentBlt Picture1.hDC, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight, Picture3.hDC, 0, 0, Picture3.ScaleWidth, Picture3.ScaleHeight, vbBlack End Sub

спросите а почему Picture3? Отвечу: а хз!

**Mario** » 14.12.2005 (Ср) 5:34

To Бяка -> У меня такой же тока ошибка была не большая! Я цвет прозрачности не правильно поставил!

To Tin -> Спасиб!

И еще вопрос какие форматы файлов можно с прозрачностью сохранять.

**Tin** » 14.12.2005 (Ср) 6:16

Всегда пожалуйста.
Про форматы: их целая туча - что именно хочешь сделать и зачем

**Mario** » 14.12.2005 (Ср) 9:58

To Tin
Хочу сделать программу для создания прозрачности у картинок.
Для сайта кратинки делаю! Нужны прозрачные! Так вот сейчас прога делает прозрачный фон, а как ее сохранить (картинку) и в каком формате что бы фон оставался прозрачным?!

Я думаю скорее всего это gif!!!

**Tin** » 14.12.2005 (Ср) 11:08

Зачем? Ведь есть целая туча таких программ...

**Mario** » 14.12.2005 (Ср) 13:46

Я сам хочу сделать такую программу!!! Что бы удобнее было!....

**Tin** » 14.12.2005 (Ср) 16:08

Ну тогда про струкутры файлов тебе к Тёмычу

Конференция VBStreets

Прозрачная картинка

Прозрачная картинка

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