[델파이] 화면이 깜빡 거리는것이 눈에 거슬린다면

출처 : 델마당 째즈토끼(jazz16) 님 답변에 있는 소스입니다.

procedure SetDoubleBuffered(Control: TWinControl; DoubleBuffered: Boolean);
var
    I : Integer;
begin
    Control.DoubleBuffered := DoubleBuffered;

for I:=0 to Control.ControlCount-1 do begin

    if Control.Controls[I] is TWinControl then begin

    SetDoubleBuffered(TWinControl(Control.Controls[I]), DoubleBuffered);
end ;

end;

end;