Sesion privada de datos en Form, uso de los Set

411 views
Skip to first unread message

pablo b(La Pampa)

unread,
Sep 17, 2012, 10:39:48 AM9/17/12
to publice...@googlegroups.com
Hola amigos, les consulto, cuando en un form le pongo el datasession en 2 (sesion privada de datos) si en el evento load del form no color Set Talk off me muestra por detras del form digamos todo el armado del mismo y un monton de lineas mas que no se que son pero no interesan, a lo que voy es que quiere que me digan a parte del Set Talk Off que otros set deberia agregar en el load del form para que funcione todo correctamente, tendria que agregar a cada form todos los set que tengo en mi PRG de inicio o como es el asunto.
Despues tambien me pasa en el form este que si pongo Set date to DMY el año solo me pone los 2 digitos, cuando en el resto de los form que no estan sesion 2 eso no me pasa, como lo puedo solucionar.

Muchas Gracias

Pablo



José Luis Díaz

unread,
Sep 17, 2012, 10:53:34 AM9/17/12
to publice...@googlegroups.com
Lo que yo hago es tener un Procedure que lo llamo desde el PRG inicial y desde el método LOAD de los Forms que tienen sesión privada de datos, que contiene todos los SETs iniciales que deseo.

Saludos

Saludos


José Luis
Leticia, Amazonas, Colombia

From: "pablo b(La Pampa)" <panch...@gmail.com>
Date: Mon, 17 Sep 2012 07:39:48 -0700 (PDT)
Subject: [vfp] Sesion privada de datos en Form, uso de los Set
--
 
 
 

Mario López

unread,
Sep 17, 2012, 11:25:06 AM9/17/12
to publice...@googlegroups.com
@Pablo:

lo recomendable sería que todos los seteos los hicieras en el Load de tu propia clase Form y después
"subclasearas" todos tus forms desde esa clase. De esta forma si quisieras hacer un cambio global en
todos tus forms (por ejemplo, un cambio de color de fondo) solamente tendrías que modificar TU clase Form
y con sólo eso,el cambio se reflejaría en todos los forms.

Yo uso un método similar que es la de tener todo lo relacionado con el entorno (Environment) en una clase
separada, e instanciar la misma desde el Load de mi clase xForm (la clase base de todos los forms de
mis sistemas). Los SETs que uso habitualmente son:

    SET TALK OFF
    SET ESCAPE OFF
    SET ECHO OFF
    SET DATE FRENCH
    SET MESSAGE TO
    SET SAFETY OFF
    SET DELETED ON
    SET CONFIRM OFF
    SET BELL OFF
    SET CENTURY ON
    SET CENTURY TO 19 ROLLOVER 40
    SET HOURS TO 24       
    SET STATUS BAR OFF
    SET EXCLUSIVE OFF
    SET REPROCESS TO 5
    SET MULTILOCKS ON
    SET NOTIFY OFF
    SET STRICTDATE TO 0
    SET NULLDISPLAY TO ""
    SET MEMOWIDTH TO 1024
    SET POINT TO ","
    SET SEPARATOR TO "."
    SET CPDIALOG OFF
    SET ENGINEBEHAVIOR 70    && VFP8
    SET TEXTMERGE DELIMITERS TO <<,>>

    IF This.DebugMode
        ON KEY LABEL ALT+Q DO QuitProgram IN FoxLib.prg
        ON KEY LABEL CTRL+Q DO CloseActiveForm IN FoxLib.prg
        ON KEY LABEL CTRL+S SUSPEND
    ENDIF   
    ...

aunque lo recomendable sería que chequearas en el help si sirven para tus sistemas
en particular.

HTH
Mario
---

leonardo trujillo

unread,
Sep 17, 2012, 12:38:01 PM9/17/12
to publice...@googlegroups.com
en el siguiente link encontrarás los comandos SET que se afectan en una sesión privada de datos
http://msdn.microsoft.com/es-es/library/cc467283%28v=vs.71%29.aspx

o sea que esos los tienes que setear en cada form con sesión privada de datos

Está muy buena la idea del Procedure o la de la clase Enviroment.
Mario ¿puedes compartir la clase Enviroment?
muchas gracias

--
 
 
 

Mario López

unread,
Sep 17, 2012, 1:28:35 PM9/17/12
to publice...@googlegroups.com
@caterva:

mejor que mi clase, hay un capítulo completo sobre sesiones de datos y el uso de un objeto Environment
en el libro de Ken Chazotte (RIP), "Build your Own Framework with Visual FoxPro": http://goo.gl/BIRuq

Vale la pena leer el libro completo, realmente tiene poco desperdicio (al menos para mí).

HTH
Mario

---

leonardo trujillo

unread,
Sep 17, 2012, 2:09:55 PM9/17/12
to publice...@googlegroups.com
lástima que está en inglés
gracias igual


--
 
 
 

Reply all
Reply to author
Forward
0 new messages