Xailer & OZ Software

Quiero sobreescribir la clase y me casca en nClrAltPane.
Me podeis decir que hago mal.
CLASS TBrowse FROM XBrowse
PROPERTY nClrAltPane INIT cl3DLight
PROPERTY nRowHeight INIT 21
PROPERTY lAllowRowSizing INIT .f.
PROPERTY nMarqueeStyle INIT bmHIGHLROW
PROPERTY lAllowColHiding INIT .f.
ENDCLASS
Si quiero sobreescribir Tedit para que sea mas alto y se ponga amarillo al
tomar el foco ¿seria asi?
CLASS TEdit FROM XEdit
PROPERTY nHeight INIT 30
PROPERTY nClrPaneFocus INIT clYellow
ENDCLASS
Y para cambiar el color?
Paco V

Paco,
te falta el PUBLISHED:
CLASS TBrowse FROM XBrowse
PUBLISHED:
PROPERTY nClrAltPane INIT cl3DLight
PROPERTY nRowHeight INIT 21
PROPERTY lAllowRowSizing INIT .f.
PROPERTY nMarqueeStyle INIT bmHIGHLROW
PROPERTY lAllowColHiding INIT .f.
ENDCLASS
CLASS TEdit FROM XEdit
PUBLISHED:
PROPERTY nHeight INIT 30
PROPERTY nClrPaneFocus INIT clYellow
ENDCLASS
Un Saludo,
Xevi.
"Paco V" <ssi@ono.com> ha escrit al missatge del grup de discussió:
4507e228$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>
> Quiero sobreescribir la clase y me casca en nClrAltPane.
> Me podeis decir que hago mal.
>
> CLASS TBrowse FROM XBrowse
> PROPERTY nClrAltPane INIT cl3DLight
> PROPERTY nRowHeight INIT 21
> PROPERTY lAllowRowSizing INIT .f.
> PROPERTY nMarqueeStyle INIT bmHIGHLROW
> PROPERTY lAllowColHiding INIT .f.
> ENDCLASS
>
> Si quiero sobreescribir Tedit para que sea mas alto y se ponga amarillo al
> tomar el foco ¿seria asi?
>
> CLASS TEdit FROM XEdit
> PROPERTY nHeight INIT 30
> PROPERTY nClrPaneFocus INIT clYellow
>
> ENDCLASS
>
> Y para cambiar el color?
>
> Paco V

He incluido PUBLISHED:
y Sigue cascando.
Adjunto el error.
***************************** Registro de errores *****************************
Fecha: 13-09-06
Hora: 17:27:00
Memoria libre: 512432
Area actual: 1
------------------------- Información del compilador --------------------------
Versión Xailer: Xailer 1.0.2 Version 1.0b
Compilador: xHarbour build 0.99.61 Intl. (SimpLex) PCode Version: 7
Compilador C/C++: Borland C++ 5.5.1
Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
----------------------- Información detallada del error -----------------------
Subsistema: BASE
Código de error: 1004
Estado: .F.
Descripción: Scope Violation <HIDDEN>
Operación: HCLRALTPANE
Argumentos:
Fichero:
Código error SO: 0
Pila de llamadas:
TDBBROWSE:_NCLRALTPANE (2763)
TFORM17:CREATEFORM (37)
TFORM17:NEW (184)
TFORM00:OBUTTON2CLICK (169)
TBUTTON:ONCLICK (0)
TBUTTON:CLICK (102)
(b)XCONTROL:XCONTROL (142)
TBUTTON:COMMAND (0)
TSCROLLINGWINCONTROL:WMCOMMAND (254)
TFORM00:WMCOMMAND (873)
RUNFORM (0)
TAPPLICATION:RUN (193)
MAIN (24)
------------------ Información detallada de áreas de trabajo ------------------
Area: 1
Alias: UT100
Registro: 5
Filtro:
Relación:
Orden del índice: 1
Clave activa: 1
"Xevi" <xevicomas@gmail.com> wrote:
>Paco,
>
>te falta el PUBLISHED:
>
> CLASS TBrowse FROM XBrowse
> PUBLISHED:
> PROPERTY nClrAltPane INIT cl3DLight
> PROPERTY nRowHeight INIT 21
> PROPERTY lAllowRowSizing INIT .f.
> PROPERTY nMarqueeStyle INIT bmHIGHLROW
> PROPERTY lAllowColHiding INIT .f.
> ENDCLASS
>
>
> CLASS TEdit FROM XEdit
> PUBLISHED:
> PROPERTY nHeight INIT 30
> PROPERTY nClrPaneFocus INIT clYellow
> ENDCLASS
>
>
>Un Saludo,
>Xevi.
>
>
>"Paco V" <ssi@ono.com> ha escrit al missatge del grup de discussió:
>4507e228$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>
>> Quiero sobreescribir la clase y me casca en nClrAltPane.
>> Me podeis decir que hago mal.
>>
>> CLASS TBrowse FROM XBrowse
>> PROPERTY nClrAltPane INIT cl3DLight
>> PROPERTY nRowHeight INIT 21
>> PROPERTY lAllowRowSizing INIT .f.
>> PROPERTY nMarqueeStyle INIT bmHIGHLROW
>> PROPERTY lAllowColHiding INIT .f.
>> ENDCLASS
>>
>> Si quiero sobreescribir Tedit para que sea mas alto y se ponga amarillo
al
>> tomar el foco ¿seria asi?
>>
>> CLASS TEdit FROM XEdit
>> PROPERTY nHeight INIT 30
>> PROPERTY nClrPaneFocus INIT clYellow
>>
>> ENDCLASS
>>
>> Y para cambiar el color?
>>
>> Paco V
>
>

