Пробывал вот-этот код: (он не работает)
- Код: Выделить всё
printer.paintpicture picture1.picture
[quote][/quote]
Печать картинок
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 5
• Страница 1 из 1
- Ramzes
- Скромный человек
-
- Сообщения: 5004
- Зарегистрирован: 12.04.2003 (Сб) 11:59
- Откуда: Из гробницы :)
Печать картинок
Ramzes » 29.06.2004 (Вт) 9:58
Как все-таки печатать из PictureBox'a
Пробывал вот-этот код: (он не работает)
Пробывал вот-этот код: (он не работает)
- _Мика_
- Гуру
- Сообщения: 1459
- Зарегистрирован: 24.10.2003 (Пт) 15:05
- Откуда: г. Москва, м.Речной вокзал
_Мика_ » 29.06.2004 (Вт) 10:03
- Код: Выделить всё
w=Screen.ScaleX(Picture1.Picture.Width, vbHiMetric, vbTwips)
h=Screen.ScaleY(Picture1.Picture.Height, vbHiMetric, vbTwips)
Printer.PaintPicture Picture1.Picture, 0, 0, w, h, 0, 0, w, h, vbSrcCopy
-Папа, а правда, что форумы делают людей дибилами?
-гы гы гы, сынок, лол!
-гы гы гы, сынок, лол!
- Шурик
- Самогонщик
-
- Сообщения: 1657
- Зарегистрирован: 30.06.2003 (Пн) 13:27
- Откуда: из запоя :))))) Матных сообщений: 972
Шурик » 29.06.2004 (Вт) 14:52
А так:
- Код: Выделить всё
w = Picture1.Picture.Width
h = Picture1.Picture.Height
Printer.PaintPicture Picture1.Picture, 0, 0, w, h, 0, 0, w, h, vbSrcCopy
Сообщений: 5
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 17