In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Question about Classes

Xailer professional forum in English
Responder
Giuseppe Bogetti
Mensajes: 281
Registrado: Vie Ago 04, 2006 4:58 pm

Question about Classes

Mensaje por Giuseppe Bogetti »

Il Wed, 4 Oct 2006 13:11:20 +0400, Oleg ha scritto:
Oleg,
> Hello!
>
> How can I check in code if some class inherited from defined class?
> (For example, how to check if some Xailer object is TForm instance)
>
> o:=TForm1():New(Application:oMainForm)
> ...
> if IsForm(o) // ???
if ( __objDerivedFrom( o, "TFORM" ) )
--
Best regards,
Giuseppe Bogetti
B.G. Soft
Cuneo - Italy
Giuseppe Bogetti
Mensajes: 281
Registrado: Vie Ago 04, 2006 4:58 pm

Question about Classes

Mensaje por Giuseppe Bogetti »

Il Wed, 4 Oct 2006 13:11:20 +0400, Oleg ha scritto:
Oleg,
> Hello!
>
> How can I check in code if some class inherited from defined class?
> (For example, how to check if some Xailer object is TForm instance)
>
> o:=TForm1():New(Application:oMainForm)
> ...
> if IsForm(o) // ???
if ( __objDerivedFrom( o, "TFORM" ) )
--
Best regards,
Giuseppe Bogetti
B.G. Soft
Cuneo - Italy
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Question about Classes

Mensaje por jfgimenez »

Oleg, Giuseppe,
>> How can I check in code if some class inherited from defined class?
>> (For example, how to check if some Xailer object is TForm instance)
>>
>> o:=TForm1():New(Application:oMainForm)
>> ...
>> if IsForm(o) // ???
> if ( __objDerivedFrom( o, "TFORM" ) )
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Question about Classes

Mensaje por jfgimenez »

Oleg, Giuseppe,
>> How can I check in code if some class inherited from defined class?
>> (For example, how to check if some Xailer object is TForm instance)
>>
>> o:=TForm1():New(Application:oMainForm)
>> ...
>> if IsForm(o) // ???
> if ( __objDerivedFrom( o, "TFORM" ) )
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Question about Classes

Mensaje por jfgimenez »

Oleg, Giuseppe,
>> How can I check in code if some class inherited from defined class?
>> (For example, how to check if some Xailer object is TForm instance)
>>
>> o:=TForm1():New(Application:oMainForm)
>> ...
>> if IsForm(o) // ???
> if ( __objDerivedFrom( o, "TFORM" ) )
A little more easy:
o:IsKindOf( "TForm" )
--
Regards,
Jose F. Gimenez
http://www.xailer.com
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Question about Classes

Mensaje por jfgimenez »

Oleg, Giuseppe,
>> How can I check in code if some class inherited from defined class?
>> (For example, how to check if some Xailer object is TForm instance)
>>
>> o:=TForm1():New(Application:oMainForm)
>> ...
>> if IsForm(o) // ???
> if ( __objDerivedFrom( o, "TFORM" ) )
A little more easy:
o:IsKindOf( "TForm" )
--
Regards,
Jose F. Gimenez
http://www.xailer.com
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Oleg
Mensajes: 474
Registrado: Mié Jun 07, 2006 3:45 pm

Question about Classes

Mensaje por Oleg »

Giuseppe,
thank you.
Regards,
Oleg
Oleg
Mensajes: 474
Registrado: Mié Jun 07, 2006 3:45 pm

Question about Classes

Mensaje por Oleg »

Giuseppe,
thank you.
Regards,
Oleg
david fung
Mensajes: 257
Registrado: Mié Jul 19, 2006 8:48 am

Question about Classes

Mensaje por david fung »

Jose F. Gimenez wrote:
> Oleg, Giuseppe,
>
>>> How can I check in code if some class inherited from defined class?
>>> (For example, how to check if some Xailer object is TForm instance)
>>>
>>> o:=TForm1():New(Application:oMainForm)
>>> ...
>>> if IsForm(o) // ???
>> if ( __objDerivedFrom( o, "TFORM" ) )
>
> A little more easy:
>
> o:IsKindOf( "TForm" )
>
>
Is IsKindOf() a real or just a psuedo function, can't find from
documentation ?
david fung
Mensajes: 257
Registrado: Mié Jul 19, 2006 8:48 am

Question about Classes

Mensaje por david fung »

