Определить пустой ли элемент в массиве

[NeVerSS]

Всем здрасть...
Проблема следующего рода:
Есть массив компонентов.Перебираю все его элементы и для каждого проверяю, если он не пуст то обращаюсь к его свойствам, иначе смотрую
следующий.Не понимаю с чем нужно сравнивать элемент массива такого типа, чтоб определить пуст ли он.
Пробывал так mas[i]<>nil но это не дало результата(((

[Stilet]

В каком смысле не дало результата?

[NeVerSS]

ему поравну =nil или <>nil.

В общем пишет inaccesseble value при обращении к свойству или вызову метода этого "существующего" элемента массива

Сообщение от NeVerSS

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
Panel1: TPanel;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
mas:array [0..5] of TPanel;
mas_que:array [0..5] of boolean;
i:integer;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var TempPanel:TPanel;

begin
TempPanel:=TPanel.Create(Form1);
TempPanel.Top:=30;
TempPanel.Width:=20;
TempPanel.Left:=30;
Form1.InsertControl(TempPanel);
TempPanel:=TPanel.Create(Form1);
TempPanel.Top:=60;
TempPanel.Width:=20;
TempPanel.Left:=30;
Form1.InsertControl(TempPanel);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
i:=0;
repeat
If mas[i]=nil
then
begin
mas[i].Destroy;
end;
inc(i);
until i=5;
end;

end.

Вот примерно так.Может я где накосячил...

если написать mas[i]<>nil то он никогда это условие не выполняет...

[evg_m]

If mas[i]=nil
then
begin
mas[i].Destroy;//мы уничтожили объект но не ссылку на него
mas[i]:=nil;// а теперь убрали и ссылку
end;

[NeVerSS]

понял, спасибо. Я уже решил по другому