Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как отрендерить опенгл на принтер?


BANick ©   (2003-03-08 13:18:00) 

Пробовал
HRC := wglCreateContext(DC);
wglMakeCurrent(DC, HRC);
где DC=printer.canvas.handle;
выезжает пустой лист.
Пробовал
b:=tbitmap.Create;
b.Width:=ширина;
b.Height:=высота;
HRC := wglCreateContext(DC);
wglMakeCurrent(DC, HRC);
где ДС это битмап.Канвас.
тут рендеринг
BitBlt(hdcp,0,0,b.width,b.height,b.Canvas.Handle,0,0,SrcCopy);
b.Destroy;

так с битмап остается пустым.
Объясните плиз как ето сделать очень надо.
Заранее благодарен.


pasha676   (2003-03-12 09:13:00) [1]

Увы, чистый ОпенГЛ не пробывал (знаю надо - но времени нет :(). Так что ничего посоветовать не могу. Разбей на две подзадачи
1) Рендерим в битмап. Сохрани битмап, кинь в буфер, запиши, выведи в отдельной форме в TIMage - вообщем посмотри на результат в любом виде.
2) Если срендерилось нормально - то распечатать уже должен.


BANick   (2003-03-11 18:37:00) [2]

to pasha676
а как, я пробовал так как написано у меня выше, не получается, битмап остается пустым.


pasha676   (2003-03-11 09:20:00) [3]

Рендеришь в битмап с нужным разрешением потом печатаешь.


BANick   (2003-03-10 18:43:00) [4]

незя - область где выводится опенгл 300х150, а на печать надо 10000х50000. а стретч - это потеря качества


[Baradoo]   (2003-03-09 21:18:00) [5]

Я лично не знаю, но у меня есть идея попроще... Берешь копируешь
часть экрана, где у тебя OpenGL(с помощью copyrect), а потом вставляешь в Битмап, а оттуда уже печатаешь...
Просто, но надежно!


BANick   (2003-03-09 18:43:00) [6]

Ну подскажите ПЛИИИЗ как напечатать из опенгл, очень надо.


Наверх

Титульная страница Поиск, карта сайта Написать письмо