Gracias,esta solucionado
de la siguiente manera:
Código:
void __fastcall TfrmPrincipal::EasyMap1MouseMove(TObject *Sender,
TShiftState Shift, int X, int Y)
{
/*Declaracion de mapX y mapY*/
long double fx,fy;
AnsiString buf;
/*Pasa la posicion del mouse a lso Tlabel correspondientes*/
EasyMap1->ScreenToMap(X,Y,fx,fy);
lblLatMouse->Caption = buf.sprintf("%eº",fy);
lblLongMouse->Caption = buf.sprintf("%eº",fx);
Application->ProcessMessages();
}