Форум программистов и сисадминов Киберфорум

Темы раздела Delphi: Графика, звук, видео

Распознать штрих код
Мне хотелось бы (необходимо) написать прогу для распознавания штрихкодов, по идеи под андроид но до этого еще далеко. В интернете нашел много всяких архивчиков но все они не работают. Как мне...

Воспроизведение midi файлов ,с использованием sg2 банков в Delphi приложении
Не совсем понимаю как это делать. Мне нужно воспроизвести midi файл с помощью Delphi , без помощи проигрывателя Windows. TMidi у меня не работает , по непонятным причинам. Все uses использую какие...

Прошу помощи с подключением ffmpeg
Здравствуйте уважаемые форумчане, помогите пожалуйста подключить библиотеки ffmpeg. Объясните как это можно сделать на примере, я же неделю мучаюсь с этим делом, перепробовал миллион вариантов, но...

Поворот ломаной
Здравствуйте программисты и математики. Помогите повернуть ломаную на заданный угол. procedure TFormMain.Button4Click(Sender: TObject); var x: array of extended; y: array of extended; ...

Запуск MediaPlyer при зажатии клавиши
Здравствуйте, ребята. Мне нужно сделать программу, которая при зажатии клавиш Alt, CTRL, Shift или WIN запускала соответствующий аудиофайл. Сразу скажу, задача не так проста, как может показаться...

Результат BitBlt - черный экран
Приветствую! У меня такой вопрос. С недавнего времени перестала работать функция BitBlt, а если говорить конкретнее - результат скриншота некоторых окон - черный экран \ картинка. Код не менялся,...

Строфоида в TChart
С использованием компонента Chart построить графики трех кривых каждого типа в соответствии с индивидуальным вариантом задания. Предусмотреть возможность выбора пользователем графика, который...

Копирование содержимого окна в bitmap
Всех приветствую, Столкнулся со следующей проблемой при копировании содержимого экрана в bitmap: содержимое одного из окно десктопового приложения не копируется, в bitmap прилетает изображение...

BASS BASSWASAPI
BASS_WASAPI_Stop(true); BASS_WASAPI_Init(-3, 0,0, BASS_WASAPI_BUFFER, 1, 0.1, @MyRecordingCallback, nil); BASS_WASAPI_Start(); В этой части кода происходит ошибка доступа к памяти. Программа...

Создать изображение берега моря
Нарисовать берег моря, также нужен исходный рисунок

Пусть пользователь щелкает левой клавишей мыши, передвигая при этом указатель мыши в различные места экрана. Программа
Пусть пользователь щелкает левой клавишей мыши, передвигая при этом указатель мыши в различные места экрана. Программа должна запоминать эту последовательность действий пользователя и по щелчку...

Почему в примере Delphi7 при перемещении маркеров пиксели у картинке не растягиваются?
Сделала два примера где при перемещении маркеров у треугольников растягиваются пиксели. Первый пример на HTML5 и JavaScript. Второй пример на Delphi7. Вот что нужно получить на Delphi7. Увидеть...

Отрисовка Jpeg в Битмапе
всем доброго времени суток. назрел один вопрос не могу никак решить. есть набор жыпегов около 150 тысяч нужно среди них вычленить дубликаты делаю это так сканирую каталоги, имена картинок сливаю в...

KUSS - OpenSource программа, чтоб делать скриншоты
KUSS Программа для Windows, чтобы делать скриншоты. :crazy: C открытым исходным кодом на Delphi. Первоисточник, попавшийся мне, был взят из статьи "Создание скриншотера на Delphi" с сайта...

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

Трансляция аудиофайла через канал микрофона на Delphi10/Lazarus
Доброго времени суток! Не подскажите какими средствами можно аудиофайл потоком транслировать через канал микрофона на Delphi или Lazarus? Сразу скажу, что я пытаюсь воссоздать аналогичную...

Отловить событие загрузки файла в TImage
Здравствуйте, уважаемые форумчане! Помогите, пожалуйста, разобраться с вопросом, который не дает покоя мне уже 3 дня! Есть компонент на основе TImage. Я хочу, чтобы при установке в инспекторе...

Как определить исходит ли звук от отдельного окна, и определить его громкость?
Например есть handle окна. Как определить исходит ли звук от этого окна, и определить его громкость?

