Модераторы: Snowy, Alexeis, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Инициализация графики, ищеш. ищешь, а ни чего нет 
:(
    Опции темы
NewDima
Дата 9.3.2006, 13:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 922
Регистрация: 20.2.2006
Где: <?here?>

Репутация: нет
Всего: 12



Народ, извините за глупую просьбу, объясните, поожалуйста, как инициализировать в делфе графический режим, ну совсем задолбалсяискать, везде говорят про изображения, или назовите какойнить хорошенький ресурчик в сети по графе
Я говорю про графику типа на паскале - uses graph; и т.д.
На паскале то я знаю, а как здесь...
Помогите, чем сможете smile
PM ICQ   Вверх
z-END
Дата 9.3.2006, 13:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


прафесар™
****


Профиль
Группа: Комодератор
Сообщений: 3014
Регистрация: 13.3.2003
Где: Венья, Пиетари

Репутация: нет
Всего: 102



Canvas =)


--------------------
Каждый чилавек пасвоему праф...а памоему НЕТ! 

PM WWW ICQ   Вверх
Kesh
Дата 9.3.2006, 13:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Эксперт
Сообщений: 2488
Регистрация: 31.7.2002
Где: Германия, Saarbrü cken

Репутация: 1
Всего: 54



NewDima, читай статьи по DirectX и OpenGL...


--------------------
user posted image
PM MAIL WWW ICQ Skype   Вверх
NewDima
Дата 9.3.2006, 13:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 922
Регистрация: 20.2.2006
Где: <?here?>

Репутация: нет
Всего: 12



Читал я про DirectX на codenet, например, но там ничего непонятно!
Народ, практичечски, практически ("слова, слова, слова")
PM ICQ   Вверх
s-mike
Дата 10.3.2006, 08:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 425
Регистрация: 16.1.2005
Где: Киев

Репутация: 5
Всего: 16



http://delphigfx.mastak.ru/ - большое количество примеров и неплохие статьи.
PM MAIL WWW   Вверх
NewDima
Дата 13.3.2006, 13:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 922
Регистрация: 20.2.2006
Где: <?here?>

Репутация: нет
Всего: 12



Ето конечно хорошо, но я этот сайт вдоль и поперек исползал весь. Там интересно говорится про DirectX, не затрагивая Delphi.
кто-нить, ну хотя бы набросайте мне текстик, рисующий синусоду на черном экране, тогда легче будет
PM ICQ   Вверх
Snowy
Дата 13.3.2006, 14:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 18
Всего: 484



Запускаешь Delphi.
Автоматически создается новый проект.
В окне Object Incpector выбираешь закладку Events.
Ищешь в нем OnCreate. Делаешь на нем двойной клик.
Появляется такой код:
Код
procedure TForm1.FormCreate(Sender: TObject);
begin

end;

Заменяешь его на вот этот:
Код
procedure TForm1.FormCreate(Sender: TObject);
var
  img: TImage; // Image
  bmp: TBitMap; // на нем рисуем
  x, y: integer;
begin
  DoubleBuffered := true; // это неважно
  img := TImage.Create(Self); // создаем Image
  img.Parent := Self; // кладем его на форму
  img.Align := alClient; // растягиваем на всю форму
  img.Stretch := true; // включаем масштабирование при изменении размеров формы
  bmp := TBitmap.Create; // создаем картинку
  bmp.Width := img.Width;   // задаем ширину - во весь Image
  bmp.Height := img.Height; // задаем высоту - во весь Image
  with bmp.Canvas do // работаем с холстом
  begin
    Brush.Color := clBlack; // ставим цвет кисти - черный
    FillRect(Rect(0, 0, Width, Height)); // рисуем черный прямоугольник во весь холст
    Pen.Color := clLime; // устанавливаем цвет линий - зеленый
    Pen.Width := 4;      // устанавливаем толщину линий - 4
    y := bmp.Height div 2; // вычисляем y для нашей оси x. (0 - верх холста)
    PenPos := Point(0, y); // ставим начальную позицию в точку (0, 0)
    for x := 0 to Width do // цикл рисования графика
      LineTo(x, Round(sin(x / Width * pi * 4) * (Height / 3) + y));
  end;
  img.Picture.Graphic := bmp; // присваиваем нашу картинку Image'у
  bmp.Free; // Все, картинка нам больше не нужна - убиваем.
end;
Нажимаешь F9.

P.S. И купи себе книжку по Delphi.
PM MAIL   Вверх
NewDima
Дата 14.3.2006, 12:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 922
Регистрация: 20.2.2006
Где: <?here?>

Репутация: нет
Всего: 12



Книжка есть, вот графики там нет! А за пример спасибо.
PM ICQ   Вверх
svarogik
Дата 26.3.2006, 16:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 159
Регистрация: 20.3.2006

Репутация: нет
Всего: нет



не разобрался как запускать это все, делфи запустить смог, остальное непонятно.
Кстати как там в консольном режиме писать, а то я в паскале писал, а в делфи куча всяких кнопок, глаза разбегаются и ничерта непонятно, если имеет какое нибудь значение то делфа 7-ая
PM MAIL   Вверх
Snowy
Дата 27.3.2006, 09:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 18
Всего: 484



svarogik,
Цитата(Snowy)
купи себе книжку по Delphi

PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Звук, графика и видео"
Girder
Snowy
Alexeis

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • По вопросам разработки игр стоит заглянуть сюда

FAQ раздела лежит здесь!


Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Girder, Snowy.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Звук, графика и видео | Следующая тема »


 




[ Время генерации скрипта: 0.0573 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.