Paco,
La propiedad nClrAltPane Parece que es OCULTA y no se puede modificar.
Comenta esta línea y prueba a recompilar
Un Saludo,
Xevi.
"Paco V" <ssi@ono.com> ha escrit al missatge del grup de discussió:
45082431$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>
> He incluido PUBLISHED:
>
> y Sigue cascando.
>
> Adjunto el error.
>
> ***************************** Registro de errores
> *****************************
>
> Fecha: 13-09-06
> Hora: 17:27:00
> Memoria libre: 512432
> Area actual: 1
>
> ------------------------- Información del
> compilador --------------------------
>
> Versión Xailer: Xailer 1.0.2 Version 1.0b
> Compilador: xHarbour build 0.99.61 Intl. (SimpLex) PCode Version: 7
> Compilador C/C++: Borland C++ 5.5.1
> Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
>
> ----------------------- Información detallada del
> error -----------------------
>
> Subsistema: BASE
> Código de error: 1004
> Estado: .F.
> Descripción: Scope Violation <HIDDEN>
> Operación: HCLRALTPANE
> Argumentos:
> Fichero:
> Código error SO: 0
>
> Pila de llamadas:
> TDBBROWSE:_NCLRALTPANE (2763)
> TFORM17:CREATEFORM (37)
> TFORM17:NEW (184)
> TFORM00:OBUTTON2CLICK (169)
> TBUTTON:ONCLICK (0)
> TBUTTON:CLICK (102)
> (b)XCONTROL:XCONTROL (142)
> TBUTTON:COMMAND (0)
> TSCROLLINGWINCONTROL:WMCOMMAND (254)
> TFORM00:WMCOMMAND (873)
> RUNFORM (0)
> TAPPLICATION:RUN (193)
> MAIN (24)
>
> ------------------ Información detallada de áreas de
> trabajo ------------------
>
> Area: 1
> Alias: UT100
> Registro: 5
> Filtro:
> Relación:
> Orden del índice: 1
> Clave activa: 1
>
>
>
> "Xevi" <xevicomas@gmail.com> wrote:
>>Paco,
>>
>>te falta el PUBLISHED:
>>
>> CLASS TBrowse FROM XBrowse
>> PUBLISHED:
>> PROPERTY nClrAltPane INIT cl3DLight
>> PROPERTY nRowHeight INIT 21
>> PROPERTY lAllowRowSizing INIT .f.
>> PROPERTY nMarqueeStyle INIT bmHIGHLROW
>> PROPERTY lAllowColHiding INIT .f.
>> ENDCLASS
>>
>>
>> CLASS TEdit FROM XEdit
>> PUBLISHED:
>> PROPERTY nHeight INIT 30
>> PROPERTY nClrPaneFocus INIT clYellow
>> ENDCLASS
>>
>>
>>Un Saludo,
>>Xevi.
>>
>>
>>"Paco V" <ssi@ono.com> ha escrit al missatge del grup de discussió:
>>4507e228$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>>
>>> Quiero sobreescribir la clase y me casca en nClrAltPane.
>>> Me podeis decir que hago mal.
>>>
>>> CLASS TBrowse FROM XBrowse
>>> PROPERTY nClrAltPane INIT cl3DLight
>>> PROPERTY nRowHeight INIT 21
>>> PROPERTY lAllowRowSizing INIT .f.
>>> PROPERTY nMarqueeStyle INIT bmHIGHLROW
>>> PROPERTY lAllowColHiding INIT .f.
>>> ENDCLASS
>>>
>>> Si quiero sobreescribir Tedit para que sea mas alto y se ponga amarillo
> al
>>> tomar el foco ¿seria asi?
>>>
>>> CLASS TEdit FROM XEdit
>>> PROPERTY nHeight INIT 30
>>> PROPERTY nClrPaneFocus INIT clYellow
>>>
>>> ENDCLASS
>>>
>>> Y para cambiar el color?
>>>
>>> Paco V
>>
>>
>

