Cita:
Empezado por gluglu
Código Delphi [-]
unit ListGeneral;
...
type
TList_General = class(TForm)
....
TCalculate_Total = class(TThread)
procedure UpdateMainForm;
private
....
public
....
protected
procedure Execute; override;
end;
var
List_General: TList_General;
Calculate_Total: TCalculate_Total;
....
implementation
....
|
Hola, no quisiera estorbar. Y seguro que no es de mucha ayuda, pero precisamente esto que dice Neftalí:
Cita:
|
En el código que has puesto, cada form (TList_General) tiene su variable del tipoTCalculate_Total; Si los lanzas adecuadamente no tiene porqué haber problemas con eso.
|
Es precisamente lo que yo no veo.
Código Delphi
[-]
Calculate_Total: TCalculate_Total;
No tendría que estar definido como variable privada para cada instancia del formulario ?
Bueno, espero no añadir ruido en la conversación. Si es así, lo siento.
Saludos.