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.

Ayuda sobre TStatusBar

Foro público de Xailer en español
Responder
Guillermo Guevara Car
Mensajes: 176
Registrado: Sab Ene 19, 2008 5:52 pm

Ayuda sobre TStatusBar

Mensaje por Guillermo Guevara Car »

Gracias por el apoyo.
Con el siguiente método despliego en un oStatusBar los siguientes datos
METHOD FormInitialize( oSender ) CLASS Menu
::oStatusBar1:aItems[1]:cText := cNombreEmpresa
::oStatusBar1:aItems[2]:cText := cNombreUsuario
RETURN Nil
En el transcurso del programa pueden cambiar las variables de:
cNombreEmpresa
cNombreUsuario.
Como hago para refrescar el oStatusBar, para que se desplieguen los nuevos
valores de las variables en la pantalla.
Saludos
Guillermo Guevara Carrillo
Arriba
jrcpoli
Mensajes: 240
Registrado: Mié Oct 25, 2006 8:55 pm

Ayuda sobre TStatusBar

Mensaje por jrcpoli »

Saludos:
Has probado lo que ocurre cuando usas el metodo Update de la clase
TStatusPanel
La ayuda dice:
TStatusPanel:Update
Informa a la clase padre del panel, la TStatusBar, que se han hecho cambios
en el panel.
Tipo
Estándar
Parámetros
Ninguno
Valor Retorno
NIL
Mira también la propiedad lOwnerDraw del TStatusPanel.
José Ramón Castro.
"Guillermo Guevara C." <soporte@PvWin.com> escribió en el mensaje de
noticias news:4830481b$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Gracias por el apoyo.
>
> Con el siguiente método despliego en un oStatusBar los siguientes datos
>
> METHOD FormInitialize( oSender ) CLASS Menu
> ::oStatusBar1:aItems[1]:cText := cNombreEmpresa
> ::oStatusBar1:aItems[2]:cText := cNombreUsuario
> RETURN Nil
>
> En el transcurso del programa pueden cambiar las variables de:
>
> cNombreEmpresa
> cNombreUsuario.
>
> Como hago para refrescar el oStatusBar, para que se desplieguen los nuevos
> valores de las variables en la pantalla.
>
> Saludos
>
> Guillermo Guevara Carrillo
>
José Ramón Castro.
Arriba
jrcpoli
Mensajes: 240
Registrado: Mié Oct 25, 2006 8:55 pm

Ayuda sobre TStatusBar

Mensaje por jrcpoli »

Saludos:
Por ponertelo mas facil si tu haces donde se produce el cambio de
nombres,basandome en tu ejemplo:
::oStatusBar1:aItems[1]:cText := cNombreEmpresa
::oStatusBar1:aItems[1]:Update()
::oStatusBar1:aItems[2]:cText := cNombreUsuario
::oStatusBar1:aItems[2]:Update()
Pues solucionas el problema.
José Ramón Castro.
"José Ramón Castro" <jrcpoli@terra.es> escribió en el mensaje de noticias
news:[email=48305bb5@ozsrv2.ozlan.local...]48305bb5@ozsrv2.ozlan.local...[/email]
> Saludos:
>
> Has probado lo que ocurre cuando usas el metodo Update de la clase
> TStatusPanel
>
> La ayuda dice:
>
> TStatusPanel:Update
> Informa a la clase padre del panel, la TStatusBar, que se han hecho
> cambios en el panel.
>
> Tipo
> Estándar
>
> Parámetros
> Ninguno
>
> Valor Retorno
> NIL
>
> Mira también la propiedad lOwnerDraw del TStatusPanel.
>
> José Ramón Castro.
>
> "Guillermo Guevara C." <soporte@PvWin.com> escribió en el mensaje de
> noticias news:4830481b$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>> Gracias por el apoyo.
>>
>> Con el siguiente método despliego en un oStatusBar los siguientes datos
>>
>> METHOD FormInitialize( oSender ) CLASS Menu
>> ::oStatusBar1:aItems[1]:cText := cNombreEmpresa
>> ::oStatusBar1:aItems[2]:cText := cNombreUsuario
>> RETURN Nil
>>
>> En el transcurso del programa pueden cambiar las variables de:
>>
>> cNombreEmpresa
>> cNombreUsuario.
>>
>> Como hago para refrescar el oStatusBar, para que se desplieguen los
>> nuevos valores de las variables en la pantalla.
>>
>> Saludos
>>
>> Guillermo Guevara Carrillo
>>
>
José Ramón Castro.
Arriba
Rene Flores
Mensajes: 620
Registrado: Jue Mar 23, 2006 2:39 am

Ayuda sobre TStatusBar

Mensaje por Rene Flores »

Guillermo:
::oStatusBar1:aItems[1]:SetText("Nuevo Texto")
Saludos
Rene Flores
http://www.ciber-tec.com
Arriba
jrcpoli
Mensajes: 240
Registrado: Mié Oct 25, 2006 8:55 pm

Ayuda sobre TStatusBar

Mensaje por jrcpoli »

