Unhandled Exception when no ports in system

Brought to you by: dejancrn, dybdahl, wpostma

#16 Unhandled Exception when no ports in system

Status: open

Owner: nobody

Labels: None

Priority: 5

Updated: 2006-02-04

Created: 2006-02-04

Creator: Anonymous

Private: No

Whene there are no ports available to Windows, ComPort
library crashes. Reason:

In CportCtl.pas:

// select port property
procedure TComSelect.SelectPort;
begin
Items.Clear;
EnumComPorts(Items);
end;

Call to EnumComPorts() will throw an exception. This
exception is not caught in SelectPort.

The change below should be sufficient:

// select port property
procedure TComSelect.SelectPort;
begin
Items.Clear;
try
EnumComPorts(Items);
except
end;
end;