Datas de un Objeto

Datas de un Objeto

Postby Vikthor » Wed Sep 26, 2007 6:25 am

Alguien me puede decir cual es la función que me puede mostrar las Datas que tenga un objeto.

Saludos
Vikthor
User avatar
Vikthor
 
Posts: 271
Joined: Fri Oct 07, 2005 5:20 am
Location: México

Postby Antonio Linares » Wed Sep 26, 2007 6:36 am

Vikthor,

Aqui tienes un ejemplo:
Code: Select all  Expand view  RUN
function Main()

   local o := ErrorNew() // Vamos a ver las DATAs de un objeto error
   local aInfo := o:ClassSel()
 
   for n = 1 to Len( aInfo )
      if Left( aInfo[ n ], 1 ) == "_"
         MsgInfo( SubStr( aInfo[ n ], 2 ) )
      endif
   next     

return nil
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42159
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Vikthor » Wed Sep 26, 2007 6:44 am

Antonio Linares wrote:Vikthor,

Aqui tienes un ejemplo:
Code: Select all  Expand view  RUN
function Main()

   local o := ErrorNew() // Vamos a ver las DATAs de un objeto error
   local aInfo := o:ClassSel()
 
   for n = 1 to Len( aInfo )
      if Left( aInfo[ n ], 1 ) == "_"
         MsgInfo( SubStr( aInfo[ n ], 2 ) )
      endif
   next     

return nil


Gracias Antonio, la pruebo
Vikthor
User avatar
Vikthor
 
Posts: 271
Joined: Fri Oct 07, 2005 5:20 am
Location: México


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 41 guests