Получение цвета RGB из TBitmap в потоке
Стоит задача сделать небольшой скриншот и в центре полученной области извлечь цвет пикселя в формате R, G, B. Если выполнять данную задачу в основном потоке программы, то полученный цвет (значения R,...

Закрытие метки
Добрый день. Суть программки : при появлении на экране метки закрыть её нажатием клавиши. Стрелка влево правильно, а всё остальное ошибка. Это работает. При нажатии клавиши до появления метки должно...

сбой отладчика Rad Studio
Здравствуйте! Сталкивался ли кто-нибудь с такой бедой: при нажатии на клавишу F9 в студии пропадает весь текст модуля (белый экран), окно структуры и инспектор объектов остается, палитра компонентов...

Прорисовка цифры
Первый раз цифра прорисовывается, а второй раз нет. Почему? Не понимаю. type TForm1 = class(TForm) procedure FormPaint(Sender: TObject); private { Private declarations } public ...

Воспроизведение в WebBrowser или panel M3U8 потока
Как можно поток m3u8 (с ссылки интернета ) воспроизводить в WeBrowser\EdgeBrowser\Panel ? Вот поток например : http://ad-hls-rentv.cdnvideo.ru/ren/smil:ren.smil/playlist.m3u8 Как это...

GIF анимация
Привет всем. Подскажите, как в Delphi XE2 можно воспроизвести gif-анимацию. Советуют установить RxLib компоненты, но для XE2 их вроде нет.

Изменение цвета фона формы
как и где в delphi изменить цвет фона формы?

Как вставлять музыку в программы на Delphi?
научите плиз как вставлять музыку в программы delphi . зарание спасибо

Как высчитать корень n-ой степени
Скажите есть же какая-то формула для расчета в Делфи числа под корнем n-ой степени? То есть суть задания в том чтобы пользователь ввел число и степень корня, под которым это число находится... И...

Программное движение мышки в окне игры Rust!
Создаю программу, которая будет при нажатии на левую копку мыши программно опускать курсор в низ, проблема в том что, при заходе в игру в меню, и в инвентаре все работает, но стоит взять в руки...

Как определить цвет пикселя?
Нужно определить цвет пикселя на рисунке . Как это сделать? В паскале была функция GetColor , а в Делфи как?

Заливка замкнутой области
Не могу понять функцию Floodfill. Ну как с ее помощью можно з акрасить необходимую область? procedure TForm1.FormPaint(Sender: TObject); begin with canvas do begin ...

Вытащить из ImageList картинку в Image1
Есть 2 картинки (файлы png или jpg ) они содержатся в ImageList. Надо их вытащить и поместить в Image. Как? час уже смотрю на форумах? Спасибо. Это не помогает with Image1 do ...

mp3 плеер наподобие WinAMP'а
Всем привет. В Delphi я программирую около 3 лет, но умею делать только простенькие проги. Недавно появилось желание подружится с мультимедией в Delphi. Хочу написать свой mp3 плеер наподобие...

Медиаплеер на Delphi
Имеется простенький медиаплеер, так... для общего развития, трэкбар, подсказочка (bullonhint) и ListBox, подскажите как прикрутить функцию Drag&Drop к ListBox'у, плюс при нажатии кнопки и открытии...

Как закрасить замкнутую область?
хочу залить треугольную область зелёным цветом, создаю событие OnPaint и пишу туда код: procedure TForm1.FormPaint(Sender: TObject); begin Canvas.MoveTo(50,50); Canvas.LineTo(100,100); ...

Нарисовать круг
помогите нарисовать круг

Запись видео с экрана
Доброго времени суток как можно реализовать запись с экрана монитора без звука и минимальной нагрузкой даже не знаю в какую сторону копать Добавлено через 31 минуту поделитесь компонентом ...

Помогите нарисовать рисунок в Delphi
Помогите нарисовать любой из этих двух рисунков Если замок,то можно не абсолютно такой же, а проще,но чтобы похож был

Очистка Canvas объекта TImage
Здравствуйте! Знаю, вопрос очень популярный и на него неоднократно давались ответы на самых разных ресурсах, но так получилось, что меня найденные ответы не устроили. Обрисую ситуацию поподробнее....

Воспроизведение звука при нажатии на определенную клавишу
Вопрос такой ! Хочу создать что-то на подобие сэмплера Система такая: При нажатии мышкой по кнопке выходит диалоговое окно для выбора музыкального файла (сэмпла), а при нажатии на заданную...

Штрих-код
Добрый день! Учебная задача: чтение штрих-кода с картинки или web-камеры. Подскажите как можно распознать простенький штрих-код (ITF-14 к примеру) через WEB-камеру или с картинки. Покопал интернет...

Нарисовать домик
Надо нарисовать Домик( вариант 13).Нужно реализовать в графическом редакторе Делфи 7. Заранее спасибо!

Нарисовать изображение снеговика
procedure TForm1.Button1Click(Sender: TObject); begin canvas.Pen.Color:=claqua; canvas.Brush.Color:=claqua; canvas.Ellipse(200,200,400,400); canvas.Ellipse(230,100,370,210);...

Захват видео с IP камер
Здравствуйте! Как захватить видеопоток (videostream.cgi) с IP камеры. snapshot.cgi получается отобразить, а вот видео нет. Не подскажите? вот кусок кода который по нажатию кнопки захватывает картинку...

А как написать графический редактор типа Paint
Помогите пожалуста кто знает как написать графический редактор типа Paint скинте примеры, исходники, ссылки зарание благодарю!!!

Прозрачный фон в канве
рисую. фон перестаёт быть прозрачным image1.Canvas.pen.Color:=clblue; Image1.Canvas.Pen.Width:=2; image1.Canvas.MoveTo(1,1); image1.Canvas.LineTo(6656,7641); в свойствах ...

Сайты с кодами активации RAD Studio 10.3 Rio
Добрый вечер! Сможете скинуть в txt или doc оригинальный код активации для RAD Studio 10.3 Rio, если Вы купили лицензию, или дать ссылку на сайт со списком ключей? Дело в том, что у меня установлен...

Программное усиление звука с микрофона(не системное!)
Здраствуйте. Давно я не обращался к форуму, но в данном случае мне это необходимо. Короче дело в таком: Надо захватить звук с микрофона, усилить его по громкости(увеличив амплитуду сигнала) и вывести...

Захват видео с IP Web камеры
Здравствуйте, мастера. Помогите разобраться с вопросом видеозахвата с IP Web камеры. Хотелось бы, чтобы видео выводилось на моей форме, как в TWebBrowser, с возможностью записи. Один добрый человек,...

TPNGImage -> TBitmap(pf32bit)
Привет. Как корректно преобразовать любой png в bitmap 32? bmp.Assign(png) не канает. Если png имеет палитру то alphascanline = nil отсюда возникает проблема вытащить из png альфаканал. Как...

Сжатие изображения в TImage
Много тем облазил, много опробывал, всё не то Пишу просмотрщик изображений Нужно быстрое сжатие изображений в Image например до 300x300 Качество сжатия - не важно, главное упор на скорость...

Как скопировать кусочек изображения из Image1->Image2 при помощи copyrect?
парни объясните как скопировать кусочек изображения из Image1->Image2 при помощи copyrect? или есть другие методы

Проигрывание видео в Windows Media Player в полный экран
В моем приложении на форме находится компонент Windows Media Player. Как по нажатию кнопки проигрывать видео в нем во весь экран? Использовала свойство fullscreen:=true, но видео проигрывается в...

Image со свойством Stretch=True и чтение пикселей
Привет. Есть картинко в Image1. У самого Image1 стоит свойство Stretch=True и Proportional=True. Image1 размером 320x200. Таким образом если картинко большая 1024x768, она сжимается до 320x200 на...

Отображение изображения в Image
Всем доброго дня. Столкнулся вот с какой проблемой. Мне необходимо загрузить картинку в Image и наложить на эту картинку текст. Как я прочитал, чтобы редактировать изображение средствами Delphi...

Создание графического редактора на Delphi
Нуна курсовая... Добавлено через 4 минуты 5 секунд Народ, помогите малому плиз... Мне препод задал написать курсовую работу по программированию на Delphi, графический редактор, в котором надо...

Проверка наличия rtsp-потока с IP-камеры libvlc
Здравствуйте. Пишу программу с возможностью показа видео с IP-камер. Использую libvlc. Процедуры начала трансляции и остановки(с офф-сайта...

Провести оси координат, выполнить градуировку осей и нарисовать график функции
Провести оси координат, выполнить градуировку осей и нарисовать график функции y=-x2(икс в квадрате) sin⁡(x); -6≤x≤6

Анимация формата AVI
помогите пожалуйста... вот у меня есть следующая программа, но она не хочет открыть анимацию формата ави. пишет "Cannot open avi". использую при этом компонент анимейт. я про него почитал, этот...

Вывести картинку поверх всех окон
Здравствуйте. 100 лет не прогала на Delphi. Нужно вывести просто картинку на экран поверх всех окон: чтобы она была всегда. Помогите, пожалуйста, код написать. А то нифига не помню, а времени в...

Ошибка: Canvas does not allow drawing
после N запусков вот этой функции function GetGPixelColor(X, Y: Integer): BYTE; var c: TCanvas; Col: TColor; begin c := TCanvas.Create; try c.Handle := GetWindowDC(GetDesktopWindow);

Сделать оси координат в TChart
Здравствуйте! Написал программу которая рисует параболу! Но не показываются оси координат! Как их активировать? Вот как здесь: А у меня их нет, вот: Подскажите! Заранее благодарен!

Эмулятор микрофона
Всем доброго времени суток! Многие программы для изменения голоса создают такой виртуальный микрофон, и туда выдают звук, ну а этот виртуальный микрофон можно выбрать например в скайпе, аське,...

Изобразить действующий конвейер
Изобразить действующий конвейер, транспортирующий какие-либо однотипные предметы подскажите, с чего хоть начать, может книги какие-нибудь почитать стоит. если не трудно, помогите сделать.

Запись звука с микрофона в файл WAV
Здравствуйте друзья! Думаю многим начинающим программистам Delphi будет интересна эта тема. К делу! В общем пытаюсь средствами API Windows записать звук с микрофона, а затем сохранить этом звук в Wav...

Плейлист в Delphi
Как организовать плейлист через компонент TWindowsMediaPlayer ???? пробую связать с listbox'ом...что то не выходит:(

Нарисовать равносторонний треугольник
подскажите пож действия алгоритма построения равностороннего треугольника, знаю что там нужны сторона, какие то радиусы, но нигде не могу найти подробное описание

Как подключить модуль JPEG в uses?
В компонент image хочу выводить фото сотрудника из базы данных В интернете нашел это и вставил но не помогает. interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,...

Как изменить размер PNG картинки?
Как изменить размер PNG картинки?

Canvas и Bitmap
Доброго времени суток. Осваиваю простые примеры на Канве. Столкнулся с 2 проблемами: 1. Создаю Битмап: Bitmap_elps1.Height := 20; Bitmap_elps1.Width := 20; ...

Анимация в Delphi
Народ! Помогите сделать пожалуйста анимацию в Delphi. В задании написано так: Сделать анимацию в Delphi рисуя различными фигурами, линиями и т.д.. Это летняя практика. еще и на самостоятельное...

Включение и запись с веб камеры
подскажите плиз как сделать чтобы при запуске программы включалась веб камера на ноуте и началась запись?

Ошибка при инициализации MCI
Делаю программу чтобы при выборе CheckBox1 и по нажатию кнопки воспроизводилась песня, запускаю программу и выдает такую ошибку "Ошибка при инициализации MCI", скрин вложен. сам код такой:if...

Побитовые операции с памятью
Есть ли в Delphi какие-нибудь функции чтобы побитово сделать and or xor not с двумя произвольными кусками памяти? Можно чтобы это были обязательно два равных по длине куска, неважно. Например для...

Преобразовать картинку в текст
Добрый день! Как преобразовать картинку в текст? Наподобие этого: http://www.downloader.su/images/small/1728-18430061944b02b72a777ed.jpg

Как сделать кнопку невидимой
надо создать проект, логическую игру. Создал картинку, формата jpg и там нарисовал кнопки. Сразу столкнулся с первой проблемой: можно ли на Дельфи сделать кнопку невидимой? или существует ли...

Модель солнечной системы
Помогите пожалуйста как заставить планеты вращаться

Построение графиков из .csv в реальном времени
Здравствуйте! Нашел форум через яндекс, сам увлекаюсь компьютерной графикой и авиацией, вот по поводу второго и хочу к вам обратиться: для моей научной работы нужна несложная программа-построитель...

MP3 плеер. Переключение треков по списку.
Доброго времени суток всем. Надо сделать расчетку, делфи мы учили пар 5-6 от силы, смесь гремучая, и стипендию получать надо.) Нашел в интернете туториал, на простенький медиаплеер. Там предлагают...

Вычисление реального размера объекта на изображении
Всем привет. Задачка такая: Есть объекты на изображении (круг, квадрат, прямоугольник - неважно) и есть эталон у которого мы знаем размеры. Исходя из этого нужно определить реальные размеры...

Виртуальная веб камера
Здравствуйте! Возникла такая задача: создать свой видео источник (дать ему свое имя) который будет заменять веб камеру. То есть передавать на сервер не видео с вебки а, допустим, произвольное...

Распознавание цифр на изображении
Здравствуйте! Требуется решить следующую задачу: написать программу для распознавания некоторой комбинации чисел на статическом изображении. Изображение может иметь различную высоту и ширину. ...

Не работает VLC-плагин
не могу запустить видео через activeX плагин в делфи. как я понимаю (из того что я раскопал в интернете), я просто бросаю на форму плагин, и передаю ему всего две комманды:...

Захват и сохранение звука с микрофона в реальном времени
Если есть готовое решение - дайте ссылку где посмотреть. Нужно следующее: Программа слушает микрофон, желательно не монопольно, и при возникновении звука определенного уровня начинает его...

Использование PNG
Возникли трудности при использовании PNG файлов. Дело такого рода. Есть PNG тайл на котором несколько десятков частей. Ну и конечно же для удобства использования создаем массив PNG объектов и...

Воспроизведение с bass.dll
Привет всем, немогу воспроизвести файл используя библиотеку bass.dll (2.4) помогите если сможете) procedure TForm1.BitBtn1Click(Sender: TObject); var result: integer; FilNa: Pointer; begin if...

