График на С++ Builder

[POPOV]

Ребят, у меня была на сделана задача на Delphi где нужно было по 2 радиусам введённым в Edit1 и 2 построить овал на Image. Теперь ту же задачу нужно переделать на C++ Builder. Так вот начав делать тут же запоролся..
Вот код 2-х процеду для работы с графиком на Delphi:

procedure TForm1.Timer1Timer(Sender: TObject); // Построение эллипса
var x,y:real;
begin
if t<=6.29 then
begin
x:=r1*cos(t);
y:=r2*sin(t);
Image1.Canvas.Pixels[150+round(10*x), 120+round(10*y)]:=colorbox1.selected;
t:=t+0.02;
end
else
timer1.Enabled:=false;
end;

procedure TForm1.Button4Click(Sender: TObject); // Кнопка "Построить график" оп заданной функции в TTimer1.
begin
timer1.Enabled:=true;
timer1.Interval:=10;
t:=0;
r1:=strtofloat(edit3.Text);
r2:=strtofloat(edit4.Text);
image1.Canvas.MoveTo(50,120);
image1.Canvas.LineTo(250,120);
image1.canvas.LineTo(245,118);
image1.canvas.LineTo(245,122);
image1.canvas.LineTo(250,120);
image1.Canvas.MoveTo(150,30);
image1.Canvas.LineTo(150,220);
image1.Canvas.TextOut(152,122,'0');
image1.Canvas.TextOut(252,122,'X');
image1.Canvas.TextOut(152,32,'Y');
end;

Теперь пишу то что успел набить на С++:

void __fastcall TForm2::Timer1Timer(TObject *Sender)
{
float x,y;
{
if (t<=6.29)
{
x=r1*cos(t);
y=r2*sin(t);
Image1->Canvas->Pixels[150+round(10*x), 120+round(10*y)]=ColorBox1->Selected;
t=t+0.02;
}
{
else
{
Timer1->Enabled=false;
}

void __fastcall TForm2::Button1Click(TObject *Sender)
{
Timer1->Enabled=true;
Timer1->Interval=10;
t=0;
r1=StrToFloat(Edit1->Text);
r2=StrToFloat(Edit2->Text);
Image1->Canvas->MoveTo(50,120);
Image1->Canvas->LineTo(250,120);
Image1->Canvas->LineTo(245,118);
Image1->Canvas->LineTo(245,122);
Image1->Canvas->LineTo(250,120);
Image1->Canvas->MoveTo(150,30);
Image1->Canvas->LineTo(150,220);
Image1->Canvas->TextOut(152,122,'0');
Image1->Canvas->TextOut(252,122,'X');
Image1->Canvas->TextOut(152,32,'Y');
}

Короче вот... Ошибку выдаёт на "round" в процедуре таймера. Воспользовался помощью, ничего там не понял ) На всякий случай прикрепил к этому посту скрин, где видно какие объекты на форме..

Помогите мне это решить пожалуйста..

[_Dmitry]

Ну, так C это не Delphi
#include <math.h>
floor(number)
или
ceil(number)

[POPOV]

Да я понимаю что С не Delphi, но я попросил помочь исправить )
Вот в этой строке пишу ceil или floor:
Image1->Canvas->Pixels[150+ceil(10*x), 120+(ceil(10*y)]=ColorBox1->Selected;

Выдаёт ошибку: [C++ Error] Unit3.cpp(67): E2193 Too few parameters in call to '_fastcall TCanvas::SetPixel(int,int,TColor)'

Чего не хватает ?

[_Dmitry]

Image1->Canvas->Pixels[150+ceil(10*x)][120+ceil(10*y)]=ColorBox1->Selected;

[POPOV]

Большое спасибо, график заработал !

У меня ещё маленикий вопрос и чтоб новую тему не создавать, запостю тут.

У меня есть процедура которая выводит на Image текст со случайным шрифтом, стилем и т.д.

Вот строка в которой выдаёт ошибку:

Image2->Canvas->TextOut(random(Image2->Width),random(Image2->Height), 'Работа 11 ');

вот текст ошибки:

[C++ Error] Unit3.cpp(118): E2129 Character constant too long (or empty)

Шде тут надо чё подправить ? В Delphi работало.

[_Dmitry]

Image2->Canvas->TextOutA(random(Image2->Width),random(Image2->Height), "Работа 11 ");

[POPOV]

Ещё раз спасибо ! Всё работает.

[Feel401]

Слушай не можешь мне на мыло кинуть исходник???ЕСЛИ ОН ОСТАЛСЯ???