|
Вопрос # 4 357/ вопрос решён / |
|
Здравствуйте!
Я не как не могу сделать графику типа как в Pascal, помогите мн пожалуйсто, может есть какой нибудь компонент!!!???
 |
Вопрос задал: Vollmond (статус: Посетитель)
Вопрос отправлен: 22 июня 2010, 18:44
Состояние вопроса: решён, ответов: 1.
|
Ответ #1. Отвечает эксперт: Вадим К
Здравствуйте, Vollmond!
можно рисовать на канве (canvas), она есть у многих компонентов. Оптимально для этого использовать PaintBox.
базовое рисование
PaintBox1.Canvas.MoveTo(x,y)
переместить "карандаш" в указаную точку
PaintBox1.Canvas.LineTo(x,y)
рисовать карандашом с старой точки в новую.
То есть, если нужно нарисовать линию, то нужно применить эти два метода последовательно.
PaintBox1.Canvas.Pen.Color := clGreen;
сделать карандаш зеленого цвета. clRed - красный, clBlack - черный, clWhite- белый, clYellow - желтый и так дальше.
PaintBox1.Canvas.Rectangle(x1,y1, x2, y2)
прямоугольник.
PaintBox1.Canvas.TextOut(x,y, 'test')
вывести текст test в заданных координатах.
Есть ещё много других - круг, кривые,закраска. спрашивайте, напишу.
 |
Ответ отправил: Вадим К (статус: Академик)
Время отправки: 22 июня 2010, 19:00
|
Мини-форум вопроса
Всего сообщений: 11; последнее сообщение — 27 июня 2010, 12:36; участников в обсуждении: 5.
|
min@y™ (статус: Доктор наук), 22 июня 2010, 19:01 [#1]:
Чего тебе надо нарисовать-то?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
bugmenot (статус: 3-ий класс), 22 июня 2010, 21:04 [#2]:
А в турбопаскале было два разных модуля для рисования, кстати (подозреваю, что он хочет враппер совместимый с graph)
виконання програми розпочинається з того самого мiсця, де призупинилося.
|
|
|
min@y™ (статус: Доктор наук), 22 июня 2010, 22:11 [#3]:
Цитата (bugmenot):
подозреваю, что он хочет враппер совместимый с graph
Вполне возможно. Но неявно.
А телепатор мне за неуплату отрубили... 
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
Vollmond (статус: Посетитель), 23 июня 2010, 13:54 [#4]:
Мне бы простое графическое окошко, типа как модуль Graph, в Pascal!!
|
|
|
Vollmond (статус: Посетитель), 23 июня 2010, 14:00 [#5]:
Canvas - тоже подойдёт, но почему-то, он у меня как то не ресует в PaintBox! Может там что-то надо создать!? И ещё вопрос, а как задать фон в PaintBox или Canvas??
|
|
|
min@y™ (статус: Доктор наук), 23 июня 2010, 14:08 [#6]:
Скажи, что тебе надо нарисовать, я пример напишу. А то подыхаю от скуки на работе. А до конца рабочего дня ещё 3 часа.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
Vollmond (статус: Посетитель), 24 июня 2010, 13:47 [#7]:
Вообще, мне надо сделать простенький 3D движок, это типа курсача, а я вот не могу ни как найти простой 2D движок даже!!
|
|
|
Вадим К (статус: Академик), 24 июня 2010, 13:51 [#8]:
о, это уже интересней
Нужно свой сделать или можно поиспользовать готовое?
гуглим на тему OpenGL + Краснов и ищем книгу с примерами.
Галочка "подтверждения прочтения" - вселенское зло.
|
|
|
Vollmond (статус: Посетитель), 27 июня 2010, 10:21 [#9]:
необходимо сделать самому, это курсач!!! Не используя готовых компонентов!!!
|
|
|
min@y™ (статус: Доктор наук), 27 июня 2010, 10:31 [#10]:
Что подразумевается под фразой "простенький 3D движок"? Что программа делать-то должна?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
SOA (статус: Посетитель), 27 июня 2010, 12:36 [#11]:
Если надо сделать простенький 3d движок качай книгу Focus On 3D Terrain Programming с примерами. Она вся на английском, но там ЕСТЬ ГОТОВЫЕ ПРИМЕРЫ, в твоем случае я думаю подойдет самый первый.
|
26 июня 2012, 12:32: Статус вопроса изменён на решённый (изменил модератор DNK)
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