увеличение изображения
Ребят привет.....помогите решить небольшую проблемку...??? как реализовать увеличение изображения при наведении мыши, изображения №№1,2....????????????? файл прилагается. огромное спасибо

Как сохранить все, что видно на форме в графический файл. Проблемы на 50% решена или Canvas.CopyRect
Всем привет. Задача сохранить все, что видно на форме в графический файл. Грубо говоря сделать принтскрин формы. Я делаю так: procedure TTreeForm.bbClick(Sender: TObject); var Bit : TBitmap;...

Вращение фигуры
Здравствуйте! Подскажите, почему оси координат исчезают, когда начинаю вращать параллелепипед? И как сделать, чтобы параллелепипед вращался не где-то в стороне, а именно вокруг центра координат?...

Проиграть mp4 файл
какие форматы видео поддерживаются в delphi я запускаю mp4 файл но он проигрывается в ужасном качестве

Открытие локальной страницы в TWebBrowser
Подскажите в чем проблема? Когда пишу вот такой код WebBrowser1.Navigate('index.html'); у меня выдает следующее: 1.jpg Однако если прописать полный путь до файла, то все работает

Задний план. (Фон)
Люди, плз помогите мне! На моем TForm стоит TImage. Он стоит на 2 месте, и закрывает (гадость) другие объекты. Без фона не красиво, а так он всё закрывает. МОЁ ЖЕЛАНИЕ: Я хочу :wizard:...

