Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Gráficos (https://www.clubdelphi.com/foros/forumdisplay.php?f=8)
-   -   borrar un poligono (https://www.clubdelphi.com/foros/showthread.php?t=16688)

frf_84 07-12-2004 18:06:41

borrar un poligono
 
mirad tengo un dbgrig y cuando voy a selecinar un registro lo que hago es simplemente debujar con un componente de canvas llamado polyline cuando hago click me muestra el poligono con una forma similar a la de un rectangulo alrededor del registro (como yo queria), el problema que se me presenta (aunque parezca comico), es que cuando seleciono otro registro sobre el gird el poligono anterior me lo mantiene y medibuja otro nuevo, mi pregunta es ¿como puedo limpiar todos los poligonos?

defcon1_es 10-12-2004 10:03:19

Hola,
puedes usar el método FloodFill del Canvas para "limpiarlo" antes de dibujar el polígono:
Código Delphi [-]
  Canvas.FloodFill(ClientWidth div 2, ClientHeight div 2, clWhite, fsBorder);

o también el método FillRect:
Código Delphi [-]
  Canvas.Brush.Color := clWhite; //No se si es necesaria esta línea...
  Canvas.Brush.Style := bsClear;
  Canvas.FillRect(Rect(0,0,ClientWidth, ClientHeight));

Salu2.


La franja horaria es GMT +2. Ahora son las 04:42:51.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi