как считать нажатия на кнопку мыши по OnMouseDown

[xander_var]

Доброго времени суток.
вот код:
if(Button==mbLeft)//чтоб на левую Button работало
{
float X1,Y1;
float j;
float x,y;
f = !f;//булева функция, объявленная глобально
x=22.87067778;
y=51.219;
int i;
switch(Image1->Height)//в зависимости от масштаба подгоняю пиксели
{ //под географические координаты(это карта)
case 4222:{j=1;break;}
case 3838:{j=1.1;break;}
case 3489:{j=1.1*1.1;break;}
case 3172:{j=1.1*1.1*1.1;break;}
case 2883:{j=1.1*1.1*1.1*1.1;break;}
case 2621:{j=1.1*1.1*1.1*1.1*1.1;break;}
case 2383:{j=1.1*1.1*1.1*1.1*1.1*1.1;bre ak;}
case 2166:{j=1.1*1.1*1.1*1.1*1.1*1.1*1.1 ;break;}
case 1969:{j=1.1*1.1*1.1*1.1*1.1*1.1*1.1 *1.1;break;}
case 1790:{j=1.1*1.1*1.1*1.1*1.1*1.1*1.1 *1.1*1.1;break;}
case 1627:{j=1.1*1.1*1.1*1.1*1.1*1.1*1.1 *1.1*1.1*1.1;break;}
case 1479:{j=1.1*1.1*1.1*1.1*1.1*1.1*1.1 *1.1*1.1*1.1*1.1;break;}
case 1345:{j=1.1*1.1*1.1*1.1*1.1*1.1*1.1 *1.1*1.1*1.1*1.1*1.1;break;}
case 1222:{j=1.1*1.1*1.1*1.1*1.1*1.1*1.1 *1.1*1.1*1.1*1.1*1.1*1.1;break;}
}
Edit6->Text=FloatToStr(j);//это просто для промежуточного контроля
Edit3->Clear();
Edit4->Clear();
Edit3->Text=IntToStr(X);
Edit4->Text=IntToStr(Y);
X1=float(X*j)/494;
Y1=((Image1->Height-float(Y))*j)/833;
X1=X1+x;
Y1=Y1+y;
Edit2->Text=FloatToStr(X1);
Edit1->Text=FloatToStr(Y1);
if (f==false) { //рисую линию
Image1->Canvas->MoveTo(X,Y);}
else
{
Image1->Canvas->Pen->Color = clRed;
Image1->Canvas->Pen->Width = 3
Image1->Canvas->LineTo(X,Y);
}
}

else ShowMessage("не та кнопка\nпопробуй еще раз");

1)может можно реализовать рисование линии проще?
2)pow(x,y) не работает, чем заменить, чтоб не тянуть такую бороду...
3)как при третьем нажатии выдать сообщение, что надо удалить старую линию?