| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Модуль для рисования [D6, Win2k]
Ольга © (2002-03-13 10:50:00)Привет всем. Народ, подскажите, какой модуль надо подключить для того чтобы нарисовать круг или прямоугольник? Не могу понять...
Спасибо...
gek (2002-03-13 12:54:00) [1]SDS © верно говорит, надо использовать graph - стандартный модуль в TP.
Если его нет - увы искать надо
Ольга (2002-03-13 11:22:00) [2]Мне нужна программа под обыкновенный паскаль, просто я не для себя пишу...
SDS (2002-03-13 11:20:00) [3]to Ольга
См. выше :)
Ольга (2002-03-13 11:18:00) [4]А где можно простой паскаль скачать?
SDS (2002-03-13 11:17:00) [5]Опять промах сегодня мне не везет по скорости ответов:)
Слушай если ты под Windows пишешь, тогда это не пройдет, рисовать придеться, например, с использованием DirectX, а это уже совсем другая история, "родных" средств в Delphi нет
Ольга (2002-03-13 11:17:00) [6]Че-то он его не понимает, говорит что graph.dcu - не найден
SDS (2002-03-13 11:12:00) [7]Прошу прощения, пока писал вопрос уточнили, если на Паскале тогда GRAPH
Вот код для инициализации графики и вывода линий
GraphDriver := Detect;
InitGraph(GraphDriver, GraphMode, "");
if GraphResult <> grOk then begin
Writeln("Ошибочка!");
Halt(1);
end;
MoveTo(1, 10);
LineTo(10, 10);
Ольга (2002-03-13 11:10:00) [8]Нет, у меня формы нет, я создаю приложение для консоли, как бы просто Паскаль под Дос, при запуске программы - черный экран
SDS (2002-03-13 11:06:00) [9]В Delphi?
Используй свойство Canvas, есть у TForm, и рисуй на нем все что надо, у него (этого свойства) есть методы для рисования, есл нужно примеры могу выслать документ, глава из книги Пачеко как раз про рисование, пиши на "мыло"
Ольга (2002-03-13 10:58:00) [10]Уточняю, если писать в чистом Паскале...
| |
