为何label时有闪动
为什么label时有闪动
用label滚动显示数字，为什么会有白条闪动（窗体背景红色，label6.transparent:=true;timer的1interval设为10）
listbox1.Selected[random(listbox1.Items.count)]:=true;
label6.Caption:= listbox1.items[listbox1.itemindex];
------解决方案--------------------
用label滚动显示数字，为什么会有白条闪动（窗体背景红色，label6.transparent:=true;timer的1interval设为10）
listbox1.Selected[random(listbox1.Items.count)]:=true;
label6.Caption:= listbox1.items[listbox1.itemindex];
------解决方案--------------------
procedure TForm1.FormCreate(Sender: TObject);
begin
DoubleBuffered := True;
//或者
//Label1.Parent.DoubleBuffered := True;
end;