Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 01.02.2014, 13:07   #1
FleXik
Форумчанин
 
Регистрация: 01.11.2012
Сообщений: 770
Вопрос Наложить одну и ту же картинку на 1000 других картинок? Как?

Здравствуйте. Можно ли как-то наложить одну картинку на 1000 других картинок програмно? Т.е указываем путь к папке с картинками указывает путь к картинке которую будет накладывать на 1000 других? Как такое реализовать? Canvas, не?
FleXik вне форума Ответить с цитированием
Старый 01.02.2014, 13:21   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

С помошью TBitmap можно.
Примеров у меня нет, но тема такая уже была давненько правда.
Загружаешь в один битмап одну картинку, а в другой вторую. Потом на втором отрисовываешь то что загружено в первом, и второй сохраняешь.
Код:
tb:=TBitmap.Create;tb.LoadFromFile('c:\acd185.bmp');
tb0:=TBitmap.Create;tb0.LoadFromFile('c:\q.bmp');
tb.canvas.CopyRect(rect(0,0,tb0.width,tb0.height),tb0.canvas,rect(0,0,tb0.width,tb0.height));
tb.saveToFile(...)
Вот примерно так думаю будет выглядеть.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 01.02.2014, 13:40   #3
FleXik
Форумчанин
 
Регистрация: 01.11.2012
Сообщений: 770
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
С помошью TBitmap можно.
Примеров у меня нет, но тема такая уже была давненько правда.
Загружаешь в один битмап одну картинку, а в другой вторую. Потом на втором отрисовываешь то что загружено в первом, и второй сохраняешь.
Код:
tb:=TBitmap.Create;tb.LoadFromFile('c:\acd185.bmp');
tb0:=TBitmap.Create;tb0.LoadFromFile('c:\q.bmp');
tb.canvas.CopyRect(rect(0,0,tb0.width,tb0.height),tb0.canvas,rect(0,0,tb0.width,tb0.height));
tb.saveToFile(...)
Вот примерно так думаю будет выглядеть.
благодарю, сейчас посмотрю
FleXik вне форума Ответить с цитированием
Старый 01.02.2014, 14:28   #4
apromix
PHP, Delphi
Форумчанин
 
Аватар для apromix
 
Регистрация: 07.05.2008
Сообщений: 388
По умолчанию

Могу написать такую программку за небольшое вознаграждение.
Мыши плакали, кололись, но продолжали жрать кактус...
мои проекты
apromix вне форума Ответить с цитированием
Старый 01.02.2014, 14:38   #5
FleXik
Форумчанин
 
Регистрация: 01.11.2012
Сообщений: 770
По умолчанию

Цитата:
Сообщение от apromix Посмотреть сообщение
Могу написать такую программку за небольшое вознаграждение.
я и сам справлюсь, спасибо
FleXik вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как наложить маленькую картинку поверх большой Jarerd WordPress и другие CMS 3 03.12.2018 11:11
Как вставить картинку в одну ячейку Liderx Microsoft Office Excel 2 15.02.2016 18:53
Копирование значений из других ячеек в одну Sergey19 Microsoft Office Excel 7 08.08.2013 13:02
Как объединить 2 Image и сохранить как одну картинку? artemavd Общие вопросы Delphi 18 14.05.2012 11:20
Как соединить картинки в одну картинку! AquaKlaster Общие вопросы Delphi 7 26.04.2010 07:57