Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Графика и игры
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #61  
Старый 10.11.2014, 15:32
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Можно, но это не из-за этого. Однозначно связано с текстурами. Ранее я выкладывал вариант на VCL, там несколько отличный способ загрузки текстур и точек также нет.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием
  #62  
Старый 10.11.2014, 17:12
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
По умолчанию

Цитата:
Сообщение от Alegun
Наиболее заметная разница в этих версиях, так это размер исполняемого файла - от оригальных 672х Кб до 33.5 Кб в варианте на API, что выложил angvelem, причём без потери функциональности: точно есть повод задуматься
Нашли над чем корпеть.
__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.


На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию
Ответить с цитированием
  #63  
Старый 10.11.2014, 17:24
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Над чем? Есть заготовки, только рабочий код перекидывай. На форматирование гораздо больше времени ушло.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием
  #64  
Старый 10.11.2014, 19:16
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
По умолчанию

Цитата:
Сообщение от angvelem
Над чем?
Над дрочкой за размер бинарника и использованием WinAPI вместо VCL.
__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.


На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию
Ответить с цитированием
  #65  
Старый 10.11.2014, 19:50
Аватар для Pilot_Red
Pilot_Red Pilot_Red вне форума
Продвинутый
 
Регистрация: 01.11.2006
Адрес: Карелия
Сообщения: 702
Версия Delphi: D7
Репутация: 11581
По умолчанию

Цитата:
Сообщение от Alegun
З.Ы.

Она помогает лишь для основного ландшафта, на обезьянке иногда всё же проскакивают светлые точки, но это наверное уже не вылечить поскольку её образ в shar.obj не изменить. Или можно?
Можно, как сказал anglvelem у меня другой способ загрузки текстур!
Ответить с цитированием
  #66  
Старый 10.11.2014, 19:54
Аватар для Pilot_Red
Pilot_Red Pilot_Red вне форума
Продвинутый
 
Регистрация: 01.11.2006
Адрес: Карелия
Сообщения: 702
Версия Delphi: D7
Репутация: 11581
По умолчанию

Цитата:
Сообщение от angvelem
А ларчик просто открывался. Теперь сделаешь задуманное и явишь миру задуманное чудо.
Ну на самом деле ничего сверх естественного я не сделал, просто для работы пишу корпоративный скреенсейвер(уже можно сказать дописал), как начальство одобрит на тиражирование, так сразу выложу на ваш суд, а может в скором времени сами увидите мое творение

Последний раз редактировалось Pilot_Red, 10.11.2014 в 20:17.
Ответить с цитированием
  #67  
Старый 10.11.2014, 20:11
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
 
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию

Оффтоп:
Цитата:
Сообщение от Pilot_Red
Можно..!
Да я просто на расширение *.obj купился, думал что это готовый бинарник, но теперь благодаря этой общей тестильне выяснил и что это за текстовый файл, и как он в нутри организован, в смысле вершины-нормали-координаты, и, ну точно, с этим вашим оупенГЛ, по-любому не забалуешь
Ответить с цитированием
  #68  
Старый 10.11.2014, 20:13
Аватар для Pilot_Red
Pilot_Red Pilot_Red вне форума
Продвинутый
 
Регистрация: 01.11.2006
Адрес: Карелия
Сообщения: 702
Версия Delphi: D7
Репутация: 11581
По умолчанию

И так товарищи, подводя итоги:
Во-первых, хочу сказать всем спасибо,кто принял участие в тестировании+отдельно еще раз Мэду!
Во-вторых, в своем проекте я все оставил, почти, без изменений, только закоментил тот код, который отвечает за очистку текстуры из ОЗУ

//DeleteDC(MemDC);
// Bitmap.Free;


+

// for i:=0 to countbann-1 do
// freemem(Databann[i]);
//for i:=0 to 5 do
//freemem(DataArray[i]);


данная версия у меня и на других ПК работает на 100%


Конечно, остались вопросы:
1.почему все заработало именно после того, как мы закоментили все, что выше??
Ведь по сути дела, мы загрузили текстуру в память видеокарты, в оперативке она нам больше не нужна, а видеокарте тем более!
2. Почему на некоторых конфигурациях все работает, а на некоторых с глюками??

Последний раз редактировалось Pilot_Red, 10.11.2014 в 20:15.
Ответить с цитированием
  #69  
Старый 11.11.2014, 00:22
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Цитата:
Сообщение от M.A.D.M.A.N.
Над дрочкой за размер бинарника и использованием WinAPI вместо VCL.
С чего бы такая агрессия?

to Pilot_Red:
Всё же замени строку
Код:
 glTexImage2d(GL_TEXTURE_2D, 0, 3, biWidth, biHeight, 0, GL_RGB, GL_UNSIGNED_BYTE, Data);
на
Код:
 glTexImage2d(GL_TEXTURE_2D, 0, 3, biWidth, biHeight, 0, GL_BGR, GL_UNSIGNED_BYTE, Data);
не нужно будет байты в битмапе ротировать, выиграешь на этом время.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием
  #70  
Старый 11.11.2014, 07:53
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
По умолчанию

Цитата:
Сообщение от angvelem
С чего бы такая агрессия?

Да не агрессия это. Просто мне кажется это совсем для гиков, когда вылизываешь программу, чтоб в ней небыло лишнего килобайта.
__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.


На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию
Ответить с цитированием
  #71  
Старый 11.11.2014, 10:56
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Значит я этот гик, хотя и не знаю что сие значит.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием
  #72  
Старый 11.11.2014, 11:59
Аватар для Freeman
Freeman Freeman вне форума
Местный
 
Регистрация: 05.10.2012
Адрес: Санкт-Петербург
Сообщения: 576
Версия Delphi: 6
Репутация: выкл
По умолчанию

Да нет, тут вполне логично: в программе OpenGL нет особенного смысла использовать VCL, если вся графика выводится через OpenGL и форм не планируется. В больших проектах часто пишут свои классы, делающие то же, что и стандартные, чтобы не зависеть от чужих глюков, например.
__________________
Не стоит путать форумы с богадельнями. © Bargest
Ответить с цитированием
  #73  
Старый 11.11.2014, 12:06
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
По умолчанию

Раз пошла такая пьянка, то я бы вообще заюзал SDL, чтоб вообще не зависеть ни от чего.
__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.


На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию
Ответить с цитированием
  #74  
Старый 05.12.2014, 01:23
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Кргда мы увидим обещанный чудо-проект?
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 23:56.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter