| Вопрос: Возможно ли растянуть картинку в Picture ? | Добавлено: 29.04.05 21:32 |
Автор вопроса:  VisBas | Web-сайт: chipmicro.narod.ru
|
| Возможно ли растянуть картинку в Picture ? (как в Image) |
| Ответы | Всего ответов: 11 |
|
Номер ответа: 1 Автор ответа:  AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178 |
Профиль | | #1 | Добавлено: 29.04.05 22:10 |
|
Методом PaintPicture:
Picture1.PaintPicture Picture1.Picture, <указываешь нужные параметры>, <в конце: vbScrCopy>
|
||
|
Номер ответа: 2 Автор ответа: VisBas Вопросов: 44 Ответов: 127 |
Web-сайт: Профиль | | #2 | Добавлено: 29.04.05 22:25 |
|
Прошу прощения за глупый вопрос, а какие параметры ?
Мне нужно растянуть картинку внутри Picture до его размеров(а не наоборот). В Image это очень просто: ставим Stretch в True и устанавливаем размер Image, а в Picture как ? |
||
|
Номер ответа: 3 Автор ответа: sneРазработчик Offline Client ICQ: 233286456 Вопросов: 34 Ответов: 5445 |
Web-сайт: Профиль | | #3 | Добавлено: 29.04.05 23:52 |
| .PaintPicture picture, x1, y1, width1, height1, x2, y2, width2, height2, opcode | ||
|
Номер ответа: 4 Автор ответа: Страшный СонВопросов: 46 Ответов: 848 |
Профиль | | #4 | Добавлено: 30.04.05 02:18 |
| Юзай StretchBlt. | ||
|
Номер ответа: 5 Автор ответа: VisBasВопросов: 44 Ответов: 127 |
Web-сайт: Профиль | | #5 | Добавлено: 30.04.05 11:00 |
| Более глючного метода, чем PaintPicture я не встречал. Он обрезает картинку. | ||
|
Номер ответа: 6 Автор ответа: VisBasВопросов: 44 Ответов: 127 |
Web-сайт: Профиль | | #6 | Добавлено: 30.04.05 11:08 |
| Разобрался. Не надо константу в конце ставить и все будет в порядке. | ||
|
Номер ответа: 7 Автор ответа: AgentFireICQ: 192496851 Вопросов: 75 Ответов: 3178 |
Профиль | | #7 | Добавлено: 30.04.05 11:17 |
|
Как не надо? У меня только с ней все получается!
Страшный Сон, PaintPicture – это и есть StretchBlt |
||
|
Номер ответа: 8 Автор ответа: VisBasВопросов: 44 Ответов: 127 |
Web-сайт: Профиль | | #8 | Добавлено: 30.04.05 11:29 |
|
У меня с константой картинка обрезается, не знаю почему.
Еще может кто знает почему после выполнения кода: Picture1.AutoSize = True 'Исходная картинка
Picture2.PaintPicture Picture1.Picture, 0, 0, 20000, 20000, 0, 0, 10000, 10000 Picture2.Width = Picture1.Width * 2 Picture2.Height = Picture1.Height * 2 картинка в Picture2 растянута почти на весь, но не на весь контенер Picture? |
||
|
Номер ответа: 9 Автор ответа: HOOLIGANВопросов: 0 Ответов: 1066 |
Профиль | | #9 | Добавлено: 30.04.05 13:40 |
|
Сделай
Picture1.Appearance=0 Picture1.BorderStyle=0 и будет на весь контейнер. |
||
|
Номер ответа: 10 Автор ответа: MorpheusВопросов: 224 Ответов: 3777 |
Web-сайт: Профиль | | #10 | Добавлено: 30.04.05 16:30 |
| А как запустить PlgBlt под 9х ? можнл какой нить DLL скопировать в папку приложения? | ||
|
Номер ответа: 11 Автор ответа: HOOLIGANВопросов: 0 Ответов: 1066 |
Профиль | | #11 | Добавлено: 30.04.05 17:45 |
| Никак. Можно скопировать хоть все dll в папку приложения, всё равно в Gdi32.dll эта функция не появится. | ||
Страница: 1 |