несоответствие масштаба сетки и графика (C++Builder)

[nici]

Здравствуйте! При построении графика функции с ипсользованием формы возникла проблема: не соответствует масштаб координатной сетки и самого графика. Не подскажите, в чем проблема?
Заранее всем спасибо.

//Сетка
  for (int i=0; i<=(Image1->Width/m)+5; i++)
  { 
   Image1->Canvas->Pen->Color=clSilver;
   Image1->Canvas->MoveTo(i*m, Image1->Height);
   Image1->Canvas->LineTo(i*m, 0);
   Image1->Canvas->Pen->Color=clBlack;
   Image1->Canvas->TextOut(i*m+3, Image1->Height*0.92, IntToStr(i));
  }
 for (int i=0; i<=(Image1->Height/m)+5; i++)
  {
   Image1->Canvas->Pen->Color=clSilver;
   Image1->Canvas -> MoveTo(0, Image1->Height*0.9+i*m);
   Image1->Canvas -> LineTo(Image1->Width, Image1->Height*0.9+i*m);
   Image1->Canvas -> MoveTo(0, Image1->Height*0.9-i*m);
   Image1->Canvas -> LineTo(Image1->Width, Image1->Height*0.9-i*m);
   Image1->Canvas->Pen->Color=clBlack;
   Image1->Canvas->TextOut(10, Image1->Height*0.9-i*m-15, IntToStr(i));
  }
 //Оси
 Image1->Canvas->Pen->Color=clBlack;    
 Image1->Canvas->Pen->Style=0;
 Image1->Canvas->MoveTo(0,0);                
 Image1->Canvas->LineTo(0,Image1->Height);   
 Image1->Canvas->MoveTo(0,Image1->Height*0.9);              
 Image1->Canvas->LineTo(Image1->Width,Image1->Height*0.9);  

//График
 for(PX=0;   PX<=Image1->Width;PX++)
 {
  Y=m*P1*PX*pow(td,-1.2);
  PY=Image1->Height-(Y+1)*Image1->Height*0.1;
  Image1->Canvas->Pixels[PX][PY]=clGreen;
 }

[Stilet]

Сорри за оффтоп, но если в Буилдере есть TChart (или его аналог для построения графиков) используй его - это хорошая вещь.