Вот кусок кода
Код:
Perform(WM_SETREDRAW,0,0);
for i:=0 to High(ga) do
begin
if ga[i].value<>'0' then AddEl(ga[i].value);
end;
Perform(WM_SETREDRAW,1,0);
Form1.Refresh;
Вначале отключается перерисовка формы.
В цикле создается некоторое количество компонентов TPanel (порой большое количество). Для более быстрой работы и решил отключать перерисовку.
Но в конце форма не перерисовывается (созданные компоненты не отображаются, ХОТЯ СОЗДАЮТСЯ). При клике по ним мышью, меняется их стиль, и они появляются.
Подскажите из-за чего может быть проблема?