"System Error. Code: 5. Отказано в доступе." при присвоениии парента

[garuna]

в коде есть такой момент:

...
if Panel1.Parent <> ListView1
then Panel1.Parent:= ListView1;
...

так вот, на строке Panel1.Parent:= ListView1 иногда вываливается ошибка "System Error. Code: 5. Отказано в доступе.". Кто-нибудь сталкивался с подобным? В чем проблема и как решить?

[Sibedir]

Windows XP SP3, Delphi XE3
Кинул на форму

    Panel1: TPanel;
    ListView1: TListView;
    Timer1: TTimer;

Timer1.Interval = 1
Timer1.Enabled = True

procedure TfrmMain.Timer1Timer(Sender: TObject);
begin
  if Panel1.Parent = frmMain then
    Panel1.Parent := ListView1
  else
    Panel1.Parent := frmMain;
end;

20 секунд - полёт нормальный.

[Аватар]

А какой тайный смысл использования листвью в качестве контейнера для панели?

[Stilet]

А ты уверен что именно на этой строке ошибка?
Как выглядит код около этих строк?

А какой тайный смысл использования листвью в качестве контейнера для панели?

Я так делал, когда сплешскрины показывать хотел при наполнении ЛистВью. Ну чтоб не рисовать на нем - кинул панельку и порядок.

[garuna]

Sibedir, так я и говорю, что ИНОГДА такая ошибка появляется. Ее трудно искусственно воспроизвести. Не понятно почему она возникает...

Аватар, нужно) На панельке анимация типа "please, wait...", списков ListView несколько. Во все ListView по очереди загружается большой список строк и когда это происходит, панель ставлю на нужный ListView.

Stilet, уверен. У меня MadExcept, указывает именно на это место.

exception class    : EOSError
exception message  : System Error. Code: 5. Отказано в доступе.

thread $a9c:
0046bde9 +075 Project1.exe SysUtils                 RaiseLastOSError
0075a805 +41d Project1.exe Main            3824 +69 TForm1.LogLoad //в этой строке находится Panel1.Parent:= ListView1;

[Stilet]

На панельке анимация типа "please, wait..."

Вот вот. И я так делал...
Удобно.

У меня MadExcept, указывает именно на это место.

Ну это может означать только одно: Панель каким-то образом разрушена или еще не создана... Других гипотез выдвигать не рискну.