Как в плеере файл проигрывать по кругу?
На форме есть медиаплеер. Написал, код, чтобы проиграть файл. MediaPlayer1.FileName := 'd:\01.mp3'; MediaPlayer1.Open; MediaPlayer1.Play; Но плеер играет файл только один раз. Как сделать,...

Проблема с кодеками в MediaPlayer
Решил написать видео проиграватель ,и все бы ничего ,если бы не 2 проблемы: 1)Она же самая главная, иногда при проигрывании видео одного и того же формата(например avi),в одном случае все было...

Установка OpenCV
Здравствуйте. Возникла ошибка при установке opencv, работал по этой инструкции: https://github.com/Laex/Delphi-OpenCV/blob/master/README.md. Столкнулся с некоторыми трудностями : 1. По инструкции...

Сравнение двух изображений. Как реализовать?
Здравствуйте, уважаемые! Понимаю, что тема, возможно, уже и не раз обсуждалась, но хочу повторится. Я пишу алгоритм сравнения двух изображений, а именно фотографий. Сравнивать нужно попиксельно, и,...

Узнать разрешение видео-файла
Как узнать высоту и ширину видео файла???? Срочно нужен ответ???

Графический редактор
Скиньте пожалуйста исходники, у меня есть один, но он очень сложный для меня, во многом не могу разобраться.

Распознавание капчи
Наткнулся на просторах инета на интересный сайт http://oc.internetbot.ru/ в общем там расскзывается как можно зарабатывать на вводе капчи. И автор сайта предлагает вводить сиволы не в ручную, а так...

AlphaControls
У компонента sUpDown, в отличие от других компонентов из AlphaControls, нет свойства SkinData, которая содержит в себе подсвойство SkinManager. У меня в проекте два компонента SkinManager. Один...

Delphi 7 - рисунки
Помогите пожалуйста, мне для курсовой нужны рисунки. Относительно простое (мотоцикл, машина, дом, замок, рыба и др) как минимум одно изображение со всеми элементами. Заранее спасибо. Нужны исходники.

Построение параболы.
Добрый вечер. Скажи пожалуйста надо построить график функции y=x2, т.е. параболу. Как это сделать, используя обработки событий OnMouseDown, или OnCreate, и др. Можно как то по своему, если можете...

Использование playsound
Функция windows playsound которую можно использовать в делфи может запускаться с параметрами snd_sync и snd_async. в первом случае программа вызвавшая функцию останавливается на время...

Ошибка No MCI device open
Добрый вечер. Третий день мучаюсь с mediaplayer, никак не хочет воспроизводить треки - причем как mp3,так и wav. И при autoopen=true с любым файлом выдает ошибку: "Воспроизведение указанного файла...

Нарисовать домик на Canvas
помогите нарисовать красивый, большой дом с помощью canvas..а из трубы выходил дым который летит наверх..когда нажимаешь на button..и так несколько раз, можно использовать time...помогите пожалуйста...

File not found: 'sSkinManager.dcu' не подскажете что за ошибка???
File not found: 'sSkinManager.dcu' не подскажете что за ошибка???

Увеличение Image
Здравствуйте! Подскажите, пожалуйста, как можно реализовать в Delphi - нажимаешь на Image, изображение увеличивается, а при повторном нажатии - уменьшается?

Воспроизведение потокового видео
Здравствуйте. Подскажите как и чем лучше всего воспроизводить потоковое видео mms и http. А чем лучше всего делать захват видео. зы: WindowsMedіаPlaуer, MediРlауer не советуйте. Спасибо!

Функции библиотеки bass.dll
Народ подскажите какие функции есть у этой библиотеки и их парметры. Или подскажите где можно почитать про нее. Заранее спасибо.

Наложение картинки на картинку
Подскажите пожалуйста как сделать так, чтобы можно было накладывать картинку на картинку, да и с учетом прозрачности... К тому же нужно потом редактировать положение 1 изображения на другом. Например...

