[Lazarus-es] Consulta sobre TTreeView 2

[ELMO CALATAYUD]

Nuevamente gracias Jose

 

Voy entendiendo, de paso me revise todo el fuente de treeview.inc que esta en la ruta   lazarus\lcl\include
alli veo dos metodos:  OnCustomDraw y OnCustomDrawItem, creo que alli es donde debe ponerse el código para pintar las demas Datos, asimismo veo que el String Caption de TreeNode lo dibuja con TextOut(x, TextY, Node.Text);  pero eso ya es otra cosa, quizas alguien se anima a completar la funcionalidad del TTreeview de Lazarus para que muestren Columns, que por lo visto en el fuente, es un asunto pendiente ya que esta en el texto cabecera del fuente treeview.inc  como ToDo (Por Hacer) 

Tamben he comprobado que si pones un objeto TTreeView en un fromulario, en el inspector de Objetos se muestra publicados los metodos OnCustomDraw y también OnCustomDrawItem, por ello asumo que en uno de los dos esi donde se puede dibujar cosas adicionales, en primer lugar me incliano por OnCustomDrawItem, pero aún no manejo muy bien el dibujo en canvas, te pido por favor si tenes algún ejemplo para hacer esto me lo envies por correo.

 

Saludos

 

Elmo

 

--Archivo adjunto de mensaje reenviado--
From: josea en artextrading.com
To: lazarus-es en lists.lazarus.freepascal.org
Date: Wed, 8 Jul 2009 12:37:50 +0200
Subject: Re: [Lazarus-es] Consulta sobre TTreeView


La solución es mediante la property Data que tienen todos los 
TTreeViewNode. No tienes que derivar del TTreeView sinó crearte una 
estructura de objetos, es decir un TObject por cada nodo que incluyas en 
el TTreeview y en lazar ese objeto al nodo ya sea cuando creas el nodo 
mediante .add o mediante el método .addChildObject del TTreView.Items
 
Normalmente para este tipo de trabajos me creo una estructura de objetos 
basándome en un TListObject paralelo al TTreview así es más fácil crear, 
gestionar y eliminar todos los objetos que enlazas con los nodos.
 
Otro tema es el de pintado de las columnas, que tendras que hacer 
manualmente puesto que el evento de pintado del TTreeview sólo te 
pintará el caption. Creo recordar que era uno de los eventos OnDraw del 
TTreeView pero ahora no tengo ningún ejemplo disponible para confirmártelo.
 


_________________________________________________________________
Discover the new Windows Vista
http://search.msn.com/results.aspx?q=windows+vista&mkt=en-US&form=QBRE
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus-es/attachments/20090708/6f07c34a/attachment-0002.html>