Canvas does not allow drawing
30/08/2004
0
Ae galera, seguinte.
Tenho uma aplicação que usa o componente Bars da DevExpress sendo herdade de um formulário Base e muitos componentes TTimer que necessitam aplicar configurações na tela repetidamente.
Acontece que com Win98 ele me apresenta esse erro:Canvas does not allow drawing. Já procurei em alguns lugares e as respostas não me ajudaram muito, pois disseram q isso ocorre por falta de recurso do Win98.
Gostaria de saber se alguém passou por esse problema e se alguém poderia me dar uma luz de como resolver essa parada.
Obrigado a todos,
Evandro
Tenho uma aplicação que usa o componente Bars da DevExpress sendo herdade de um formulário Base e muitos componentes TTimer que necessitam aplicar configurações na tela repetidamente.
Acontece que com Win98 ele me apresenta esse erro:Canvas does not allow drawing. Já procurei em alguns lugares e as respostas não me ajudaram muito, pois disseram q isso ocorre por falta de recurso do Win98.
Gostaria de saber se alguém passou por esse problema e se alguém poderia me dar uma luz de como resolver essa parada.
Obrigado a todos,
Evandro
Evandro_covre
Curtir tópico
+ 0
Responder
Posts
30/08/2004
Jax
Tente manter todas as chamadas para desenhar em uma única procedure.
Declare uma variável global do tipo Boolean.
Use a variável para que apenas uma chamada seja executada por vez.
Declaração:
Implementação:
Agora é so fazer a chamada somente para a procedure.
Declare uma variável global do tipo Boolean.
Use a variável para que apenas uma chamada seja executada por vez.
Declaração:
var IsDrawing : Boolean;
Implementação:
procedure Form1.DoDraw; begin if IsDrawing then Exit; IsDrawing := True; try { Seu código vai aqui } finally IsDrawing := False; end; end;
Agora é so fazer a chamada somente para a procedure.
Responder
Clique aqui para fazer login e interagir na Comunidade :)