Jose F. Gimenez wrote:
> Oleg, Giuseppe,
>
>>> How can I check in code if some class inherited from defined class?
>>> (For example, how to check if some Xailer object is TForm instance)
>>>
>>> o:=TForm1():New(Application:oMainForm)
>>> ...
>>> if IsForm(o) // ???
>> if ( __objDerivedFrom( o, "TFORM" ) )
>
> A little more easy:
>
> o:IsKindOf( "TForm" )
>
>
Is IsKindOf() a real or just a psuedo function, can't find from
documentation ?
david fung
Mensajes: 257
Registrado: Mié Jul 19, 2006 8:48 am

Question about Classes

Mensaje por david fung »

david fung wrote:
> Jose F. Gimenez wrote:
>> Oleg, Giuseppe,
>>
>>>> How can I check in code if some class inherited from defined class?
>>>> (For example, how to check if some Xailer object is TForm instance)
>>>>
>>>> o:=TForm1():New(Application:oMainForm)
>>>> ...
>>>> if IsForm(o) // ???
>>> if ( __objDerivedFrom( o, "TFORM" ) )
>>
>> A little more easy:
>>
>> o:IsKindOf( "TForm" )
>>
>>
>
> Is IsKindOf() a real or just a psuedo function, can't find from
> documentation ?
It is real & it works. However, where is this property be found in the
documentation, where is it group under ?
Thanks
David
david fung
Mensajes: 257
Registrado: Mié Jul 19, 2006 8:48 am

Question about Classes

Mensaje por david fung »

david fung wrote:
> Jose F. Gimenez wrote:
>> Oleg, Giuseppe,
>>
>>>> How can I check in code if some class inherited from defined class?
>>>> (For example, how to check if some Xailer object is TForm instance)
>>>>
>>>> o:=TForm1():New(Application:oMainForm)
>>>> ...
>>>> if IsForm(o) // ???
>>> if ( __objDerivedFrom( o, "TFORM" ) )
>>
>> A little more easy:
>>
>> o:IsKindOf( "TForm" )
>>
>>
>
> Is IsKindOf() a real or just a psuedo function, can't find from
> documentation ?
It is real & it works. However, where is this property be found in the
documentation, where is it group under ?
Thanks
David
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9441
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:

Question about Classes

Mensaje por ignacio »

David,
In xHarbour documentation I guess.
Regards,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"david fung" <davfung@yahoo.com> escribió en el mensaje
news:45238454$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> david fung wrote:
>> Jose F. Gimenez wrote:
>>> Oleg, Giuseppe,
>>>
>>>>> How can I check in code if some class inherited from defined class?
>>>>> (For example, how to check if some Xailer object is TForm instance)
>>>>>
>>>>> o:=TForm1():New(Application:oMainForm)
>>>>> ...
>>>>> if IsForm(o) // ???
>>>> if ( __objDerivedFrom( o, "TFORM" ) )
>>>
>>> A little more easy:
>>>
>>> o:IsKindOf( "TForm" )
>>>
>>>
>>
>> Is IsKindOf() a real or just a psuedo function, can't find from
>> documentation ?
>
> It is real & it works. However, where is this property be found in the
> documentation, where is it group under ?
>
> Thanks
> David
>
Ignacio Ortiz de Zúñiga
[OZ Software]
https://www.ozs.es
--
[Equipo de Xailer / Xailer team]
https://www.xailer.com
NoName
Mensajes: 531
Registrado: Vie Feb 03, 2006 7:27 pm

Question about Classes

Mensaje por NoName »

David,
In xHarbour documentation I guess.
Regards,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"david fung" <davfung@yahoo.com> escribió en el mensaje
news:45238454$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> david fung wrote:
>> Jose F. Gimenez wrote:
>>> Oleg, Giuseppe,
>>>
>>>>> How can I check in code if some class inherited from defined class?
>>>>> (For example, how to check if some Xailer object is TForm instance)
>>>>>
>>>>> o:=TForm1():New(Application:oMainForm)
>>>>> ...
>>>>> if IsForm(o) // ???
>>>> if ( __objDerivedFrom( o, "TFORM" ) )
>>>
>>> A little more easy:
>>>
>>> o:IsKindOf( "TForm" )
>>>
>>>
>>
>> Is IsKindOf() a real or just a psuedo function, can't find from
>> documentation ?
>
> It is real & it works. However, where is this property be found in the
> documentation, where is it group under ?
>
> Thanks
> David
>
Responder