Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

FullScreen OpenGl [Delphi, Windows]

zzet © (2003-12-18 16:36:00)
Как реализовать? Дайте плз, примерчик.
В окне все работает нормально, делаю так:

If (Key = 'f') then begin
frmMain.BorderStyle := bsNone;
frmMain.WindowState := wsMaximized; end;

результат - черный экран. Что делать?

Волк-Призрак (2003-12-22 12:10:00) [1]
Попробуй перед инициализацией OpeGL в DirectDraw сделать монопольный режим (SetCooperativeLevel итд). Простое растягивание окна при наличии таких прог как Samurize вызовет там где её индикаторы кучу мерцаний.
И помни - для нормальной отладки полноэкранной проги нужен вывод на 2 экрана - на одном дельфи, а на другом - прога. В этой ситуации ты лишен права на ЛЮБОЙ Exception.

zzet (2003-12-20 10:22:00) [2]
up.

zzet (2003-12-18 20:45:00) [3]
Краснов вроде так и предлагает сделать..
Черный экран - это потеря контекста воспроизведения и такой способ наверное работает не на всех конфигурациях машин. Поэтому и спрашиваю, может кто сталкивался..

ProvAd (2003-12-18 19:24:00) [4]
Ой, точно glViewPort(0,0,1024,768);
Ну если это не помогло, то поищи в инете книгу М.Краснова. Там вроде было написано.

zzet (2003-12-18 18:20:00) [5]
Добавил к коду glViewPort(0,0,1024,768);
Черный экран. :-(

В Form.Resize у меня присутствует:
glViewport(0, 0, ClientWidth, ClientHeight);

Думаю glViewPort(0,0,1024,768); ничего не изменяет.

Может кто даст рабочий примерчик?

ProvAd (2003-12-18 16:47:00) [6]
После увеличения окна сделай glViewPort(1024,768) или смотря какое у тебя разрешение экрана.

Наверх

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