0 / 0 / 0
Регистрация: 05.04.2010
Сообщений: 5
|
||||||
1 | ||||||
Программа на Delphi c OpenGl05.04.2010, 15:10. Показов 4664. Ответов 8
Метки нет (Все метки)
Добрый день. У меня следующая проблема. На OpenGl в Delphi пишу программу которая должна нарисовать на экране заданное количество строк и три столбца. и в каждой ячейке вывести какой либо текст. Сижу потихоньку изучаю Краснова. Вероде удалось линиями разрисовать экран. Но как вывести в эти ячейки текст не могу понять. Пытаюсь написать по примерам Краснова, но что то не выходит... Туплю Помогите пожалуйста с этим разобраться
Привожу пример где я пытаюсь все это сделать.
0
|
05.04.2010, 15:10 | |
Ответы с готовыми решениями:
8
OpenGL в Delphi OpenGL в Delphi OpenGL Delphi openGL в Delphi 7 |
05.04.2010, 21:48 | 2 |
Что-то я кода не вижу для шрифта. Где он? Делфи какая используется? 7 или выше? Если выше, посмотрите как определён тип PChar. Он может определён как Unicode то есть PChar = PWideChar; Тогда измените в своей программе все PChar'ы на PAnsiChar'ы.
0
|
0 / 0 / 0
Регистрация: 05.04.2010
Сообщений: 5
|
|
06.04.2010, 10:37 [ТС] | 3 |
Использую Delphi 7. В этом примере я разграфил экран на ячейки. А вот как туда запихнуть трехмерный текст и чтобы он вращался я не знаю. Все примеры рассмотрел, но никак не возьму втолк как это сделать.
0
|
06.04.2010, 16:11 | 4 |
Вконце FormCreate добавляете инициализацию диплейлистов со шрифтами.
Уничтожение их(дисплейлистов) вначале деструктора FormDestroy Собственно рисование вставляете в FormPaint : например строка 51
0
|
0 / 0 / 0
Регистрация: 05.04.2010
Сообщений: 5
|
|||||||||||
06.04.2010, 17:52 [ТС] | 5 | ||||||||||
0
|
06.04.2010, 20:59 | 6 | |||||
wglMakeCurrent(dc, hrc);
перед wglUseFontOutlines поставте Ща у себя проверю... Добавлено через 42 минуты Короче проще оказалось переделать проект Kрасного:
Только у меня всё равно пока отказывается выводить русский шрифт.... Добавлено через 55 секунд на 2010 делфе
0
|
0 / 0 / 0
Регистрация: 05.04.2010
Сообщений: 5
|
||||||
07.04.2010, 12:45 [ТС] | 7 | |||||
Спасибо за пример. У меня на 7 нормально выводит русский текст. Вот только небольшая загвоздка. Не могу сделать его трехмерным. Я так понял что
0
|
07.04.2010, 17:25 | 8 |
crazypiggy, для трёхмерного вывода текста надо:
1.Установить формат пикселя с z буфером 2.Включить его 3.В glClear - очищать его 4.А так же задать в FormResize матрицу проекций 5.Вместо wglUseFontBitmaps использовать wglUseFontOutlines У Краснова это всё есть
0
|
0 / 0 / 0
Регистрация: 05.04.2010
Сообщений: 5
|
|
08.04.2010, 12:23 [ТС] | 9 |
Спасибо. Вроде разобрался.
0
|
08.04.2010, 12:23 | |
08.04.2010, 12:23 | |
Помогаю со студенческими работами здесь
9
Delphi и OpenGl OpenGl на Delphi OpenGL в Delphi OpenGl Delphi Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |