Раскладка рисунков

[Hollow]

Имеется произвольный контур (фотография куска кожи), необходимо разместить на нем определенное число заготовок сложной формы (тоже картинки) так, чтобы заготовки можно было перетаскивать по поверхности кожи мышью и поворачивать на любой угол. Подскажите, как это лучше реализовать средствами Delphi? Заранее спасибо.

[mutabor]

1. Используйте буферизацию (обсуждалось, юзайте поиск по форуму).

2. Лучше используйте TPaintBox для вывода на экран.

3. Перетаскивание тоже обсуждалось, по сути это просто отрисовка объекта в новых координатах, для этого и нужен буфер, чтобы исходное изображение оставалось неизменным, а рисовать поверх него объекты в буфере, затем вывод на экран. Для перетаскивания вам нужно обрабатывать событие OnMouseMove и его параметр Shift, либо дополнительно OnMouseDown, это заменит параметр Shift, тогда нужно объявить глобальную переменную-флаг типа boolean и по OnMouseUp сбрасывать его.

4. Самое сложное это поворот. Тут два пути, либо "растровый" поворот, либо "векторный", в зависимости что вы хотите поворачивать. Для первого ищите "поворот битмапа на произвольный угол Delphi". Векторным можно крутить всяческие графические примитивы и их комбинации, т.е. вокруг оси поворачивается не все изображение, а точки сочленения и между ними рисуются линии. Скорее всего вам нужен первый тип поворота.