ese mismo problema me presento a mi cuando quise sobrecargar el xBrowse.
Saludos.
--
Ramón Zea
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoft/
"Paco V" <ssi@ono.com> escribió en el mensaje
news:45082431$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>
> He incluido PUBLISHED:
>
> y Sigue cascando.
>
> Adjunto el error.
>
> ***************************** Registro de errores
> *****************************
>
> Fecha: 13-09-06
> Hora: 17:27:00
> Memoria libre: 512432
> Area actual: 1
>
> ------------------------- Información del
> compilador --------------------------
>
> Versión Xailer: Xailer 1.0.2 Version 1.0b
> Compilador: xHarbour build 0.99.61 Intl. (SimpLex) PCode Version: 7
> Compilador C/C++: Borland C++ 5.5.1
> Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
>
> ----------------------- Información detallada del
> error -----------------------
>
> Subsistema: BASE
> Código de error: 1004
> Estado: .F.
> Descripción: Scope Violation <HIDDEN>
> Operación: HCLRALTPANE
> Argumentos:
> Fichero:
> Código error SO: 0
>
> Pila de llamadas:
> TDBBROWSE:_NCLRALTPANE (2763)
> TFORM17:CREATEFORM (37)
> TFORM17:NEW (184)
> TFORM00:OBUTTON2CLICK (169)
> TBUTTON:ONCLICK (0)
> TBUTTON:CLICK (102)
> (b)XCONTROL:XCONTROL (142)
> TBUTTON:COMMAND (0)
> TSCROLLINGWINCONTROL:WMCOMMAND (254)
> TFORM00:WMCOMMAND (873)
> RUNFORM (0)
> TAPPLICATION:RUN (193)
> MAIN (24)
>
> ------------------ Información detallada de áreas de
> trabajo ------------------
>
> Area: 1
> Alias: UT100
> Registro: 5
> Filtro:
> Relación:
> Orden del índice: 1
> Clave activa: 1
>
>
>
> "Xevi" <xevicomas@gmail.com> wrote:
>>Paco,
>>
>>te falta el PUBLISHED:
>>
>> CLASS TBrowse FROM XBrowse
>> PUBLISHED:
>> PROPERTY nClrAltPane INIT cl3DLight
>> PROPERTY nRowHeight INIT 21
>> PROPERTY lAllowRowSizing INIT .f.
>> PROPERTY nMarqueeStyle INIT bmHIGHLROW
>> PROPERTY lAllowColHiding INIT .f.
>> ENDCLASS
>>
>>
>> CLASS TEdit FROM XEdit
>> PUBLISHED:
>> PROPERTY nHeight INIT 30
>> PROPERTY nClrPaneFocus INIT clYellow
>> ENDCLASS
>>
>>
>>Un Saludo,
>>Xevi.
>>
>>
>>"Paco V" <ssi@ono.com> ha escrit al missatge del grup de discussió:
>>4507e228$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>>
>>> Quiero sobreescribir la clase y me casca en nClrAltPane.
>>> Me podeis decir que hago mal.
>>>
>>> CLASS TBrowse FROM XBrowse
>>> PROPERTY nClrAltPane INIT cl3DLight
>>> PROPERTY nRowHeight INIT 21
>>> PROPERTY lAllowRowSizing INIT .f.
>>> PROPERTY nMarqueeStyle INIT bmHIGHLROW
>>> PROPERTY lAllowColHiding INIT .f.
>>> ENDCLASS
>>>
>>> Si quiero sobreescribir Tedit para que sea mas alto y se ponga amarillo
> al
>>> tomar el foco ¿seria asi?
>>>
>>> CLASS TEdit FROM XEdit
>>> PROPERTY nHeight INIT 30
>>> PROPERTY nClrPaneFocus INIT clYellow
>>>
>>> ENDCLASS
>>>
>>> Y para cambiar el color?
>>>
>>> Paco V
>>
>>
>

