StretchDraw

// Главная форма
frm=new TForm();
frm.Caption="JS+ - метод компонента TCanvas StretchDraw";
frm.Width =525;
frm.Height=375;
frm.OnPaint=frm_Paint;

// Строка состояния
stb=new TStatusBar(frm);
stb.SimpleText=" Пример вывода изображения методом StretchDraw";

bmp=new TBitmap();
bmp.TransparentColor=clWhite;
bmp.Transparent=true;
bmp.LoadFromFile(JSPlus.HelpDir+"IMAGE\\TBitmap\\Image.bmp");

frm.ShowModal();

// Обработчик события OnPaint
function frm_Paint(frm)
{
  var x=10,y=10,dy=stb.Top-y,k=dy/bmp.Height,dx=bmp.Width*k;

  frm.Canvas.StretchDraw(Rect(x,y,dx,dy),bmp);
}