Saludos:
Entonces el metodo Update de la clase no vale, o es mejor SetText,
porque yo he utilizado el metodo Update de la clase y si es mejor el otro
empiezo a sustituir todo, o es lo mismo uno que otro.
José Ramón Castro.
"Rene Flores" <"rflores[nospam]"@ciber-tec.com> escribió en el mensaje de
noticias news:4831ca62$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Guillermo:
>
> ::oStatusBar1:aItems[1]:SetText("Nuevo Texto")
>
> Saludos
>
> Rene Flores
> http://www.ciber-tec.com
José Ramón Castro.
Arriba
Guillermo Guevara Car
Mensajes: 176
Registrado: Sab Ene 19, 2008 5:52 pm

Ayuda sobre TStatusBar

Mensaje por Guillermo Guevara Car »

Estimado Jose Ramón Castro
Agradezco tu grán ayuda y la de Rene Flores, al darme la idea para
solucionar este problema, quiero mencionarles que gracias a sus aportaciones
me vino la idea de integrar las intrucciones dentro del TMenu en un evento
OnMouseMove quedando integrado de la siguiente forma y 100% funcional, ya
que las variables se actualizan de inmediato al usar los menús.
METHOD FormMouseMove( oSender, nKeyFlags, nPosX, nPosY ) CLASS _Menu
::oStatusBar1:aItems[1]:cText := g_cEmpNom
::oStatusBar1:aItems[2]:cText := g_cUserId
RETURN Nil
Saludos
Guillermo Guevara C.
"José Ramón Castro" <jrcpoli@terra.es> escribió en el mensaje
news:[email=48305fe8@ozsrv2.ozlan.local...]48305fe8@ozsrv2.ozlan.local...[/email]
> Saludos:
>
> Por ponertelo mas facil si tu haces donde se produce el cambio de
> nombres,basandome en tu ejemplo:
>
> ::oStatusBar1:aItems[1]:cText := cNombreEmpresa
> ::oStatusBar1:aItems[1]:Update()
> ::oStatusBar1:aItems[2]:cText := cNombreUsuario
> ::oStatusBar1:aItems[2]:Update()
>
> Pues solucionas el problema.
>
> José Ramón Castro.
>
> "José Ramón Castro" <jrcpoli@terra.es> escribió en el mensaje de noticias
> news:[email=48305bb5@ozsrv2.ozlan.local...]48305bb5@ozsrv2.ozlan.local...[/email]
>> Saludos:
>>
>> Has probado lo que ocurre cuando usas el metodo Update de la clase
>> TStatusPanel
>>
>> La ayuda dice:
>>
>> TStatusPanel:Update
>> Informa a la clase padre del panel, la TStatusBar, que se han hecho
>> cambios en el panel.
>>
>> Tipo
>> Estándar
>>
>> Parámetros
>> Ninguno
>>
>> Valor Retorno
>> NIL
>>
>> Mira también la propiedad lOwnerDraw del TStatusPanel.
>>
>> José Ramón Castro.
>>
>> "Guillermo Guevara C." <soporte@PvWin.com> escribió en el mensaje de
>> noticias news:4830481b$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>> Gracias por el apoyo.
>>>
>>> Con el siguiente método despliego en un oStatusBar los siguientes datos
>>>
>>> METHOD FormInitialize( oSender ) CLASS Menu
>>> ::oStatusBar1:aItems[1]:cText := cNombreEmpresa
>>> ::oStatusBar1:aItems[2]:cText := cNombreUsuario
>>> RETURN Nil
>>>
>>> En el transcurso del programa pueden cambiar las variables de:
>>>
>>> cNombreEmpresa
>>> cNombreUsuario.
>>>
>>> Como hago para refrescar el oStatusBar, para que se desplieguen los
>>> nuevos valores de las variables en la pantalla.
>>>
>>> Saludos
>>>
>>> Guillermo Guevara Carrillo
>>>
>>
>
Arriba
Guillermo Guevara Car
Mensajes: 176
Registrado: Sab Ene 19, 2008 5:52 pm

Ayuda sobre TStatusBar

Mensaje por Guillermo Guevara Car »

Estimado Rene Flores
Agradezco tu grán ayuda y la de José Ramón Castro, al darme la idea para
solucionar este problema, quiero mencionarles que gracias a sus aportaciones
me vino la idea de integrar las intrucciones dentro del TMenu en un evento
OnMouseMove quedando integrado de la siguiente forma y 100% funcional, ya
que las variables se actualizan de inmediato al usar los menús.
METHOD FormMouseMove( oSender, nKeyFlags, nPosX, nPosY ) CLASS _Menu
::oStatusBar1:aItems[1]:cText := g_cEmpNom
::oStatusBar1:aItems[2]:cText := g_cUserId
RETURN Nil
Saludos
Guillermo Guevara C.
> Guillermo:
>
> ::oStatusBar1:aItems[1]:SetText("Nuevo Texto")
>
> Saludos
>
> Rene Flores
> http://www.ciber-tec.com
Arriba
Responder

Volver a “Xailer Spanish”