Paco,
> Quiero sobreescribir la clase y me casca en nClrAltPane.
> Me podeis decir que hago mal.
>
> CLASS TBrowse FROM XBrowse
> PROPERTY nClrAltPane INIT cl3DLight
> PROPERTY nRowHeight INIT 21
> PROPERTY lAllowRowSizing INIT .f.
> PROPERTY nMarqueeStyle INIT bmHIGHLROW
> PROPERTY lAllowColHiding INIT .f.
> ENDCLASS
No debes sobreescribir la clase TBrowse, sino la del browse que estés usando
(TArrayBrowse, TDbfBrowse o TDBBrowse).
> Si quiero sobreescribir Tedit para que sea mas alto y se ponga amarillo al
> tomar el foco ¿seria asi?
>
> CLASS TEdit FROM XEdit
> PROPERTY nHeight INIT 30
> PROPERTY nClrPaneFocus INIT clYellow
>
> ENDCLASS
Sí, excepto que la altura está determinada en el formulario, y no te la va a
cambiar.
> Y para cambiar el color?
nClrPane
--
Un saludo,
José F. Giménez
http://www.xailer.com

Jose:
He sobreescrito la clase TDbBrowse, y me hace alguna cosa rara.
Pregunto:
Si yo tengo ya creado un TDbBrowse y despues sobreescribo la clase, al reconstruir
el proyecto que prevalece?
Quiero decir, que si yo he cambiado alguna propiedad del TDbBrowse y luego
al sobreescribir la clase la cambio ¿hay algún problema?
Esto es lo que he hecho y con algunos TDbBrowse me casca.
CLASS TBrowse FROM XBrowse
PROPERTY nClrAltPane INIT cl3DLight
PROPERTY nRowHeight INIT 21 //Altura Fila
PROPERTY lAllowRowSizing INIT .f. //No permite cambiar Altura de las
Filas
// PROPERTY nColDividerStyle INIT blLIGHTGRAY // Separador de Columnas
PROPERTY nMarqueeStyle INIT bmHIGHLROW // Marco del Browse
PROPERTY lAllowColHiding INIT .f. //No permite esconder Columnas
ENDCLASS
Gracias.
Paco V
"Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>Paco,
>
>> Quiero sobreescribir la clase y me casca en nClrAltPane.
>> Me podeis decir que hago mal.
>>
>> CLASS TBrowse FROM XBrowse
>> PROPERTY nClrAltPane INIT cl3DLight
>> PROPERTY nRowHeight INIT 21
>> PROPERTY lAllowRowSizing INIT .f.
>> PROPERTY nMarqueeStyle INIT bmHIGHLROW
>> PROPERTY lAllowColHiding INIT .f.
>> ENDCLASS
>
>No debes sobreescribir la clase TBrowse, sino la del browse que estés usando
>(TArrayBrowse, TDbfBrowse o TDBBrowse).
>
>
>> Si quiero sobreescribir Tedit para que sea mas alto y se ponga amarillo
al
>> tomar el foco ¿seria asi?
>>
>> CLASS TEdit FROM XEdit
>> PROPERTY nHeight INIT 30
>> PROPERTY nClrPaneFocus INIT clYellow
>>
>> ENDCLASS
>
>Sí, excepto que la altura está determinada en el formulario, y no te la
va a
>cambiar.
>
>
>> Y para cambiar el color?
>
> nClrPane
>
>
>--
>Un saludo,
>
>José F. Giménez
>http://www.xailer.com
>
>

