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.

Siguiento el HELP necesito ayuda.

Foro público de Xailer en español
Responder
GoosFancito[1]
Mensajes: 15
Registrado: Mié Jul 05, 2006 9:06 pm

Siguiento el HELP necesito ayuda.

Mensaje por GoosFancito[1] »

Hola.
a ver si pueden orientarme. estoy leyendo esto:
Por ejemplo, supongamos que queremos modificar el control TEdit para
que siempre ponga el color de fondo en amarillo. Bastaría con añadir en los
fuentes de nuestro programa lo siguiente:
CLASS TEdit FROM XEdit
PUBLISHED:
PROPERTY nClrPane INIT clYellow
ENDCLASS
Y después, usar la clase TEdit normalmente.
---------------------
Donde va en si? en el TUTOR01.prg:
#include "Xailer.ch"
class TEdit FROM XEdit
published:
property nClrPane init clYellow
endClass
Procedure Main()
Application:cTitle := "tut01"
TForm1():New( Application ):Show()
Application:Run()
Return
------------------
o en el Form.prg
#include "Xailer.ch"
class TEdit FROM XEdit
published:
property nClrPane init clYellow
endClass
CLASS TForm1 FROM TForm
COMPONENT oEdit1
Gracias.
Espero aca
METHOD CreateForm()
ENDCLASS
jasm.quitaesto
Mensajes: 420
Registrado: Sab Ago 16, 2008 9:06 pm

Siguiento el HELP necesito ayuda.

Mensaje por jasm.quitaesto »

En cualquiera.
Por comodidad, yo lo pongo en el módulo que carga la aplicación.
Saludos,
Alf+.
Lord Gustavo Miguel Angel escribió:
> Hola.
>
> a ver si pueden orientarme. estoy leyendo esto:
>
> Por ejemplo, supongamos que queremos modificar el control TEdit para
> que siempre ponga el color de fondo en amarillo. Bastarí­a con añadir en los
> fuentes de nuestro programa lo siguiente:
>
>
>
> CLASS TEdit FROM XEdit
>
> PUBLISHED:
>
> PROPERTY nClrPane INIT clYellow
>
> ENDCLASS
>
>
>
> Y después, usar la clase TEdit normalmente.
>
>
>
> ---------------------
>
> Donde va en si? en el TUTOR01.prg:
>
> #include "Xailer.ch"
>
> class TEdit FROM XEdit
> published:
> property nClrPane init clYellow
> endClass
>
> Procedure Main()
>
> Application:cTitle := "tut01"
> TForm1():New( Application ):Show()
> Application:Run()
>
> Return
>
> ------------------
>
> o en el Form.prg
>
> #include "Xailer.ch"
>
> class TEdit FROM XEdit
> published:
> property nClrPane init clYellow
> endClass
>
> CLASS TForm1 FROM TForm
>
> COMPONENT oEdit1
>
> Gracias.
>
> Espero aca
>
>
> METHOD CreateForm()
>
>
> ENDCLASS
>
>
jrcpoli-quitar
Mensajes: 558
Registrado: Mar Feb 09, 2010 2:26 pm

Siguiento el HELP necesito ayuda.

Mensaje por jrcpoli-quitar »

Saludos:
Serí­a bueno que leyeras este articulo de los creadores de Xailer.
http://xailer.info/esp/?p=21
José Ramón Castro.
Lord Gustavo Miguel Angel escribió:
> Hola.
>
> a ver si pueden orientarme. estoy leyendo esto:
>
> Por ejemplo, supongamos que queremos modificar el control TEdit para
> que siempre ponga el color de fondo en amarillo. Bastarí­a con añadir en los
> fuentes de nuestro programa lo siguiente:
>
>
>
> CLASS TEdit FROM XEdit
>
> PUBLISHED:
>
> PROPERTY nClrPane INIT clYellow
>
> ENDCLASS
>
>
>
> Y después, usar la clase TEdit normalmente.
>
>
>
> ---------------------
>
> Donde va en si? en el TUTOR01.prg:
>
> #include "Xailer.ch"
>
> class TEdit FROM XEdit
> published:
> property nClrPane init clYellow
> endClass
>
> Procedure Main()
>
> Application:cTitle := "tut01"
> TForm1():New( Application ):Show()
> Application:Run()
>
> Return
>
> ------------------
>
> o en el Form.prg
>
> #include "Xailer.ch"
>
> class TEdit FROM XEdit
> published:
> property nClrPane init clYellow
> endClass
>
> CLASS TForm1 FROM TForm
>
> COMPONENT oEdit1
>
> Gracias.
>
> Espero aca
>
>
> METHOD CreateForm()
>
>
> ENDCLASS
>
>
Responder