    TAHListBox s un component de llistes derivat de TCustomListBox que afegeix
    una mica de cosmtica a la presentaci de les dades. No s cap gran novetat
    s clar, tot el que fa ho podem fer manualment definint l'estil com a
    OwnerDrawFixed o OwnerDrawVariable i dibuixar-ho dins de OnDrawItem, per
    si ja ho tenim per defecte en un component doncs millor, no?

    Caracterstiques

       Permet mostrar imatges a cada element de la llista i aliniar-les a la
       dreta o a l'esquerra.

       El text tamb el podem alinear a l'esquerra, a la dreta o al centre.

       Podem definir un marge d'indentaci.

       Lnies senars i parells amb colors diferents.

       La barra de selecci pot ser de tres estils:
          tbsRaised: com un bot sense prmer.
          Lowered  : com un bot pres.
          Color    : una barra del color que indiquem i no el color de selecci
                     estandar de Windows.

       Tamb tenim una font especfica per la barra de selecci.


    Per provar el seu funcionament abans d'installar-ho a la llibreria de
    components, podeu executar el programa de prova que est preparat per
    funcionar sense tenir-ho installat a la llibreria.

    Em sorprendria molt si, tot i haber-ho testejat un pil de vegades, no
    sorts algun bug... aix que si en trobeu cap m'ho feu saber, eh? I si no
    en trobeu cap, tamb m'agradaria saber la vostra opini, els canvis que hi
    fareu o hi heu fet, etc... M'ho podeu fer arribar a: amer@lix.intercom.es,
    no sigueu gaire cruels amb els vostres comentaris!

    //------------------------------------------------------------------------//

    A ms a ms de les propietats estandar d'un ListBox, aquest component t o
    declara els segents tipus, propietats i events:


    Nous tipus
    ----------

      TBarStyle        = (tbsRaised, tbsLowered, tbsColor)
      TImagePos        = (ipLeft, ipRight)
      TAHGetIndexEvent = procedure(Sender: TObject; const ItemIndex: Integer;
                                   var idx: integer) of object;

    Noves propietats
    ----------------

      Alignment:     TAlignment     Alineaci del text
      BarColor:      TColor         Color de la barra de selecci
      BarStyle:      TBarStyle      Estil de la barra de selecci
      BarFont:       TFont          Tipografia per la barra de selecci
      ImagePos:      TImagePos      Posici de l'imatge
      Images:        TImageList     Llista d'imatges
      Offset:        Byte           Indentaci
      OddEvenColors: Boolean        Colors diferents per lnies senars i parells
      OddColor:      TColor         Color per les lnies senars
      EvenColor:     TColor         Color per les lnies parells

    Nou event
    ---------

      OnGetImageIndex: TAHGetIndexEvent

        Event que es dispara cada cop que es necessita saber quina imatge s'ha
        de pintar. Parmetres:

        Sender:    L'objecte mateix.
        ItemIndex: L'ndex de l'item.
        Idx:       Variable per guardar-hi l'ndex de l'imatge.

    //------------------------------------------------------------------------//

    La propera versi

    B, per la propera versi estic treballant per poder posar una imatge de
    fons tipus pgina HTML. La veritat s que ho volia posar en aquesta versi 
    per tinc petits, o grans, problemes i no acaba d'anar prou fi. Em sembla 
    que s'ha de replantejar una mica la cosa ja ho veurem.

    //------------------------------------------------------------------------//

    AS IS

    S la famosa clusula tamb s'aplica a aquest component, s a dir, aquest
    software es distribueix tal qual, no hi ha cap garantia de funcionament, la
    responsabilitat dels danys que pugui causar el mal funcionament d'aquest
    software no son meus si no de qui l'usi. Resumint sou lliures de fer el que
    vulgueu amb aix sota la vostra responsabilitat. No podeu distribuir el codi
    font modificat sense demanar-me perms.

    //------------------------------------------------------------------------//

    Francesc Puigdemont
    amer@lix.intercom.es