Hi Vitality,

Unfortunately I have no Delhpi on my computer, just downloaded the source
code for TurboPower Async Pro library and had a quick glance on
IsPortAvailable function. Do you know exactly which line causes the error?
Is that possible that TApdWin32Dispatcher.Create fails so that DeviceLayer
remains nil therefore when it it throws an exception DeviceLayer.Free will
hangs your app? If yes the obvious solution is to check if that DeviceLayer
is nil or not before referencing to it. If that Create function does not
throws an exception but leaves DeviceLayer nil when fails then it is another
issue so check that value before using it.

If the error is somewhere else just delete my mail :-)

Regards,
Tamas


On 5/15/07, Vitaliy <spam@maksimov.org> wrote:
>
> I' wrote a little device configuration utility in Delphi, using the Async
> Pro library. When I sent it to a customer, he reported that the "COM port
> options" menu hangs the program.
>
> I tried the program on five different computers, and found that the only
> computers that had this problem were the ones with Bluetooth COM ports. I
> verified that these ports are causing the problem, by disabling them --
> the
> program works correctly then.
>
> The code for enumerating the ports is very simple, straight out of the
> Async
> Pro examples:
>
>   for i := 1 to 64 do
>     if IsPortAvailable(i) then
>       cmbComPortNumber.Items.Add (IntToStr (i));
>
> Any ideas?
>
> Best regards,
>
> Vitaliy
>
> --
> http://www.piclist.com PIC/SX FAQ & list archive
> View/change your membership options at
> http://mailman.mit.edu/mailman/listinfo/piclist
>
-- 
http://www.piclist.com PIC/SX FAQ & list archive
View/change your membership options at
http://mailman.mit.edu/mailman/listinfo/piclist