Ver Mensaje Individual
  #7  
Antiguo 19-11-2014
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola de nuevo Ñuño.

Probando en Delphi 7...

En principio, hay que declarar los tipos TTextLayout y TTextStyle previo a la declaración de la clase ya que no existe:
Código Delphi [-]
type
  TTextLayout = (tlTop, tlCenter, tlBottom);
    
  TTextStyle = packed record      
    Alignment: TAlignment;
    Layout: TTextLayout;
    SingleLine: Boolean;
    Clipping: Boolean;
    ExpandTabs: Boolean;
    ShowPrefix: Boolean;
    Wordbreak: Boolean;
    Opaque: Boolean;
    SystemFont: Boolean;
    RightToLeft: Boolean;
    EndEllipsis: Boolean;
  end;
  ...
  TCustomExtCalendar = CLASS (TGraphicControl)
  ...
Luego de eso me aparece:
Cita:
[Error] extcalendar.pas(122): Method 'GetControlClassDefaultSize' not found in base class
[Error] extcalendar.pas(266): Property 'OnMouseEnter' does not exist in base class
[Error] extcalendar.pas(269): Property 'OnMouseLeave' does not exist in base class
[Fatal Error] extcalendar.pas(310): File not found: 'LazUTF8.dcu'
Estoy acostumbrado a lidiar con los enventos OnMouseEnter y OnMouseLeave en Delphi 7 y no vas a tener problemas con eso, versiones posteriores ya los incluyen. Si encuentro algo mas lo pongo aquí .

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 19-11-2014 a las 22:22:26.
Responder Con Cita