Traducir desde Pascal

[Picard]

Hola compañeros,tengo una seria duda o problema,ya no se como mirarlo.
Tengo una aplicacion en la cual utilizo un componente TEasyMap.esta en pascal y no se como prodria traducir el codigo para utilizarlo en c++ builder,ahi va el codigo
mapX, mapY: Extended;//esto debe ser una declaracion,pero no me admite Extended

begin
EasyMap1.ScreenToMap(X, Y, mapX, mapY);
Statusbar1.Panels[0].Text := Format('Cursor Location: B=%F deg, L=%F deg', [mapY, mapX]);
end;
yo he intentado hacer lo siguiente,pero con resultados desastrosos:
void __fastcall TfrmPrincipal::PanelMapasMouseMove(TObject
//Declaro mapX ,mapY
long double mapX;
long double mapY;
*Sender,
TShiftState Shift, int X, int Y)
{
PanelMapas->ScreenToMap(X,Y,mapX,mapY);
lblLatitudMouse->Caption = Format ("%Fº",ARRAYOFCONST ((long double) mapX,(long double)mapY)
podeis echarme una manita?
Gracias

[roman]

pero con resultados desastrosos:


Sería interesante que especificaras exactamente cuáles son estos resultados desastrosos.

Por cierto, PanelMapas ¿es el equivalente a EasyMap1 o se trata de un panel que, por tanto no admite el método ScreenToMap?

// Saludos

[Picard]

Gracias por responder tan rapido,veras los resultados desastrosos son bloqueo total del pc y si,Panelmapas el en realidad TEasyMap1

[Picard]

Asi:void __fastcall TfrmPrincipal::PanelMapasMouseMove(TObject *Sender,
TShiftState Shift, int X, int Y)
{
/*definicion de mapX,mapY*/
long double mapX;
long double mapY;
PanelMapas->ScreenToMap(X,Y,mapX,mapY);
lblLatitudMouse->Caption = Format("%F deg",ARRAYOFCONST((long double)mapY,(long double)mapX));

}
Me da los siguientes errores:
[C++ Error] unitPrincipal.cpp(157): E2219 Wrong number of arguments in call of macro 'ARRAYOFCONST'
[C++ Error] unitPrincipal.cpp(157): E2188 Expression syntax