delphi中DrawLeftimageText画字Tlmage切换的时候会有残影
procedure TFrmMain.DrawLeftimageText;
var
i:Integer;
begin
for i:= 0 to panel3.ControlCount-1 do
begin
if panel3.Controls[i] is TImage then
begin
if panel3.Controls[i].Name='liji_meeting' then
TImage(panel3.Controls[i]).Canvas.TextOut(55,15, pchar('立即召开'));
if panel3.Controls[i].Name='yuyue_meeting' then
TImage(panel3.Controls[i]).Canvas.TextOut(55,15,'预约会议');
if panel3.Controls[i].Name='btn_GroupConference' then
TImage(panel3.Controls[i]).Canvas.TextOut(55,15,'群组会议');
if panel3.Controls[i].Name='tongxunlu' then
TImage(panel3.Controls[i]).Canvas.TextOut(55,15,'通讯录');
if panel3.Controls[i].Name='btn_Recording' then
TImage(panel3.Controls[i]).Canvas.TextOut(55,15,'录音管理');





我用这个画字到image上，每个image有个点击事件，手标点击是是一张图片，移上去是一张图片，移开又一张图片显示。
但是现在出现一种情况当手标点击某个image时移到另一个image的时候，这些画上去的字：'立即召开''预约会议''群组会议'
出现了残影，字显示的那小块是白色。我自己的想法应该是刷新问题，在切换的时候才会，不知道是什么问题，向大家讨教。





[解决办法]
试下在画前使用Canvas.Brush.Style:=bsClear;