Ver Mensaje Individual
  #1  
Antiguo 14-02-2008
_Willa _Willa is offline
Miembro
 
Registrado: jun 2003
Ubicación: Madrid
Posts: 26
Reputación: 0
_Willa Va por buen camino
Convertir codigo Delphi a Builder

HOla,

Ahora q tengo un poco más de tiempo estoy convirtiendo a una serie de componentes que estan creados en Delphi a Builder...
Lo bueno es que son de codigo abierto, por eso me he decidido a convertir los ejemplos a Builder.

Me han surgido una serie de dudas a la hora de convertir, y por eso lo indico aqui a ver si hay alguien que sepa me puede indicar . "el paso a builder"

Código:
  L=Round(Sqrt(Sqr(PT.x-LastBrushX)+Sqr(PT.y-LastBrushY)));
Necesito aqui las instrucciones Round, Srt, Sqr

Código:
  if (SXSkinLibrary1.Styles[A] is TSXSkinGeneralStyle) then
La sentencia if, especialmente la clausula is, indicar que SXSkinLibrary1.Styles[A] es del tipo TSXSkinStyleList


Código:
   Dec(StartDragPT.X,Left);
Creo que es decrementar tantan vaces como indique "Left"

Al igual que creo que Inc(BrushCounter,2); // en Delphi
creo que en Builder, seria algo asi como BrushCounter+=2; si existe alguien q me lo confirme.

Bueno, pues eso si hay alguien que sepa delphi o que tb ha realizado alguna que otra adaptación a builder, ...y tiene tiempo pues que me heche una manilla. Gracias.
Si alguien ha trabajado con estos componentes que se ponga en
contacto conmigo y comente que tal le va, los problemas que ha tenido, etc.

Los componentes son:
http://www.saarixx.info/sxskincomponents/en/
Responder Con Cita