|
Efectivamente Roman,
lo que he hecho es poner esto
Begin
@onpaint := nil;
// Y ademas con una variable de la ficha private ventana_activada
if not ventana_activada then
begin
ventana_activada := true;
ejecuta_el_procedimiento;
end;
end;
Gracias roman.
__________________
Juan Díaz
Domain, S.A.
|