Club Builder

[Carlos J. Fernandez]

Hola a todos,

Me he instalado la versión del prueba del XE10 para testear que tal y ver si me decido a actualizarme, he intentado compilar desde la XE3 que es la que uso siempre y me da un error, a ver si me podéis echar una mano.

Todo viene de hace tiempo que pedí ayuda a Leo en este mensaje:

https://cppbuilder.es/viewtopic.php?t=14665&highlight=customfindcontrol

Al compilar en XE3 todo perfecto, pero si lo haces en XE10 salta este error:

[bcc32 Error] Caja.cpp(2379): E2064 Cannot initialize 'const TPoint &' with 'tagPOINT'
[bcc32 Error] Caja.cpp(2379): E2342 Type mismatch in parameter 'Point' (wanted 'const TPoint &', got 'tagPOINT')

El código que me puso Leo es este:

//---------------------------------------------------------------------------
TControl* CustomFindControl(MSG& Msg)
{
TControl* c = FindControl(Msg.hwnd);
if (c)
{
TPoint pt = c->ScreenToClient(Msg.pt);
TControl* c2 = static_cast<TWinControl>(c)->ControlAtPos(pt, false);
if (c2)
c = c2;
}
return c != Screen->ActiveForm ? c : NULL;
}
//---------------------------------------------------------------------------

He investigado por todos lados y no termino de encontrar la solución.

Un saludo a todos.

Carlos
_________________
Carlos J. Fernandez

[_Leo]

Prueba cambiando la línea:

  TPoint pt = c->ScreenToClient(Msg.pt);

por:

  TPoint pt = c->ScreenToClient(Point(Msg.pt.x, Msg.pt.x));

En las versiones anteriores TPoint tenia un constructor con POINT, ni idea de porque lo han quitado los de Embarcadero.

[Carlos J. Fernandez]

Leo

Funciona perfecto

Como siempre eres un crack, muchas gracias.

Carlos
_________________
Carlos J. Fernandez