Foros Club Delphi - Project NavSistem.exe raised exception..............

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)

- - Project NavSistem.exe raised exception.............. (https://www.clubdelphi.com/foros/showthread.php?t=10828)

Project NavSistem.exe raised exception..............

Podeis echarme una mano con una excepcion que me aparece?

Código:

 void __fastcall TfrmPrincipal::EasyMap1MouseMove(TObject *Sender,

          TShiftState Shift, int X, int Y)

{

           /*Declaracion de mapX y mapY*/

           long double mapX,mapY;

           /*Pasa la posicion del mouse a lso Tlabel correspondientes*/

           EasyMap1->ScreenToMap(X,Y,mapX,mapY);

           lblLatMouse->Caption.Format("B=%F,L=%F",mapX,mapY);

El componente TEasyMap esta hecho en delphi, y el codigo correcto para este lenguaje es este:

Código:

 EasyMap1.ScreenToMap(X;Y,mapX,mapY);

StatusBar1.Panels[0].Text:=Format('B=%F,L=%F",[mapX,mapY]);

Yo intento pasar estos valores en lugar del statusbar a un tlabel
gracias

Hola nano.

¿ Puedes decirnos el mensaje de error de la excepción que salta ?.

Salutacions.

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();

}