Графика в Free Pascal |
Графика в Free Pascal |
abv |
11.11.2004 18:18
Сообщение
#1
|
Группа: Пользователи Сообщений: 3 Пол: Мужской Репутация: 0 |
Есле у кого-то есть какая-нибудь инфа по работе с графикой в Free Pascal, скиньте плиз. Т.к. отличается работа с графикой во Фри паск, от Турбо паск.
|
Altair |
12.11.2004 7:19
Сообщение
#2
|
Ищущий истину Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Принципиально ни чем...
Но есть новые возможности, вот здесь подробно описанны они: (не обращайте на то, что там про TMT, почто все есть в FPC). http://pascal.sources.ru/tmt/doc/graph.htm К 32 битным компиляторам есть отличные графические библиотеки с поддержкой OpenGL, например GraphiX, она поддерживает много медиа форматов: Цитата BMP - Windows Bitmap (uncompressed) Color Depth - 1,4,8,24 bits Color Depth - 15,16,32 bits Encoding/Compression - RLE4, RLE8 CUR - Windows Cursor (uncompressed) Color Depth - 1,4,8,24 bits Encoding/Compression - RLE4, RLE8 Multiple Image GIF - Graphics Interchange Format Color Depth - 1-8 bits Encoding/Compression - LZW Multiple Image ICO - Windows Icon (uncompressed) Color Depth - 1,4,8,24 bits Encoding/Compression - RLE4, RLE8 Multiple Image JPG - JPEG Image Format Color Depth - grayscale, RGB Encoding/Compression - standard, extended, progressive PCX - Zsoft Paintbrush Color Depth - 1,4,8,8-gray, 24 bits (no 4 bit) Encoding/Compression - RLE4, RLE8 PNG - Portable Network Graphics Color Depth - all Encoding/Compression - Huffmann PBP/PGM/PPM - Portable Bit/Gray/Pixel Map Color Depth - monochrome, gray, RGB Encoding - ASCII, binary TGA - Truevision Targa (uncompressed, RLE) Color Depth - 8,16,24,32 bits TIF - Tagged Image Format (uncompressed) Color Depth - bilevel, palettized, RGB, CMYK Encoding/Compression - packbits, LZW Multiple Image Image Saving Support for ... GraphiX for Freepascal GraphiX for Borland Pascal BMP - Windows Bitmap - 24bit uncompressed PPM - Portable Pixel Map - ASCII TGA - Truevision Targa - 24bit uncompressed Animation and Video Support for ... GraphiX for Freepascal GraphiX for Borland Pascal AVI - Audio Video Interleave DIB - uncompressed - 8,16,24,32 bits MS-RLE - 8 bits MS Video 1 - 8,16 bits Radius Cinepak - 24 bits FLI/FLC - Autodesk Animator - Animations Color Depth - 8 bits GIF - GIF Animations Color Depth - 1-8 bits MOV - Apple Quicktime Movie Apple Animation - 8,16,24 bits Radius Cinepak - 24 bits Очень рекомендую эту библиотеку, она имеет отличный справочник, и очень быстрая. Скачать можно отсюда: http://stud3.tuwien.ac.at/%7Ee9826443/graphix/gxframe.html -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
Romtek |
14.11.2004 22:42
Сообщение
#3
|
Знаток Группа: Пользователи Сообщений: 303 Пол: Мужской Реальное имя: Роман Репутация: 2 |
Здесь я это описал:
Графика в FPC, модуль Graph (Сообщ. #15) -------------------- Romiras HomeLab- материалы и статьи по разработке ПО, моделирование алгоритмов, обработка и анализ информации, нейронные сети, машинное зрение и прочее.
|
SKVOZNJAK |
23.11.2004 7:11
Сообщение
#4
|
Профи Группа: Пользователи Сообщений: 930 Пол: Мужской Репутация: 11 |
За отсутсвием русской инфы я занимался ручной коррекцией машинного перевода. К сожалению, руки не дошли до конца модуля граф, но нужно рубить концы, иначе это никогда не закончится Чтобы расшифровать перевод желательно посматривать в непереведённый вариант и в оригинальную html инфу прилагаемую к компилятору.
http://stiratel7.narod.ru/1/z0.html |
Romtek |
14.12.2004 22:27
Сообщение
#5
|
Знаток Группа: Пользователи Сообщений: 303 Пол: Мужской Реальное имя: Роман Репутация: 2 |
Кстати, кто знает, почему в нём не устанавливаются режимы 16-bit и выше?
С 8-bit всё нормально... -------------------- Romiras HomeLab- материалы и статьи по разработке ПО, моделирование алгоритмов, обработка и анализ информации, нейронные сети, машинное зрение и прочее.
|
Guest |
16.12.2004 17:45
Сообщение
#6
|
Гость |
15 и 16 битные режимы в модуле граф устанавливаются, только вот на выходе из видухи получаются не те цвета Тут какая-то несовместимось или недоработка. Заплатили-бы разработчикам за их труд, так и 24 битный режим наверняка пошёл бы на ура
|
MeD |
12.01.2005 1:56
Сообщение
#7
|
Пионер Группа: Пользователи Сообщений: 61 Пол: Мужской Репутация: 1 |
http://www.freepascal.org/contrib/db.php3 - для тех кто любит готовенькое
|
MeD |
14.01.2005 16:22
Сообщение
#8
|
Пионер Группа: Пользователи Сообщений: 61 Пол: Мужской Репутация: 1 |
Цитата К 32 битным компиляторам есть отличные графические библиотеки с поддержкой OpenGL, например GraphiX Олег, ну нету там подержки OpenGL. Он на DirectX основан. |
warner |
14.03.2005 21:45
Сообщение
#9
|
Гость |
При попытке откомпилить Graphix для Фри паскаля выдает, что не найден модуль system ((( Перерыл все папки, но модуль этот так и не нашел (((
Что делать? |
Guest |
14.03.2005 22:12
Сообщение
#10
|
Гость |
Цитата(warner @ 14.03.05 21:45) При попытке откомпилить Graphix для Фри паскаля выдает, что не найден модуль system ((( Перерыл все папки, но модуль этот так и не нашел ((( Что делать? Ой, то есть не систем, а DIRECTDRAW Меня проглючило, не то написал (((((((( |
Altair |
14.03.2005 22:12
Сообщение
#11
|
Ищущий истину Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: 45 |
1. GraphiX можно скомпилировать компилятором FPC 1.0.9 и FPC 1.9.8 aka 2RC
2. Target выстави в Win32, а у тебя наверно DOS32 стоит -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
Altair |
14.03.2005 22:15
Сообщение
#12
|
Ищущий истину Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: 45 |
А DirectDraw конечно, потому что еще надо скачать для компиляции библиотеку DirectXDist
из этой темы Цитата Библиотека для работы с DirectX скачать -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
Guest |
14.03.2005 23:02
Сообщение
#13
|
Гость |
У меня FP 1.0.10 Full
Теперь все откомпилилось, только в модуле DirectX ругалось на слишком длинную строку.... Завтра буду разбираться, спасибо за подсказку!!!! |
Altair |
15.03.2005 7:36
Сообщение
#14
|
Ищущий истину Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Так ты исправил строку длинную?
Или с чем ты хочешь разбираться? Если что, обращайся... -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
warner |
15.03.2005 12:31
Сообщение
#15
|
Группа: Пользователи Сообщений: 8 Пол: Мужской Репутация: 0 |
Я буду разбираться с рисованием с использованием этого модуля....
8) |
warner |
22.03.2005 20:17
Сообщение
#16
|
Группа: Пользователи Сообщений: 8 Пол: Мужской Репутация: 0 |
Код uses graphix,crt; var BEGIN InitGraphiX(ig_vesa,ig_lfb); SetModeGraphiX(640,480,ig_col8); bar(0,0,getmaxX,getmaxY,10); rectangle(50,50,getmaxX-50,getmaxY-50,0); readkey; END. По идее программа должна отрисовать то что указано и ждать нажатия на кнопку, а потом выключаться... Но она не реагирует ни на одну кнопку, попросту зависает....приходится вырубить через трехпальцевую комбинацию (((( Как можно поправить эту ситуацию Сообщение отредактировано: warner - 22.03.2005 20:20 |
Altair |
22.03.2005 20:22
Сообщение
#17
|
Ищущий истину Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Дык кто -же использует CRT ?????
Заменяй на GXCRT..... тут даже WinCRT не пройдет, у GraphiX'a свое все! -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
APAL |
22.03.2005 20:23
Сообщение
#18
|
Смотрю... Группа: Модераторы Сообщений: 1 055 Пол: Мужской Реальное имя: Пшеничный Алексей Анатольевич Репутация: 6 |
Со фрии паскалем не работал... но разве не надо там указывать CloseGraph; ?
-------------------- |
Altair |
22.03.2005 20:25
Сообщение
#19
|
Ищущий истину Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: 45 |
А, еще совет, ты цвет указываешь как в TP всегдла указывается.... зачем? есть гораздо более эфективный способ!
RGBColorRGB(r,g,B) где r, g,b -компоненты цвета.... -очень удобно! пример черного: bar(0,0,getmaxX,getmaxY,rgbcolorrgb(0,0,0)); -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
Altair |
22.03.2005 20:26
Сообщение
#20
|
Ищущий истину Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Цитата Со фрии паскалем не работал... но разве не надо там указывать CloseGraph; ? теоретически он есть. Но его не особо приятно использовать -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
Текстовая версия | 1.10.2024 6:02 |