Наконец получилось сделать игру, хотя бы демонстрационную версию.
Что представляет из себя эта аркада: придти из точки A в точку B через препятствия. Препятствия в данной игре фаерболлы(FireBalls) и стены. Особенность игры (чисто для меня): поддержка размера карт от 800 до 30000(даже больше) пикселей. На экране прорисовывается только та часть, на которой находится игрок.
Управление игроком:
Стрелка вправо — Вправо
Стрелка влево — Влево
Стрелка вверх — прыжок рядом с препятствием
Неплохая графика и полноэкранный режим(800 * 600).
В-общем, оценивайте, критикуйте, пишите. Спасибо.

Вложения

Игра.rar (183.4 Кб)

тема на форуме

Как можно нарисовать в Делфи стрелку в канвасе??? Нужно вывести граф и связи обозначить стрелками, с ними то вся и проблема.

(читать всё…)

Передо мной встала такая проблема: необходимо сделать приложение, чтобы в центре формы был полупрозрачный кусок, и регулировать прозрачность этого куска. На этом месте должен быть picturebox или Image. Причем, еще и непрозрачный для нажатия. То есть форма остается поверх всех окон, а когда я нажимаю на прямоугольник с картинкой, клик уходит в окно, которое под моим приложением (например Paint, photoshop или граффити вконтакте). Как такую вещь можно реализовать? Подскажите, можно с WPF.
Смог найти решение, только сделав две формы — одну полупрозрачную, вторую обычную, куда закинуть контроллы, но мне нужно именно так, как показано на рисунке, то есть дыра внутри формы.

(читать всё…)

Пусть задана окружность (x0,y0,r0). Необходимо внутри разместить случайные точки так, чтобы они были распределены равномерно.

Решение в лоб:

  with canvas do begin
    Ellipse(x0-r0,y0-r0,x0+r0,y0+r0);
    for i := 1 to 10000 do begin
      a:=2*Pi*random;
      r:=r0*random;
      x:=x0+round(r*cos(a));
      y:=y0+round(r*sin(a));
      Pixels[x,y]:=clred;
    end;
  end;

Но понятно, что распределение не равномерное, плотность точек выше к центру круга:

Есть идеи, как распределить точки равномерно?

(читать всё…)

Задача такова. У меня имеется png рисунок, созданный в photoshop, свойство которого прозрачность 50%, т.е. полупрозрачность. Подскажите, как мне с помощью Canvas перенести этот прозрачный png из image1 на image2 не теряя прозрачности фона (нужно чтобы его не было) и не теряя полупрозрачности самого png объекта? Само изображение приложил к этому посту.

(читать всё…)

Имеется:
1. База данных преподавателей и студентов в MS SQL Server 2005
2. В ней находится 5 таблиц: Факультеты, Группы, Преподаватели, Предметы и Основная.
3. Поля в первых 4 таблицах соответствуют их названиям (не считая целочисленные ключевые поля-идентификаторы). В них просто перечислены все группы, все преподаватели, все предметы и все факультеты
4. Последняя таблица состоит из 4 полей с теми же именами
Задача:
При введении данных в поля Основной таблицы необходимо обеспечить подстановку из таблиц Факультеты, Группы, Преподаватели и Предметы в соответствующие поля, т.е. чтобы не вводить полностью имя препода, который ведёт один из своих предметов у определённой группы на таком-то факультете, а обеспечить возможность выбора данных из динамически формирующегося списка при, скажем, установке курсора в нужное поле (это вообще было бы идеально), т.е. как в конструкторе — собрать Основную таблицу по деталям из четырёх других.
Поскольку связь в Основной таблице идёт многие ко многим, то, пожалуй, будет надобность создавать промежуточные таблицы
Вопрос:
Существуют ли способы, какие-либо select-запросы или ещё что-то, чтобы это можно было осуществить?

(читать всё…)

Библиотека для работы с графикой. Поддерживаются следующие форматы:

TIFF images (*.tif; *.tiff)
GFI fax images (*.fax)
SGI images (*.bw, *.rgb, *.rgba, *.sgi)
Autodesk images files (*.cel; *.pic)
Truevision images (*.tga; *.vst; *.icb; *.vda; *.win)
ZSoft Paintbrush images (*.pcx, *.pcc; *.scr)
Kodak Photo-CD images (*.pcd)
Portable pixel/gray map images (*.ppm, *.pgm, *.pbm)
Dr. Halo images (*.cut, *.pal)
CompuServe images (*.gif)
SGI Alias/Wavefront images (*.rla, *.rpf)
Standard Windows bitmap images (*.bmp, *.rle, *.dib)
Photoshop images (*.psd, *.pdd)
Paintshop Pro images (*.psp)
Portable network graphic images (*.png)
(читать всё…)

Пожалуйста помогите, нарисовать движущийся корабль в Delphi.

(читать всё…)

Как определить запуск полноэкранного 3D приложения? Мне необходимо останавливать работу приложения при запуске, например, видеоигры.
Пишу GUI под консольный клиент распределённых вычислений, надоело его ручками останавливать/запускать.

(читать всё…)

Необходимо получить координаты курсора мыши относительно формы не используя таймера.
А MouseMove не подходит так как у меня форма в основном на ней динамические объекты а цель получения координат мыши необходимо для отслежки в каких координатах нужно расположить динамические лейблы узнать этого нельзя так как имаджи на которых нужно разместить лэйблы размещаются динамически то есть программным путем тем более через массив
Вот скрин

Пока нумерация сделана через фотошоп но мне охото сделать программно темболее она будет тогда качественнее и даст пару возможностей.

(читать всё…)