Delphi canvas

[MorgunZ]

Здравствуйте, нужно написать код на делфи, который сможет отрисовать картинку в канвасе.

Программе дается код на JS в таком формате

var canvas = document.getElementById('slog');
var ctx = canvas.getContext('2d');
ctx.lineJoin = 'bevel';
function Cw(w){ ctx.lineWidth = w; }
function Cc(c){ ctx.strokeStyle = c; ctx.fillStyle = c; }
function CS(){ ctx.stroke(); Cw(5); Cc('#253FCA'); ctx.beginPath(); }
function CF(){ ctx.fill(); Cw(5); Cc('#253FCA'); ctx.beginPath(); }
function CM(x,y){ ctx.moveTo(x,y); }
function CL(x,y){ ctx.lineTo(x,y); }
function CQ(x,y,a,b){ ctx.quadraticCurveTo(x,y,a,b); }
function CA(x,y,r,a,b,c){ ctx.arc(x,y,r,a,b,c); }
function CR(x,y,w,h,a){ ctx.translate(x,y); ctx.rotate(a); ctx.rect(0,0,w,h); ctx.setTransform(1,0,0,1,0,0); }
Cw(5); Cc('#253FCA');
Cc('#253fca');CM(169,48);CQ(172,36,186,36);CS();
Cc('#253fca');CM(81,18);CL(79,61);CS();
Cc('#253fca');CM(68,86);CL(66,86);CQ(54,86,53,100);CQ(53,114,65,115);CL(67,115);CQ(75,115,78,109);CS();
Cc('#253fca');CM(80,37);CQ(76,32,70,32);CS();
Cc('#253fca');CM(200,76);CL(202,79);CL(204,77);CL(202,75);CL(200,76);CS();
Cc('#253fca');CM(70,32);CL(68,32);CQ(56,32,55,46);CQ(55,60,67,61);CL(69,61);CQ(75,61,79,57);CS();
Cc('#253fca');CM(104,87);CL(102,87);CQ(90,87,89,101);CQ(89,115,101,116);CL(103,116);CQ(115,116,116,102);CQ(116,88,104,87);CS();
Cc('#253fca');CM(176,102);CL(189,119);CS();
Cc('#253fca');CM(228,92);CQ(216,91,215,106);CQ(215,120,227,120);CL(229,120);CQ(237,121,239,114);CS();
Cc('#253fca');CM(154,35);CL(153,64);CS();
Cc('#253fca');CM(93,45);CL(118,46);CQ(118,34,106,33);CS();
Cc('#253fca');CM(78,93);CQ(76,86,68,86);CS();
Cc('#253fca');CM(188,90);CL(167,110);CS();
Cc('#253fca');CM(142,89);CL(140,89);CQ(128,88,127,103);CQ(127,117,139,117);CL(141,117);CQ(153,118,154,103);CQ(154,89,142,89);CS();
Cc('#253fca');CM(106,33);CQ(94,33,93,47);CQ(93,62,105,62);CL(107,62);CQ(115,62,117,56);CS();
Cc('#253fca');CM(215,103);CL(240,104);CQ(240,92,228,92);CS();
Cc('#253fca');CM(144,35);CL(142,35);CQ(130,34,129,49);CQ(129,63,141,63);CL(143,63);CQ(149,63,153,60);CS();
Cc('#253fca');CM(202,91);CL(201,119);CS();
Cc('#253fca');CM(168,75);CL(167,118);CS();
Cc('#253fca');CM(154,39);CQ(150,35,144,35);CS();
Cc('#253fca');CM(170,36);CL(169,64);CS();

а она должна распарсить все это, и нарисовать в канвасе.

[Anton1970]

пишите
i000386@gmail.com
я думаю договоримся

[Avazart]

Связаться со мной Вы можете по следующим контактам:
1. Icq: 673574224
2. E-mail: avazart@yandex.ua
3. Skype: добавляю по запросу через e-mail.

Огромная просьба сразу указывать:
1. Предполагаемый предварительный БЮДЖЕТ или его рамки.
2. Максимальные СРОКИ в которые нужно выполнить ваш заказ.
3. ССЫЛКУ на данную тему, что бы сразу было понятно о чем речь, без лишних слов.
4. Максимально полное и подробное техническое ЗАДАНИЕ, если Вы его не указали или указали частично в вашей теме
(желательно в виде MS Word документа с необходимыми иллюстрациями, схемами, скриншотами итп)

Работаю только с ПРЕДОПЛАТОЙ 30%.
Предложения без указания "со старта" цены/сроков могут быть ПРОИГНОРИРОВАНЫ.
Для прикладных программ использую Delphi/С++Builder/C++Qt для учебных еще и MSVC С/C++/C#

[JIeIIIa]

Если еще актуально, пишите: stealth(собака)bigmir.net