Последние записи
- Удаление папки с файлами
- Распечатка файла
- Преобразовать массив байт в вещественное число (single)
- TChromium (CEF3), сохранение изображений
- Как в Delphi XE обнулить таймер?
- Изменить цвет шрифта TextBox на форме
- Ресайз PNG без потери прозрачности
- Вывод на печать графического файла
- Взаимодействие через командную строку
- Перенести программу из Delphi в Lazarus
Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk
Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw
10th
Сен
FullHD Плеер в Delphi
Даже в Delphi 10.1 стандартный плеер поддерживает видео только HD качества.
Мне же нужно воспроизводить FullHD видео.
В связи с этим стандартный компонент не подходит!
Можете посоветовать видеоплеер с api через который я смогу из Делфи запускать нужные мне видосы…
14th
Июл
Получения координат мыши относительно формы без таймера
Извеняюсь если вопрос уже задавался но в гугле 3 страницы просмотрел там либо таймер либо MouseMove собственно вопрос в теме тоесть цель необходимо получить координаты курсора мыши относительно формы не используя таймера
А MouseMove не подходит так как у меня форма в основном на ней динамические объекты а цель получения координат мыши необходимо для отслежки в каких координатах нужно расположить динамические лейблы узнать этого нельзя так как имаджи на которых нужно разместить лэйблы размещаются динамически тоесть програмным путем темболее через массив
Вот скрин
Пока нумерация сделана через фотошоп но мне охото сделать програмно темболее она будет тогда качественее и даст пару возможностей.
16th
Апр
Равномерное распределение точек в круге
Пусть задана окружность (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;
Но понятно, что распределение не равномерное, плотность точек выше к центру круга:
Есть идеи, как распределить точки равномерно?
16th
Canvas и полупрозрачный .png
Задача такова. У меня имеется png рисунок, созданный в photoshop, свойство которого прозрачность 50%, т.е. полупрозрачность. Подскажите, как мне с помощью Canvas перенести этот прозрачный png из image1 на image2 не теряя прозрачности фона (нужно чтобы его не было) и не теряя полупрозрачности самого png объекта? Само изображение приложил к этому посту.
10th
Апр
Нарисовать движущийся корабль (Делфи)
Пожалуйста помогите, нарисовать движущийся корабль в Delphi.
9th
Апр
Как определить запуск 3D приложения?
Как определить запуск полноэкранного 3D приложения? Мне необходимо останавливать работу приложения при запуске, например, видеоигры.
Пишу GUI под консольный клиент распределённых вычислений, надоело его ручками останавливать/запускать.
9th
Создание рисунка в Photoshop через Delphi
Как сделать рисунок через делфи в фотошопе?
Описание алгоритма:
1. Запустить C:\путь_к_фотошопу\фотошоп.exe
2. Открыть файл PSD D:\File.psd
3. Изменить текст на слое №5 на текст из переменной
4. Удалить слой №2 и на его место добавить изображение с рандомной картинки в папке
5. Сохранить картинку под именем из переменной
8th
Апр
На bmp изображении есть тела черного цвета самой причудливой формы, надо узнать координаты пикселей, которые входят в тот или иной объект
На bmp изображении есть тела черного цвета самой причудливой формы, надо узнать координаты пикселей, которые входят в тот или иной объект изображения.перебераю пиксели пока не встречу первый черный. Потом думал рекурсивную функцию закинуть, но вот не знаю как организовать обработку того что соседе белые или черные(соседей 8). Перебирать все 256 вариантов для рекурсии нет смысла, а вот что-то более рациональное на ум не приходит.Может кто и сталкивался с такого рода задачами… Bmp можно перекрашивать на серый тон…
8th
GDI\GDI+\Photoshop — как добиться прозрачности пикселей определенного цвета?
Очень хотелось бы отрисовать у себя в проекте круговую диаграмму в виде «бублика», видел красивые примеры у Касперского, и некоторых других.
Добился определенного успеха в этом деле:
Полный код, чтобы не загружать тему:
http://pastebin.com/SVnT0bww
Здесь зеленый цвет рисуется специально, в надежде как-то его потом убрать. Но не выходит.
Максимум, чего пока удалось добиться, это включение прозрачности у битмапа и указание прозрачного цвета. Но, даже при этом, убирается не вся «зелень» + жуткая лесенка по краям.
От чего я ушел на GDI+, при рисовании секторов.
Вот другие варианты.
Старый вариант, лесенка везде:
Вариант поновее, но убирается только внешние цвета и имеется лесенка.
Есть вариант
Как-то использовать маску, заранее нарисованную в фотошопе,
Но так и не понял, как ее приспособить…
Использую Delphi XE
Облако меток
css реестр ассемблер timer SaveToFile ShellExecute программы массив советы word MySQL SQL ListView pos random компоненты дата LoadFromFile form база данных сеть html php RichEdit indy строки Win Api tstringlist Image мысли макросы Edit ListBox office C/C++ memo графика StringGrid canvas поиск файл Pascal форма Файлы интернет Microsoft Office Excel excel winapi журнал ПРОграммист DelphiКупить рекламу на сайте за 1000 руб
пишите сюда - alarforum@yandex.ru
Да и по любым другим вопросам пишите на почту
пеллетные котлы
Пеллетный котел Emtas
Наши форумы по программированию:
- Форум Web программирование (веб)
- Delphi форумы
- Форумы C (Си)
- Форум .NET Frameworks (точка нет фреймворки)
- Форум Java (джава)
- Форум низкоуровневое программирование
- Форум VBA (вба)
- Форум OpenGL
- Форум DirectX
- Форум CAD проектирование
- Форум по операционным системам
- Форум Software (Софт)
- Форум Hardware (Компьютерное железо)