Вопрос по Image и Canvas

[denis76560]

Приветствую Вас форумчане.
Столкнулся с проблемой наложения одного изображения на другое.
Дано два рисунка:
bmpSRC (http://denis76560-ru.1gb.ru/img/WN_6...0546093750.jpg)
и
bmpDOWN (http://denis76560-ru.1gb.ru/img/JB_6...1148437500.jpg)

Имею следующий код:

procedure TForm1.Button3Click(Sender: TObject);
var
  BmpResult,bmpSRC,bmpDOWN: TBitmap;

  begin
    :=TBitmap.Create;
    := TBitMap.Create;
    BmpResult := TBitMap.Create;

bmpDOWN.TransparentColor:=clwhite;
bmpDOWN.Transparent:=true;

    bmpSRC.LoadFromFile('Temp\srcx.bmp');
    with bmpDOWN do begin
    LoadFromFile('Temp\lineD.bmp');
      SetBKMode(Canvas.Handle, windows.TRANSPARENT);

   {   Canvas.Font.Color:=clBtnHighlight;
      Canvas.Font.Style:=[fsBold];
      Canvas.Font.Name:='Arial Black';
      Canvas.Font.size:=9;
      Canvas.TextOut(13, 13, 'eeeeeee');  }

    BmpResult.Width := bmpSRC.Width;
    BmpResult.Height := bmpSRC.Height;

BitBlt(BmpResult.Canvas.Handle, 0, 0, bmpSRC.Width, bmpSRC.Height, bmpSRC.Canvas.Handle, 0, 0, SRCCOPY);
BitBlt(BmpResult.Canvas.Handle, 0, bmpSRC.Width-320, bmpDOWN.Width, bmpDOWN.Height, bmpDOWN.Canvas.Handle, 0, 0, SRCCOPY); 

Image1.Picture.Bitmap:=BmpResult;
    FreeAndNil(BmpResult);
   FreeAndNil(bmpSRC);
   FreeAndNil(bmpDOWN);

Image1.Picture.Bitmap.SaveToFile(extractfilepath(application.exename)+'Temp\outIMG.bmp');
end;
     end;

после выполнения кода (объединения рисунков) получаю следующее изображение - http://denis76560-ru.1gb.ru/img/mr_6...9863750000.jpg
Подскажите пожалуйста, как убрать белую полоску внизу над картинкой проигрывателя, получающейся при наложении ? Вместо нее должен быть фон первого рисунка (bmpSRC).

уже пробовал и так и сяк, не выходит =(

image1.Picture.Bitmap.TransparentColor:=clwhite;
image1.Picture.Bitmap.Transparent:=true;
image1.Transparent:=true;  

 bmpDOWN.TransparentColor:=clwhite;
bmpDOWN.Transparent:=true;

 bmpSRC.TransparentColor:=clwhite;
bmpSRC.Transparent:=true;

 BmpResult.TransparentColor:=clwhite;
BmpResult.Transparent:=true; 

 bmpSRC.Mask(clwhite);
 bmpSRC.TransparentColor:=clwhite;
 bmpSRC.Transparent:=True;

 bmpDOWN.Mask(clwhite);
 bmpDOWN.TransparentColor:=clwhite;
 bmpDOWN.Transparent:=True;

 BmpResult.Mask(clwhite);
 BmpResult.TransparentColor:=clwhite;
 BmpResult.Transparent:=True;

 image1.Picture.Bitmap.Mask(clwhite);
 image1.Picture.Bitmap.TransparentColor:=clwhite;
 image1.Transparent:=True;

Заранее спасибо всем за внимание к посту.

[Stilet]

Э-э-эм... Так она же (полоска) получается предусмотренна в первом рисунке...
На нее даже ползунок набегает.
Или эта часть предполагается быть прозрачной?

[denis76560]

Сообщение от Stilet

Э-э-эм... Так она же (полоска) получается предусмотренна в первом рисунке...
На нее даже ползунок набегает.
Или эта часть предполагается быть прозрачной?

Да-да, именно эта чать должна быть прозрачной

[Stilet]

Уф... Я не знаю как твою задачу решить, но я бы попробовал работать с PNG.

[Человек_Борща]

Ну так пускай будет 3 изображения в 1, и одно из 3 - прозрачное.

[denis76560]

Как это можно реализовать ?
Пытался и так и сяк, не получилось ничего =(

[denis76560]

Еще актуально