Aqui pongo el Log de uno de los que falla.
***************************** Registro de errores *****************************
Fecha: 19-09-06
Hora: 08:21:00
Memoria libre: 594048
Area actual: 1
------------------------- Información del compilador --------------------------
Versión Xailer: Xailer 1.0.2 Version 1.0b
Compilador: xHarbour build 0.99.61 Intl. (SimpLex) PCode Version: 7
Compilador C/C++: Borland C++ 5.5.1
Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
----------------------- Información detallada del error -----------------------
Subsistema: BASE
Código de error: 1004
Estado: .F.
Descripción: Scope Violation <HIDDEN>
Operación: HCLRALTPANE
Argumentos:
Fichero:
Código error SO: 0
Pila de llamadas:
TDBBROWSE:_NCLRALTPANE (2763)
TFORM20:BRWDRAWROW (415)
TDBBROWSE:ONDRAWROW (0)
TDBBROWSE:DRAWLINE (214)
TDBFDATASET:CHANGEPOS (456)
TDBFDATASET:GOTOP (329)
(b)XDBBROWSE:XDBBROWSE (46)
TDBBROWSE:GOTOP (0)
TFORM20:_NTAG (168)
TFORM20:FORMINITIALIZE (118)
TFORM20:ONINITIALIZE (0)
TFORM20:NEW (185)
TFORM00:OBUTTON7CLICK (235)
TBTNBMP:ONCLICK (0)
TBTNBMP:CLICK (102)
(b)XCONTROL:XCONTROL (142)
TBTNBMP:COMMAND (0)
TSCROLLINGWINCONTROL:WMCOMMAND (254)
TFORM00:WMCOMMAND (873)
RUNFORM (0)
TAPPLICATION:RUN (193)
MAIN (24)
------------------ Información detallada de áreas de trabajo ------------------
Area: 1
Alias: PERNOLOC
Registro: 1
Filtro:
Relación:
Orden del índice: 2
Clave activa: 2
"Paco V" <ssi@ono.com> wrote:
>
>Jose:
>He sobreescrito la clase TDbBrowse, y me hace alguna cosa rara.
>Pregunto:
>Si yo tengo ya creado un TDbBrowse y despues sobreescribo la clase, al reconstruir
>el proyecto que prevalece?
>
>Quiero decir, que si yo he cambiado alguna propiedad del TDbBrowse y luego
>al sobreescribir la clase la cambio ¿hay algún problema?
>
>Esto es lo que he hecho y con algunos TDbBrowse me casca.
>
>CLASS TBrowse FROM XBrowse
>
> PROPERTY nClrAltPane INIT cl3DLight
> PROPERTY nRowHeight INIT 21 //Altura Fila
> PROPERTY lAllowRowSizing INIT .f. //No permite cambiar Altura de las
>Filas
> // PROPERTY nColDividerStyle INIT blLIGHTGRAY // Separador de Columnas
> PROPERTY nMarqueeStyle INIT bmHIGHLROW // Marco del Browse
> PROPERTY lAllowColHiding INIT .f. //No permite esconder Columnas
>
>ENDCLASS
>
>
>Gracias.
>
>Paco V
>"Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>>Paco,
>>
>>> Quiero sobreescribir la clase y me casca en nClrAltPane.
>>> Me podeis decir que hago mal.
>>>
>>> CLASS TBrowse FROM XBrowse
>>> PROPERTY nClrAltPane INIT cl3DLight
>>> PROPERTY nRowHeight INIT 21
>>> PROPERTY lAllowRowSizing INIT .f.
>>> PROPERTY nMarqueeStyle INIT bmHIGHLROW
>>> PROPERTY lAllowColHiding INIT .f.
>>> ENDCLASS
>>
>>No debes sobreescribir la clase TBrowse, sino la del browse que estés usando
>
>>(TArrayBrowse, TDbfBrowse o TDBBrowse).
>>
>>
>>> Si quiero sobreescribir Tedit para que sea mas alto y se ponga amarillo
>al
>>> tomar el foco ¿seria asi?
>>>
>>> CLASS TEdit FROM XEdit
>>> PROPERTY nHeight INIT 30
>>> PROPERTY nClrPaneFocus INIT clYellow
>>>
>>> ENDCLASS
>>
>>Sí, excepto que la altura está determinada en el formulario, y no te la
>va a
>>cambiar.
>>
>>
>>> Y para cambiar el color?
>>
>> nClrPane
>>
>>
>>--
>>Un saludo,
>>
>>José F. Giménez
>>http://www.xailer.com
>>
>>
>

