Foros Club Delphi - Traducir desde Pascal

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

- OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)

- - Traducir desde Pascal (https://www.clubdelphi.com/foros/showthread.php?t=10345)

Traducir desde Pascal

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

Código:

 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:

Código:

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

Cita:

Empezado por Picard

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

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

Asi:

Código:

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