Как сделать рисунок через делфи в фотошопе?
Описание алгоритма:
1. Запустить C:\путь_к_фотошопу\фотошоп.exe
2. Открыть файл PSD D:\File.psd
3. Изменить текст на слое №5 на текст из переменной
4. Удалить слой №2 и на его место добавить изображение с рандомной картинки в папке
5. Сохранить картинку под именем из переменной

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

На bmp изображении есть тела черного цвета самой причудливой формы, надо узнать координаты пикселей, которые входят в тот или иной объект изображения.перебераю пиксели пока не встречу первый черный. Потом думал рекурсивную функцию закинуть, но вот не знаю как организовать обработку того что соседе белые или черные(соседей 8). Перебирать все 256 вариантов для рекурсии нет смысла, а вот что-то более рациональное на ум не приходит.Может кто и сталкивался с такого рода задачами… Bmp можно перекрашивать на серый тон…

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

Очень хотелось бы отрисовать у себя в проекте круговую диаграмму в виде «бублика», видел красивые примеры у Касперского, и некоторых других.

Добился определенного успеха в этом деле:

Полный код, чтобы не загружать тему:
http://pastebin.com/SVnT0bww

Здесь зеленый цвет рисуется специально, в надежде как-то его потом убрать. Но не выходит.

Максимум, чего пока удалось добиться, это включение прозрачности у битмапа и указание прозрачного цвета. Но, даже при этом, убирается не вся «зелень» + жуткая лесенка по краям.
От чего я ушел на GDI+, при рисовании секторов.

Вот другие варианты.
Старый вариант, лесенка везде:

Вариант поновее, но убирается только внешние цвета и имеется лесенка.

Есть вариант
Как-то использовать маску, заранее нарисованную в фотошопе,

Но так и не понял, как ее приспособить…

Использую Delphi XE

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

В одномерном массиве, состоящем из n вещественных элементов, вычислить сумму элементов массива, расположенных после последнего нулевого элемента.

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

Есть адрес 192.168.1.1 (пример адрес может меняться), каким образом можно вытащить из строки в разные переменные каждое значение.
i:192
i1:168 итд
через цикл нашел положение каждой точки, а дальше как ?

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

Можно ли перехватить и самостоятельно обработать системное прерывание, например деление на 0?

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

Рамерность массива — А [2 х 4]
Тип елементов массива — char
Задание — В матрице поменять местами max и min элементы в Delphi

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

Составить программу вычисляющую формулу с произведениями:

P = П{i=1..10}(i*(i+a)/(i^2+a^2)) + П{k=2..4}(k^3/(k+a)), при a = 2.

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

Есть два TStringList

  SL1.Add('C:\1.txt');
  SL1.Add('C:\2.txt');
  SL1.Add('C:\3.txt');

  SL2.Add('C:\1.txt');
  SL2.Add('C:\2.txt');
  SL2.Add('C:\3.txt');
  SL2.Add('C:\4.txt');
  SL2.Add('C:\5.txt');

Сравниваем каждую запись SL1 с записями SL2. В итоге нужно вывести
C:\4.txt и C:\5.txt, так как их нет в SL1

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

Необходимо в строке подсчитать количество точек и вывести на экран строку, чтобы после каждой точки стоял  её порядковый номер.

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