FTP | CCD | Buscar | Trucos | Trabajo | Foros |
#1
|
|||
|
|||
Valor de Clase
Amigos de Club Delphi, estoy usando delphi rad studio xe4, y me enfrento con el siguiente problema.
tengo dos units, unit1 y unit2, tengo definido unit2 de la sgte manera :
lo que necesito es definir una variable, o una propiedad de la clase Unit2 que capture y mantenga el valor que me arroja indice del metodo PosicionListBox y pueda acceder a este desde el Unit1. en Unit1 en el metodo click de un listbox, tengo creado mi objeto HiloTrabajoBack
entonces desde el objeto TrabajoUno necesito traer el valor de indice desde mi objeto en Unit1........quizas es complicado de entender lo que trato de explicar pero no se como explicarlo mejor. Yo he programado en java, y desde java a las clases se les dota de los metodos getter y setter y listo, pero aca en delphi el valor no se mantiene, he intentado con property y tratando de utilizar class var para crear variables estaticas en la clase del thread y que esta mantenga el valor pero no he obtenido ningun resultado. se que puedo definir una variable privada en la clase HiloTrabajoBack y acceder a esta con unos getter y setter en public, pero al hacerlo (por que pense que ocurria lo mismo), cuando accedo desde mi objeto TrabajoUno.NombreVariable y accedo a su valor me arroja 0, estuve haciendo un debug con delphi cuando probe creando una variable y ha esta se le asigna, pero al momento de ir a buscar el valor desde mi objeto, no obtengo nada. en definitiva. Como mantengo un valor desde una Unidad a Otra, o sea Obtener un valor de Unit2 en Unit1, y accederla desde mi objeto? Última edición por nlsgarcia fecha: 22-04-2015 a las 00:17:32. Razón: Sintaxis Delphi |
#2
|
||||
|
||||
En general te comentaría que antes de lanzarte a la piscina con los threads reviras alguna documentacíon e intentaras entender bien cómo funcionan, qué limitaciones tienen y los métodos/propiedades que tienen disponibles para que puedas usarlos correctamente, porque si no puede ser un infierno...
Te comento esto, porque viendo el código hay cosas que no acaban de tener sentido. Por un lado, tal y como está diseñado (no se si se trata de un ejemplo) todo el trabajo del hilo se realiza en un Synchronize, por lo tanto es inútil, pues lo que hay en un Synchronize se ejecuta desde el hilo principal. En este caso no ganas nada al hacerlo así. Por otro lado, la VCL no es thread-safe, por lo tanto no deberías utilizar componentes visuales dentro del Thread. Como son las listas que estás pasando como parámetros. En este caso, deberías utilizar objetos independientes dentro de los threads (Items = TStrings). Sería algo así: (1) Crear el Thread (y dentro crear TStrings) (2) Asignar los items de las listas (LB_CuentaCliente.Items) a los elementos que has creado en los threads (assign). (3) Lanzar los threads. Ahora ya puedes trabajar sin syncronize, pues no estás utilizando los objetos originales, sino los propios del Thread. (4) Utilizar el método OnTerminate (y esto contesta a tus ppreguntas posteriores) para saber cuando acaba el hilo y poder recoger los resultados. NOTAS: * FreeOnTerminate a False, para poder recoger los resultados. * OnTerminate para conocer cuando acaba el Thread y consultar lo que necesitas. * El resuiltado lo puedes almacenar en una propiedad del Thread y definir Get y Set para consultarla. Sin problemas con eso. También en Delphi se utilizan los Getters y Settters.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#3
|
|||
|
|||
Neftali
Muchisimas gracias por la Respuesta y la aclaracion, quizas Me este ahogando en un vaso de agua con el tema y pueda Hacer mas simple las cosas, agradezco la informacion que me has dado La investigare y tratare de buscar una solucion optima. Cita:
Gracias nuevamente por la ayuda, ahora me queda mas claro Última edición por Memo6015 fecha: 22-04-2015 a las 17:29:08. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Tipo de Propiedades y valor de una clase u objeto TypInfo | elarys | OOP | 5 | 31-07-2012 10:22:49 |
Pasar mi clase a una clase de 3 capas o lo mas parecido | elarys | OOP | 2 | 07-04-2011 23:02:54 |
clase que contiene otra clase definida de forma posterior | astwin | OOP | 5 | 20-02-2009 11:26:55 |
Clase | jakuna | OOP | 2 | 30-08-2007 21:50:35 |
...la clase... | Jure | Humor | 0 | 27-07-2004 20:00:47 |
|