穆丹的回答：不能用cls。可以用下面的方法： 方法一： 需要显示小球时，设置好FillColor 用circle画园， 需要擦除时，设置FillColor为背景色，在刚才的位置再画一次园。 方法二：用image控件代替circle功能，需要时显示，不需要时隐藏（图象可能闪烁）。 方法三：用图象代替circle功能，结合api函数（或用paintpicture)需要时Paint，不需要时设置好Paint方式为xor，再次Paint（图象不会闪烁）。 其中，下面的2个方法，可以将小球设计的更漂亮。 忻的回答：不能用cls。可以用下面的方法： 方法一： 需要显示小球时，设置好FillColor 用circle画园， 需要擦除时，设置FillColor为背景色，在刚才的位置再画一次园。 方法二：用image控件代替circle功能，需要时显示，不需要时隐藏（图象可能闪烁）。 方法三：用图象代替circle功能，结合api函数（或用paintpicture)需要时Paint，不需要时设置好Paint方式为xor，再次Paint（图象不会闪烁）。 其中，下面的2个方法，可以将小球设计的更漂亮。 开心过的回答：cls是清除控件上显示的内容（不是控件内包含的控件）。 如：picture1.cls用来清除picture1中绘制的图形，但不能清除picture1做为容器所包含的其它控件。 同理form1.cls也一样。在form1中的控件不能用它清除，但它可以清除在form1中绘制的图形（如用line方法绘的直线、circle方法绘的圆、print写的字等） 是否可以解决您的问题？ |