Paco,
Mandanos un pequeño ejemplo que muestre el problema.
Gracias
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Paco V" <ssi@ono.com> escribió en el mensaje
news:450f8987$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>
> Jose:
> He sobreescrito la clase TDbBrowse, y me hace alguna cosa rara.
> Pregunto:
> Si yo tengo ya creado un TDbBrowse y despues sobreescribo la clase, al
> reconstruir
> el proyecto que prevalece?
>
> Quiero decir, que si yo he cambiado alguna propiedad del TDbBrowse y luego
> al sobreescribir la clase la cambio ¿hay algún problema?
>
> Esto es lo que he hecho y con algunos TDbBrowse me casca.
>
> CLASS TBrowse FROM XBrowse
>
> PROPERTY nClrAltPane INIT cl3DLight
> PROPERTY nRowHeight INIT 21 //Altura Fila
> PROPERTY lAllowRowSizing INIT .f. //No permite cambiar Altura de las
> Filas
> // PROPERTY nColDividerStyle INIT blLIGHTGRAY // Separador de Columnas
> PROPERTY nMarqueeStyle INIT bmHIGHLROW // Marco del Browse
> PROPERTY lAllowColHiding INIT .f. //No permite esconder Columnas
>
> ENDCLASS
>
>
> Gracias.
>
> Paco V
> "Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>>Paco,
>>
>>> Quiero sobreescribir la clase y me casca en nClrAltPane.
>>> Me podeis decir que hago mal.
>>>
>>> CLASS TBrowse FROM XBrowse
>>> PROPERTY nClrAltPane INIT cl3DLight
>>> PROPERTY nRowHeight INIT 21
>>> PROPERTY lAllowRowSizing INIT .f.
>>> PROPERTY nMarqueeStyle INIT bmHIGHLROW
>>> PROPERTY lAllowColHiding INIT .f.
>>> ENDCLASS
>>
>>No debes sobreescribir la clase TBrowse, sino la del browse que estés
>>usando
>
>>(TArrayBrowse, TDbfBrowse o TDBBrowse).
>>
>>
>>> Si quiero sobreescribir Tedit para que sea mas alto y se ponga amarillo
> al
>>> tomar el foco ¿seria asi?
>>>
>>> CLASS TEdit FROM XEdit
>>> PROPERTY nHeight INIT 30
>>> PROPERTY nClrPaneFocus INIT clYellow
>>>
>>> ENDCLASS
>>
>>Sí, excepto que la altura está determinada en el formulario, y no te la
> va a
>>cambiar.
>>
>>
>>> Y para cambiar el color?
>>
>> nClrPane
>>
>>
>>--
>>Un saludo,
>>
>>José F. Giménez
>>http://www.xailer.com
>>
>>
>

Aqui va un ejemplo.
Con la clase modificada casca. Si la elimino funciona OK.
Paco
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> wrote:
>Paco,
>
>Mandanos un pequeño ejemplo que muestre el problema.
>
>Gracias
>
>--
>Ignacio Ortiz de Zúñiga
>http://www.xailer.com
>"Paco V" <ssi@ono.com> escribió en el mensaje
>news:450f8987$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>
>> Jose:
>> He sobreescrito la clase TDbBrowse, y me hace alguna cosa rara.
>> Pregunto:
>> Si yo tengo ya creado un TDbBrowse y despues sobreescribo la clase, al
>> reconstruir
>> el proyecto que prevalece?
>>
>> Quiero decir, que si yo he cambiado alguna propiedad del TDbBrowse y luego
>> al sobreescribir la clase la cambio ¿hay algún problema?
>>
>> Esto es lo que he hecho y con algunos TDbBrowse me casca.
>>
>> CLASS TBrowse FROM XBrowse
>>
>> PROPERTY nClrAltPane INIT cl3DLight
>> PROPERTY nRowHeight INIT 21 //Altura Fila
>> PROPERTY lAllowRowSizing INIT .f. //No permite cambiar Altura de las
>> Filas
>> // PROPERTY nColDividerStyle INIT blLIGHTGRAY // Separador de Columnas
>> PROPERTY nMarqueeStyle INIT bmHIGHLROW // Marco del Browse
>> PROPERTY lAllowColHiding INIT .f. //No permite esconder Columnas
>>
>> ENDCLASS
>>
>>
>> Gracias.
>>
>> Paco V
>> "Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>>>Paco,
>>>
>>>> Quiero sobreescribir la clase y me casca en nClrAltPane.
>>>> Me podeis decir que hago mal.
>>>>
>>>> CLASS TBrowse FROM XBrowse
>>>> PROPERTY nClrAltPane INIT cl3DLight
>>>> PROPERTY nRowHeight INIT 21
>>>> PROPERTY lAllowRowSizing INIT .f.
>>>> PROPERTY nMarqueeStyle INIT bmHIGHLROW
>>>> PROPERTY lAllowColHiding INIT .f.
>>>> ENDCLASS
>>>
>>>No debes sobreescribir la clase TBrowse, sino la del browse que estés
>>>usando
>>
>>>(TArrayBrowse, TDbfBrowse o TDBBrowse).
>>>
>>>
>>>> Si quiero sobreescribir Tedit para que sea mas alto y se ponga amarillo
>> al
>>>> tomar el foco ¿seria asi?
>>>>
>>>> CLASS TEdit FROM XEdit
>>>> PROPERTY nHeight INIT 30
>>>> PROPERTY nClrPaneFocus INIT clYellow
>>>>
>>>> ENDCLASS
>>>
>>>Sí, excepto que la altura está determinada en el formulario, y no te la
>> va a
>>>cambiar.
>>>
>>>
>>>> Y para cambiar el color?
>>>
>>> nClrPane
>>>
>>>
>>>--
>>>Un saludo,
>>>
>>>José F. Giménez
>>>http://www.xailer.com
>>>
>>>
>>
>
>
--

