[poli-smen]

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

Помогите пожалуйста. Если

Код:

FileListBox1.Directory

присвоить значение дискеты или не подключенного виртуального диска то вылетает ошибка. Как мне сделать чтобы вместо ошибки показывалась к примеру Form2?

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
  try
    FileListBox1.Directory := 'a:\';
  except
    Form2.Show;
  end;
end;