Не удаляются объекты (ошибка AccessVolation)

[Darlee]

Здравствуйте. Помогите, пожалуйста!

Вот код:

procedure TForm4.sortClick(Sender: TObject);
var SortBy:TDBComboBox;  asc,desc:TRadioButton;
begin

case Sort.State of
cbChecked:
begin
//------------Создание объектов
SortBy:=TDBComboBox.Create(self);
asc:=TRadioButton.Create(self);
desc:=TRadioButton.Create(self);
//-----------Настройка
SortBy.Left:=35; SortBy.top:=135; SortBy.style:=csOwnerDrawFixed; SortBy.Parent:=TabSheet1; SortBy.DataSource:=DataSource1;
ComboBox(SortBy);
asc.Left:=216; asc.top:=120; asc.width:=102; asc.Height:=25; asc.Caption:='по возрастанию'; asc.parent:=TabSheet1;
desc.Left:=216; desc.top:=148; desc.width:=102; desc.Height:=25; desc.Caption:='по убыванию'; desc.parent:=TabSheet1;
end;

cbUnChecked:
begin
//----Удаление
  SortBy.Free;
  asc.Free;
  desc.Free;
end;
end;

Это событие ЧекБокса. При установлении флажка создаются три объекта. При снятии флажка они, по идее, должны удаляться. Но возникает ошибка Access Volation...

Может быть нельзя так делать: создавать/удалять объекты, переключая флажок? Может, правильней делать их видимыми/невидимыми?

[veniside]

подумайте, куда у вас указывают локальные переменные SortBy, asc и desc при заходе в кейс cbUnChecked. Правильно, вникуда. И вызывать у них .Free бессмысленно.

> Может, правильней делать их видимыми/невидимыми?

скорей всего так будет действительно лучше.

[Darlee]

Ой, и правда)) Что-то я ступила...
Спасибо!