Attached files proye.zip (15.1 KB)Â

Paco,
Ok. Problema visto y solucionado. Estará disponible en la proxima revisión
de la librería. No te puedo mandar sólo el archivo modificado (Browse.obj)
ya que me temo han cambiado muchas cosas y es casi seguro que no te
funcionaría.
Un saludo,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Paco V" <ssi@ono.com> escribió en el mensaje
news:451010ac$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>
> Aqui va un ejemplo.
>
> Con la clase modificada casca. Si la elimino funciona OK.
>
> Paco
>
> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> wrote:
>>Paco,
>>
>>Mandanos un pequeño ejemplo que muestre el problema.
>>
>>Gracias
>>
>>--
>>Ignacio Ortiz de Zúñiga
>>http://www.xailer.com
>>"Paco V" <ssi@ono.com> escribió en el mensaje
>>news:450f8987$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>>
>>> Jose:
>>> He sobreescrito la clase TDbBrowse, y me hace alguna cosa rara.
>>> Pregunto:
>>> Si yo tengo ya creado un TDbBrowse y despues sobreescribo la clase, al
>
>>> reconstruir
>>> el proyecto que prevalece?
>>>
>>> Quiero decir, que si yo he cambiado alguna propiedad del TDbBrowse y
>>> luego
>>> al sobreescribir la clase la cambio ¿hay algún problema?
>>>
>>> Esto es lo que he hecho y con algunos TDbBrowse me casca.
>>>
>>> CLASS TBrowse FROM XBrowse
>>>
>>> PROPERTY nClrAltPane INIT cl3DLight
>>> PROPERTY nRowHeight INIT 21 //Altura Fila
>>> PROPERTY lAllowRowSizing INIT .f. //No permite cambiar Altura de las
>>> Filas
>>> // PROPERTY nColDividerStyle INIT blLIGHTGRAY // Separador de Columnas
>>> PROPERTY nMarqueeStyle INIT bmHIGHLROW // Marco del Browse
>>> PROPERTY lAllowColHiding INIT .f. //No permite esconder Columnas
>>>
>>> ENDCLASS
>>>
>>>
>>> Gracias.
>>>
>>> Paco V
>>> "Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>>>>Paco,
>>>>
>>>>> Quiero sobreescribir la clase y me casca en nClrAltPane.
>>>>> Me podeis decir que hago mal.
>>>>>
>>>>> CLASS TBrowse FROM XBrowse
>>>>> PROPERTY nClrAltPane INIT cl3DLight
>>>>> PROPERTY nRowHeight INIT 21
>>>>> PROPERTY lAllowRowSizing INIT .f.
>>>>> PROPERTY nMarqueeStyle INIT bmHIGHLROW
>>>>> PROPERTY lAllowColHiding INIT .f.
>>>>> ENDCLASS
>>>>
>>>>No debes sobreescribir la clase TBrowse, sino la del browse que estés
>
>>>>usando
>>>
>>>>(TArrayBrowse, TDbfBrowse o TDBBrowse).
>>>>
>>>>
>>>>> Si quiero sobreescribir Tedit para que sea mas alto y se ponga
>>>>> amarillo
>>> al
>>>>> tomar el foco ¿seria asi?
>>>>>
>>>>> CLASS TEdit FROM XEdit
>>>>> PROPERTY nHeight INIT 30
>>>>> PROPERTY nClrPaneFocus INIT clYellow
>>>>>
>>>>> ENDCLASS
>>>>
>>>>Sí, excepto que la altura está determinada en el formulario, y no te la
>>> va a
>>>>cambiar.
>>>>
>>>>
>>>>> Y para cambiar el color?
>>>>
>>>> nClrPane
>>>>
>>>>
>>>>--
>>>>Un saludo,
>>>>
>>>>José F. Giménez
>>>>http://www.xailer.com
>>>>
>>>>
>>>
>>
>>
>