Как повернуть изображение?
Замучился искать. Много есть вариантов но они нерабочие, а те, что работают вращают изображение в новом окне, а мне нужно в текущем.Ну как паинте.

Как поставить GIF-анимацию?
Как поставить gif анимациу на delphi

Вращение точок вокруг одной точки
Здравствуйте! Помогите пожалуйста составить следующую программу : 3 точки должны вращатся вокруг точки A(x, y), которая является центром вращения. Каждая из точек движется с индивидуальной...

Нарисовать кораблик в Delphi
Помогите нарисовать кораблик в Delphi через форму и закрасить его.

ЦВета в делфи
ПОдскажите можно ли в делфи цвету присвоить номер, что бы я мог использовать цвета в цикле и т.п.? Как это было в паскале. Например: cvet:=1; cvetnew:=cvet+1; Заранее спасибо!

Перемотка в плеере (Trackbar)
Здравствуйте,нужна помощь,сделал плеер на bass.dll приделал Trackbar (AdvTrackBar1 TMS Component Pack) в качестве перемотки ,проблема в следующем: если прокрутить ползунок (к примеру больше чем на...

Нарисовать прямоугольник в прямоугольнике
Напишите программу рисующую на экране несколько вложенных друг в друга разноцветных прямоугольников. Сколько будет прямоугольников вводим с клавиатуры максимум 20

Как в delphi 7 загрузить png
как в delphi 7 загрузить картинку в формате .png чтобы она выглядила как в timage ну т.е ненадо нажимать кнопки TPNGImage - установлен расписать всё по шагово тк 4 дня в delpgi Добавлено через...

Отрисовка PNG картинки с прозрачным фоном
Собственно вопрос. Как отрисовать картинку с прозрачным фоном. Знаю что такая тема уже создавалась но как я сказал мне обязательно нужно отрисовать с прозрачным фоном. А Draw ресует с белым фоном.

TJpegImage в TBitmap, и как можно использовать Canvas для JPEG без потери качества!
Доброго времени суток. Мне интересно если перегонять TJpegImage в TBitmap таким способом: uses Jpeg; ......................... procedure TForm1.Button1Click(Sender: TObject); var ...

Анимация "Шагающий человек"
В общем суть задачи: используя методы рисования ellipse,arc и т.д. создать анимационный проект "Шагающий человек". У кого какие варианты? предагайте. P.S. на форме должен находиться объект...

Стеганография в WAV
Злой препод задал задачку по стеганографии. Надо скрыть инфу в младших значащих битах. Передо мной есть WAV файл, прочитала структуру заголовка, но про данные там ничего не написано. Как все-таки...

Image кнопка
Здравствуйте! Как сделать чтобы получилась кнопка. Например: я хочу чтоб было 1 изображение если я на нее навиду курсор то 1 изображение изменялось на 2 изображение, а если уберу курсор то обратно...

Мигает кортинка при перемещении
Здраствуйте, не подскажите как можно убрать мигание картинки при перемещении ее на форме? Задаю нчальное положение: procedure TForm1.FormActivate(Sender: TObject); begin Image6.Top:=40; end;...

Нарисовать солнце
Здравствуйте, нужно в Делфи нарисовать солнце, не знаю как прописать цикл с лучами, помогите пожалуйста!

Нарисовать спектр звукового wav файла
Доброго времени суток! Подскажите пожалуйста! Мне необходимо на основании записанного wav файла, нарисовать (построить) спектр, как на рисунки ниже: Что бы могли посоветовать, для решения...

Построение графиков по точкам
у меня задание:есть лишь точки в системе координат,необходимо построить график проходящий через эти точки

Как добавить текст на изображение?
Подскажите решение: на форме есть объект Form1.Image1.Picture в котором храниться рисунок 120х120 есть так же некоторая строковая переменная из 8 символов, требуется по нажатию кнопки скопировать...

НЕ ПОНИМАЮ. Поиск координаты пикселя на изображении по его цвету
Есть изображение. На нем нарисована черная линия. Нужно по вертикали зеркально отобразить эту линию относительно ее конца. Просто зеркальное отображение получается, если вручную задавать координаты....

Компонент Animate
Возникли проблемы с компонентом Animate. Я не могу загрузить в него avi-файл. Выдает ошибку "Cannot open Avi" хотя в avi нет звука. При попытке проиграть стандартную анимацию(CommonAvi:...

Подключение библиотеки BASS?
Всех приветствую!!!! У меня Делфи семь, и я пытаюсь написать свой плеер, при помощи компонента BASS! Посмотрел много статей разных, и хочу спросить: Как правильно работать с Басс! например...

Рисование на форме
Возможно, это и не лучшая идея (рисовать на форме), но уже взялся. Проблема в том, что не могу нарисовать на форме ничего из другой процедуры (нажатия кнопки, например). То есть какие-то элементы,...

Как сделать так, чтоб при наведении курсора картинка менялась на другую
Понимаю что вопрос глупый!) Как сделать так, чтоб при наведении курсора картинка менялась на другую, а когда убираешь курсор возвращала прошлую? Именно для баттона, у меня кнопка, и я хочу что бы...

Регулировка звука в MediaPlayer
Как можно регулировать звук в Mediaplayer? И как регулировать частоты?(эквалайзер).

Масштабирование TImage на форме: Stretch/Proportional/AutoSize etc
Если использовать вот такой вариант: const pathImage = 'D:\Image.jpg'; var OnLoad: boolean = true; procedure TForm2.FormCanResize(Sender: TObject; var NewWidth, NewHeight: Integer; var...

Вставка картинки в Memo
Можно ли это сделать? если нет ... то посоветуйте компонент подходящий для этой цели ... и как её на нём реализовать... .. заранее благодарен

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

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

Как повернуть картинку?
Как повернуть картинку в Delphi?

Jpeg файл - достать дату съемки (exif)
Как в delphi написать функцию для считывания информации о дате фотографии? то есть на входе строка - путь к файлу, на выходе - строка с датой

Размер пиксела bmp картинки
Привет всем. Я загрузил в компонент TImage фотографию с расширением bmp. Как узнать реальные размеры фотографии в мм, см (короче в метрической мере) или размер пиксела в метрической мере. Но размер...

Просмотр DXF/DWG в Delphi
Суть проблемы такая, необходимо в Delphi открыть файл AutoCAD'a в формате DXF/DWG и реализовать возможность взаимодействия с объектами на этом чертеже (работа со слоями, выделение линий и любых...

Из ImageList в Image
Как из ImageList загрузить в Image? *Имеется ImageList с картинками, как например при создании формы в Image1 загрузить 2-ю картинку из ImageList.

Демосцена на Delphi
Демосцена на Delphi возможно ли это?

нарисовать оси координат ху и построить график
Здравствуйте! Помогите пожалуйста нарисовать оси координат ху и построить график, значения х и у должны вводиться в программе.. плииз.. :gcray:

Как нарисовать линию под углом?
Мне нужно нарисовать линию под углом, например, 37 градусов к оси Х. Есть ли такой компонент, который позволяет это. Или оператор. Или хоть что нибудь. Вариант рисоваия такой линии по координатам не...

Координатная сетка
Необходимо создать программу которая рисует координатную сетку

Canvas.TextOut отрисовка текста относительно центра
Доброго времени суток. Подскажите какое свойство Font нужно отредактировать, что бы текст отрисовывался относительно цента. По умолчанию установлен левый верхний угол

Смешивание цветов RGBA
Здравствуйте, форумчане! Уже не первый день ломаю голову над тем, как смешать два цвета, учитывая полупрозрачность. Пытаюсь добиться эффекта как у обыкновенного наложения слоёв в photoshop'e. В...

Рисование пирамиды на канве
Не могу сообразить как нарисовать пирамиду с прямоугольником (или квадратом ) в основании. Проблемы начинаются уже при рисовании основания. Я задаю 3 вектора с координатами P=X1, P=Y1,...

Создание пазла на основе Drag&Drop
Помогите пожалуйста, нужно составить программу-пазл. Суть в том, что имеется сетка изображений и матрица чисел, соответствующая этим изображениям (для проверки правильности решения). Перетаскиванием...

Полупрозрачная картинка и AlphaBlend()
Здравствуйте! Кто-нибудь применял на практике функцию AlphaBlend()? Может кто-то на примере (показать код) продемонстрировать как с ней работать? Функция вроде есть, а как пользоваться - непонятно...

Воспроизведение видео в Delphi
Как воспроизвести видео в Delphi? Попробовал сам сделать что то не получается Вот код по которой я пробовал сделать: form11.MediaPlayer1.DeviceType:= dtAutoSelect;...

Chart - подписать по нижней оси
Ребята здравствуйте! проблемка есть связанная с chart'ом: Надо подписать по нижней оси чтобы шаги были не "1, 2, 3" а от того значения, которое я укажу в коде. И еще чтобы он рядом с каждым шагом...

Нарисовать стрелку как у аналоговых приборов
Доброго времени суток. Подскажите, как можно нарисовать стрелку как у аналоговых приборов ? Например:

Увеличение/уменьшение изображения
Как сделать, чтобы при первом щелчке картинка увеличивалась, а при повторном - уменьшалась? И при этом всегда оставалась на переднем плане. При использовании (Sender as TImageControl).BringToFront;...

Ось координат и построение прямой по двум точках
Дана ось координат XY. На оси координат задаются две точки с координатами (начало отрезка и конец отрезка). По этим двум точкам построить прямую и определить, проходит ли это прямая через начало...

Визуализация, Эквалайзер, bass.dll
ГГГРРРР..... сколько можн :O_O: .... кароч ... эммм извиняюсь .... сколько людей бы не спрашивало ... все отвечают ...но не то :( ..... ДАНО : есть bass.dll ... есть файл.mp3 ... ...

Разложение цвета на каналы rgb
Здравствуйте! Подскажите, как происходит разложение цвета на каналы rgb или дайте, пожалуйста, ссылку, где можно посмотреть примеры.

Заливка градиентом
В программе должно быть 4 кнопки. При нажатии на кнопку происходит соответствующая заливка градиентом. (на рисунке указаны 4 фигуры залитые разными способами, которые должны быть в программе). Код...

как зная уравнение окружности 0.8x^2+2y^2=1, построить график в Делфи, использую компонент TChart
Привет, сижу делаю вычислительную математику. Задание. Разработать ПО для реализации численного модифицированного метода Ньютона решения системы нелинейных уравнений: tg(x*y + 0.4)=x^2...

Bitmap image is not valid
помогите плиз с заставкой, что-то выдает ошибку: 'Bitmap image is not valid'. Вот весь код: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,...

Создание TBitmap по пикселам
Здравствуйте! Не пойму как реализовать создание TBitmap по пикселю. Что бы понять основную суть, нужен исходник. К примеру var b1, b2 : TBitmap; После я их создаю Create. b1 я загружаю из файла...

Как сделать чтобы при нажатии на картинку играла музыка
Как зделать чтобы при нажатии на картинку играла музыка. зарание спасибо

Построение графика на компоненте Image
Кто сможет мне помочь в вопросе отрисовки канвы по значениям из 2 столбцов на компоненте Image. Еще и масштабирование графика надо сделать Добавлено через 31 минуту Первая попытка комом begin...

Перевернуть изображение
подскажите как перевернуть картинку??? компонент image стандартный но подойдёт конечно же и любой другой лиш бы можно было перевернуть...

Обработка изображения
Всем привет. Надо написать прогу обработки изображений и вот какая проблема. Надо чтобы из папки можно было выбрать несколько изображений, а их имена записались в мемо... if OpenDialog1.execute...

Текст OpenGL
помогите вывести текст в openGL, нашел такой вариант но он не пашет почему не знаю :( : var base:Integer; font1:HFONT; dc, rc: hdc; ..... procedure TForm1.FormCreate(Sender: TObject);...

Очистка поля PaintBox Delphi 10.1
Сижу на Delphi 10.1. Рисую схемы аппарата. При втором и более нажатии кнопки прорисовки изображения накладываются друг на друга и получается фигня. Нужно очистить поле PaintBox. Уже много что...

Календарь с заметками Delphi
Всем привет! Необходим календарь с заметками, чтобы я мог выбрать определённый день и внести заметку, также при выборе любого дня я видел, что я записал ранее. Может у кого исходник есть? И какую...

Удаление невидимых линий(Z-буфер)
Здравствуйте! С графикой не знаком, а нужно нарисовать сложную 3D фигуру: 1)с удалением невидимых линий 2)со светом; решил попробовать использовать библиотеку OpenGL, взял книгу OpenGL в проектах,...

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

создать кнопку, по щелчку которой будет рисоваться шестиугольник.
В общем пишем мы простенький графический редактор, сказали создать кнопку, по щелчку которой будет рисоваться шестиугольник. Я бьюсь в панике уже , не получается ничего=С помогите, а не будьте...

Моделирование, ничего не придумаю...
Доброго времени суток! Кхм... Начнём с того, что препод мне поставил задачу - смоделировать что-нибудь (подразумевается из жизненных примеров с физическим расчетом)... Вот, и главная проблема...

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

Как создать программу MP3 Плеер
Подскажите возможно ли в делфи создать свой MP3 проигрыватель?

Построение фигуры по координатам
Доброго времени суток! Помогите пожалуйста, количество точек и их координаты задаются во время выполнения программы ! Нужно построить фигру!

Многофункциональный текстовый редактор
Вот уже несколько лет я пользуюсь текстовым редактором собственной разработки - Ra-tools, так я его обозвал. Начинал его, отталкиваясь от проблемы набора текстов с бумажных носителей (работал в...

Вывод списка mp3 файлов и их воспроизведение
Я искал на форуме, находил что-то похожее, но не нашел то что нужно. Нужно на delphi 7: Чтобы выводился список в listbox, всех mp3 файлов в папках и подпапках допустим есть папки:...

PaintBox, загрузить bmp картинку
имеется форма 1 с scrollbox в котором paintbox, и форма 2 в которой нужно через if открыть форму 1 и paintbox загрузить bmp картинку.

Простая работа с OpenGL на Delphi. Вычисление нормали.
Решил сделать небольшой FAQ по теме. Итак. Прежде чем начать хочу показать какой код частенько вижу от начинающих:...

Как в делфи вставить видео
как в Mediaplayer в свойстве FileName не указывая файл добавить видео?а то там путь надо прописывать и при переносе программы на другой комп ничего не работает...

Изменить уровень прозрачности TPNGImage
Есть TPngImage с загруженным в него изображением. Необходимо в нем же нарисовать это изображение с заданным уровнем альфы (полупрозрачности). Можно и через временный TPNGImage (да хотя бы через...

Рисование картинки OpenGL на TPanel - почему форма не перерисовывается?
Добрый день! Пишу программу, использующую для отображения геометрии объекта OpenGL для возможности управления вариантами отображения у меня область рисования занимает не всю форму а ее часть -...

2D графика в Delphi
В общем движок у моей игрушки благодаря вашим советам получился на славу, а вот с графикой проблемки. У меня есть фон и объекты Image наложенные на него. Но любой Image это прямоугольник а у меня в...

graphics32
graphics32 Кто нибудь имел с ним дело?

Отпечаток пальца
Добрый день! Скажите пожалуйста, кто может помочь в написании курсовой работы! Цель, есть сканер, сканируем отпечатки пальцев. необходимо написать на делфи программу, которая сравнивала отпечатки...

Несколько веб-камер
Вопрос, как программно получать картинку с разных web-камер, подключенных к одному компьютеру? Предваряя вопрос, возникающий в параллельных темах, "зачем это?" - поясню: есть зал, в нем...

Как повернуть TImage на любой угол?
Здравствуйте. Подскажите как объект типа TImage повернуть на определенный градус (10,15,30 и т.д.) Стандартными средствами похоже нельзя ?

Delphi и 3D графика БЕЗ OpenGL
Доброго времени суток! Поставили перед нами задачу нарисовать 3D букву в Делфи без использования каких-либо библиотек. Буду благодарна за любую литературу и советы. :read::)

кто поможет с плеером?
Доброго времени суток. Решил написать плеер на Delphi 7. Опыт работы имею достаточный. Хотелось бы в чем заключается суть создания плеера, то есть как он считывает информацию с данного трека и время...

Моделирование интерференции света от двух источников (опыт Юнга)
Здраствуйте! Мне необходимо создать программу в Делфи, моделирующую интерференцию света от двух источников.(опыт Юнга). Но я понятия не имею, как работать в Делфи с 3х мерным пространством. Помогите...

Кодировщик видео
Парни, помогите, опять-же мучаюсь с видео файлами! Подскажите как закодировать видео файл чтобы его было просматривать только через exe программу? Уже два дня меня мучает эта тема! Просто горю !

График из chart в Bitmap
Всем привет. Подскажите кто знает, как сохранить Chart в Tbitmap? Пишу так: Chart1.Draw(Bitmap.Canvas,Rect(0,0,Bitmap.Height,Bitmap.Width)); не помогает.

Запись и передача звука
Есть несколько задач. 1. Записывать звук сразу сохраняя его чтобы обеспечить одновременный доступ к записи. 2. Если возможно организовать прямой поток с микрофона и передавать его через сокет....

BMP в массив
Нужно BMP-изображение загнать в массив для дальнейшей работы с ним получился вот такой код, только никак не могу найти ошибку, подскажите unit Unit1; interface uses Windows, Messages,...

Нарисовать квадрат
Помогите реализовать рисование квадрата по щелчку ЛКМ,именно в той координате где был произведён щелчок,там и рисуем,и радиус юзер задает в edit`e

Построение фигур (OpenGL)
помогите пожалуйста. нужно с помощью opengl в delphi построить такие фигуры как тор, тетраэдр, октаэдр, додекаэдр, икосаэдр, призма, усечённый конус и усечённая пирамида. А я вообще никогда не...

Web камера
Добрый день! Если ли способ без всяких компонентов, получить фото с web камеры?

работа с видео средствами Delphi
Подскажите, пожалуйста, как работать с видео посредствами Delphi. А именно необходимо обрезка, склейка, переход к определенному кадру (ползунок), ну и соответственно само проигрывание. Какие...

Создание модели "Хищник-жертва"
Добрый вечер!Прошу помочь мне в компьютерном моделировании модели "Хщиник-жертва" с условием отлова хищников.Программу я написала,все работает.Пожалуйста,подскажите как мне добавить в нее условие...

Оптимизировать функцию поворота изображения
Есть ф-я для поворота Bitmap: function ImageRotation(img: TBitmap; a: real): TBitmap; var Temp: TBitMap; i, j: Integer; r: Single; xo, yo: Integer; s, c: Extended; begin

Цифровая обработка сигналов и изображений
Здравстуйте!!! Подскажите какие можно использовать компоненты и алгоритмы, чтобы создать программу цифровой обработки сигналов и изображений, отвечающую следующим требованиям: 1).открытие...

Показать координаты курсора на Image
Как сделать, чтобы при наведении мыши на Image в строке состояния показывалась координата точки?

Как воспроизвести видео Delphi 7
Привет всем. Стоит задача воспроизвести видио формата, к примеру, mp4, использовав приложения установленные по умолчанию в ОС. Как многие поняли без TMediaPlayer !!! Если с открытием видио нет...

Вставка рисунков формата .jpg в canvas
работаю с простейшей графикой в канвасе, есть ли возможность вставлять туда рисунки формата .jpg? А то как я понял .bmp не поддерживает прозрачность заднего фона, и вставки получаются с белой рамкой.

Не получается залить цветом канву Image
Делаю paint. Есть два объекта Image1,Image2. На канве Image1 происходит много всякой всячины. Создаю Image2, размещаю его на панельке рядом с кнопками. Создаю его для того, чтобы отобразить в нем...

Кубик-Рубика
добрый вечер, форумчане) мне необходимо написать программу кубика-рубика. руководитель посоветовала использовать opengl, так вот у меня, как наверное у многих новичков, мало что выходит, разобрался я...

Как зарегистрировать BASS_DSHOW?
Недавно узнал о библиотеке BASS_DSHOW,скачал ее ну и естественно начал пробовать писать простенький видеоплеер. Но когда я запускаю проект,выскакивает сообщение:"This is UNREGISTED VERSION OF...

Нарисовать произвольную фигуру в Image
Нужно нарисовать на Image1 произвольную фигуру и залить ее!!! Произвольную фигуру нарисовал с попощю проги ниже!!! Прошу помочь с заливкой.... Image1FormCreate d:=false; Image1MouseUp...

Создание 3d игр на Delphi
Доброго времени суток! Обращаюсь к Вам с вопросом о 3d графике. Решил попробовать свои силы в создании хотя-бы элементарных 3d игр типа бродилок :) Подскажите, какой самоучитель или видеокурс по...

Радио проигрыватель
Нужен пример самого простого радио проигрывателя написаного на Delphi! Помогите плиз!!! Добавлено через 29 минут Вот нашел ссылку, помогите разабраться :) ...

Определить угол отскока шарика от преграды
Здравствуйте, имеется задача моделирования движения шарика в прямоугольнике с учетом силы тяжести. Алгоритм следующий, для определения угла отскока в момент столкновения просчитываются проекции...

Видео плеер
Пишу свой видео плеер (т.к. придумал фишку, которой не встречал в других плеерах). Нужна толковая библиотека для воспроизведения видео (форматы avi mkv flv mp4 ну и другие по возможности)....

Построение многоугольника!
Всем привет! Помогите пожалуйста сделать следующее задание! Создайте приложение, позволяющее рисовать на форме графические примитивы. Параметры графических примитивов должны задаваться пользователем....

Простой рисунок в Delphi 7: цыпленок
Всем привет. Помогите , пожалуйста, нарисовать в делфи 7 рисунок. Примерно такой как на рисунке (см.вложение). В долгу не останусь. Заранее спасибо.

Рисование круга
Как можно в дельфе нарисовать круг, диаметром 5 м., если высота формы 7 м., при этом не использовать процедуры Ellipse() та Shape(). а рисовать только с помощью MoveTo() та LineTo(). Покажите...

Поиск и распознание автомобильного номера (OpenCV)
Всем привет. Нужно найти и распознать автомобильный номер с фото. Использую библиотеку OpenCV взятую тут Там есть пример распознания номера, но там не пример программы на форме, а пример процедур....

Распознавание контуров геометрических фигур
Здравствуйте, требуется распознать контуры фигур: - точка - отрезок - прямоугольник - окружность - треугольник данные фигуры могут быть повернуты на произвольный градус, толщина контура 1px,...

при запуске выдает ошибку Bitmap image is not valid
помогите, пожалуйста, при запуске программы выдает ошибку в следующей процедуре: procedure TForm1.btn1Click(Sender: TObject); begin k:=k+1; Timer1.Enabled:=true; Shape1.Brush.Color:=clBlue;...

Линия со стрелкой (ООП)
Здравствуйте, мне нужно сделать класс, позволяющий рисовать линию некоторого размера и заданного направления из точки, определенной нажатием левой клавиши мыши. Класс, позволяющий рисовать такую же...

Нарисовать шахматную доску
Нарисовать шахматную доску (попробовать визуальный компонент TString Greed). Определить положення ферзя, зарисовать другую цвету ячейки, которые находятся под угрозой.

Движение объекта по параболе
Здравствуйте. Я бы хотел спросить, как это реализовать) X у нас постоянна, значит к Y мы задаем формулу параболы (y=x^2). Например от (250,200) -начальная точка. (500,400) -конечная. (Случай мяча)

Падающий шар
Составить модель падающего шара Пожалуйста, очень нужно