Alguien puede darme un ejemplo de tree desde recurso

Posts: 203

Joined: Tue Oct 11, 2005 02:17 PM

Alguien puede darme un ejemplo de tree desde recurso
Posted: Mon Mar 16, 2009 10:40 AM

He probado el ejemplos que hay pero no encuentro ninguno que utilice los recursos:

STATIC FUNCTION Prueba2()
   local oDlg, oTree, oImageList



   DEFINE DIALOG oDlg TITLE "TreeView from source" RESOURCE "A_PRUEBA"


   oTree := TTreeview():ReDefine( 110, oDlg, 0, GetSysColor( COLOR_WINDOW ) )


   oImageList := TimageList():New()
   oImageList:Add( TBitmap():Define( "IMG1",, oDlg ) )
   oImageList:Add( TBitmap():Define( "IMG2",, oDlg ) )
   oImageList:Add( TBitmap():Define( "IMG3",, oDlg ) )
   oTree:SetImageList( oImageList )

   ACTIVATE DIALOG oDlg CENTERED ;
      ON INIT AddItems( oTree )

return nil


function AddItems( oTree )

   local oItem1, oItem2, oItem3

   oItem1 = oTree:Add( "First", 1 )

   oItem1:Add( "One", 2 )
   oItem1:Add( "Two", 1 )
   oItem1:Add( "Three",2 )
   oItem2 = oTree:Add( "Second" )
   oItem2:Add( "Hello" )
   oItem2:Add( "World" )
   oItem3 = oTree:Add( "Third", 3 )
   oItem3:Add( "Last" )
   oItem3:Add( "item" )

return nil

Consigo que aparezca el tree pero no me aparecen las imágenes

Gracias

horacio

Posts: 1364

Joined: Wed Jun 21, 2006 12:39 AM

Re: Alguien puede darme un ejemplo de tree desde recurso
Posted: Mon Mar 16, 2009 04:16 PM

A mi me sucede lo mismo, inclusive el ejemplo que trae FWH no trae imágenes. ¿ se podrá ?. Saludos

andresreyes_mzt

Posts: 71

Joined: Fri Jan 11, 2008 06:55 AM

Re: Alguien puede darme un ejemplo de tree desde recurso
Posted: Mon Mar 16, 2009 06:06 PM

la llamada a este metodo debe de ser dentro del ON INIT del dialogo, cuando el objeto treeview ya esta creado de lo contrario no funciona.

oTree:SetImageList( oImageList )

Saludos.

{{{ ---- xharbour + Borland C --- }}}

miarcod

Posts: 203

Joined: Tue Oct 11, 2005 02:17 PM

Re: Alguien puede darme un ejemplo de tree desde recurso
Posted: Mon Mar 16, 2009 07:24 PM

Gracias, ya funciona

Patricio Avalos Aguirre

Posts: 1074

Joined: Fri Oct 07, 2005 01:56 PM

Re: Alguien puede darme un ejemplo de tree desde recurso
Posted: Mon Mar 16, 2009 07:53 PM

Hola

Andres Reyes nuevamente por aqui

Una Consulta, alguna novedad de la estupenda WinDebug..

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=9768&p=47129#p47129

Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl

andresreyes_mzt

Posts: 71

Joined: Fri Jan 11, 2008 06:55 AM

Re: Alguien puede darme un ejemplo de tree desde recurso
Posted: Thu Mar 19, 2009 06:40 PM

Hola Patricio,

Sin novedades todavía, sigo trabajando en varios proyectos al mismo tiempo, y sobre todo aprendiendo cosas nuevas cada día, que por supuesto se verán reflejadas en las nuevas versiones mis programas. Espero no sea largo el tiempo, pero ahí estaremos,

Saludos,

Andrés Reyes

{{{ ---- xharbour + Borland C --- }}}

FiveTech Support Forums

Continue the discussion