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

Тема в разделе "Delphi - Multimedia, Графика, Игры", создана пользователем andreyv, 10 апр 2008.

  1. andreyv

    andreyv Гость

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

    Регистрация:
    4 сен 2006
    Сообщения:
    2.580
    Симпатии:
    0
    Берете пхатель и запхаете
     
  3. andreyv

    andreyv Гость

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

    Регистрация:
    4 сен 2006
    Сообщения:
    2.580
    Симпатии:
    0
    Загружаете картинки в 2 или по очереди в одну переменную TBitmap и рисуете ее на канве TImage. Тут есть код: http://codeby.net/forum/threads/22394.html
    Где проблема?
     
  5. andreyv

    andreyv Гость

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

    ProgeRock Гость

    Так чтоли?
    Код (Text):
    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;
     
Загрузка...

Поделиться этой страницей