Gracias Ignacio.
No pasa nada, cuando funcione lo utilizo y listo.
Lo malo era que pense que era culpa mia como casi siempre.
Un slaudo.
Paco V
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> wrote:
>Paco,
>
>Ok. Problema visto y solucionado. Estará disponible en la proxima revisión
>de la librería. No te puedo mandar sólo el archivo modificado (Browse.obj)
>ya que me temo han cambiado muchas cosas y es casi seguro que no te
>funcionaría.
>
>Un saludo,
>
>--
>Ignacio Ortiz de Zúñiga
>http://www.xailer.com
>"Paco V" <ssi@ono.com> escribió en el mensaje
>news:451010ac$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>
>> Aqui va un ejemplo.
>>
>> Con la clase modificada casca. Si la elimino funciona OK.
>>
>> Paco
>>
>> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> wrote:
>>>Paco,
>>>
>>>Mandanos un pequeño ejemplo que muestre el problema.
>>>
>>>Gracias
>>>
>>>--
>>>Ignacio Ortiz de Zúñiga
>>>http://www.xailer.com
>>>"Paco V" <ssi@ono.com> escribió en el mensaje
>>>news:450f8987$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>>>
>>>> Jose:
>>>> He sobreescrito la clase TDbBrowse, y me hace alguna cosa rara.
>>>> Pregunto:
>>>> Si yo tengo ya creado un TDbBrowse y despues sobreescribo la clase,
al
>>
>>>> reconstruir
>>>> el proyecto que prevalece?
>>>>
>>>> Quiero decir, que si yo he cambiado alguna propiedad del TDbBrowse y
>>>> luego
>>>> al sobreescribir la clase la cambio ¿hay algún problema?
>>>>
>>>> Esto es lo que he hecho y con algunos TDbBrowse me casca.
>>>>
>>>> CLASS TBrowse FROM XBrowse
>>>>
>>>> PROPERTY nClrAltPane INIT cl3DLight
>>>> PROPERTY nRowHeight INIT 21 //Altura Fila
>>>> PROPERTY lAllowRowSizing INIT .f. //No permite cambiar Altura de
las
>>>> Filas
>>>> // PROPERTY nColDividerStyle INIT blLIGHTGRAY // Separador de Columnas
>>>> PROPERTY nMarqueeStyle INIT bmHIGHLROW // Marco del Browse
>>>> PROPERTY lAllowColHiding INIT .f. //No permite esconder Columnas
>>>>
>>>> ENDCLASS
>>>>
>>>>
>>>> Gracias.
>>>>
>>>> Paco V
>>>> "Jose F. Gimenez" <jfgimenez@wanadoo.es> wrote:
>>>>>Paco,
>>>>>
>>>>>> Quiero sobreescribir la clase y me casca en nClrAltPane.
>>>>>> Me podeis decir que hago mal.
>>>>>>
>>>>>> CLASS TBrowse FROM XBrowse
>>>>>> PROPERTY nClrAltPane INIT cl3DLight
>>>>>> PROPERTY nRowHeight INIT 21
>>>>>> PROPERTY lAllowRowSizing INIT .f.
>>>>>> PROPERTY nMarqueeStyle INIT bmHIGHLROW
>>>>>> PROPERTY lAllowColHiding INIT .f.
>>>>>> ENDCLASS
>>>>>
>>>>>No debes sobreescribir la clase TBrowse, sino la del browse que estés
>>
>>>>>usando
>>>>
>>>>>(TArrayBrowse, TDbfBrowse o TDBBrowse).
>>>>>
>>>>>
>>>>>> Si quiero sobreescribir Tedit para que sea mas alto y se ponga
>>>>>> amarillo
>>>> al
>>>>>> tomar el foco ¿seria asi?
>>>>>>
>>>>>> CLASS TEdit FROM XEdit
>>>>>> PROPERTY nHeight INIT 30
>>>>>> PROPERTY nClrPaneFocus INIT clYellow
>>>>>>
>>>>>> ENDCLASS
>>>>>
>>>>>Sí, excepto que la altura está determinada en el formulario, y no te
la
>>>> va a
>>>>>cambiar.
>>>>>
>>>>>
>>>>>> Y para cambiar el color?
>>>>>
>>>>> nClrPane
>>>>>
>>>>>
>>>>>--
>>>>>Un saludo,
>>>>>
>>>>>José F. Giménez
>>>>>http://www.xailer.com
>>>>>
>>>>>
>>>>
>>>
>>>
>>
>
>