• Познакомьтесь с пентестом веб-приложений на практике в нашем новом бесплатном курсе

    «Анализ защищенности веб-приложений»

    🔥 Записаться бесплатно!

  • CTF с учебными материалами Codeby Games

    Обучение кибербезопасности в игровой форме. Более 200 заданий по Active Directory, OSINT, PWN, Веб, Стеганографии, Реверс-инжинирингу, Форензике и Криптографии. Школа CTF с бесплатными курсами по всем категориям.

Помогите очень нужно !

  • Автор темы andreyv
  • Дата начала
A

andreyv

Помогите решить такую задачу ! Есть две картинки и их надо запхать в один Image! Пример : есть Image 600x200 и есть две картинки 300x200 и 300x200 нужно запхать в этот один Image эти две картинки!!!!!!!!!!!!!!!
 
A

andreyv

Ну я серьезно ! мне не до шуток мне нужно поместить две картинки в один Image !
 
E

European

Загружаете картинки в 2 или по очереди в одну переменную TBitmap и рисуете ее на канве TImage. Тут есть код: https://codeby.net/threads/22394.html
Где проблема?
 
A

andreyv

Мне нужно загрузить картинку не из ресурса а с любого места !
 
P

ProgeRock

Так чтоли?
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
rec:trect;
begin
rec:=Rect(,,,); {координаты вашего места}
Image1.Canvas.CopyRect(Rect(0,0,300,200), {Canvas места},rec);
rec:=Rect(,,,); {и здесь}
Image1.Canvas.CopyRect(Rect(300,0,600,200),{и здесь},rec);
end;
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!