Possible bug? Endless loop if bteAllRadios is not in the DeviceEnum List

[mikerabat]

Hi!

I was playing around witht different Enum properties of the TnrBT component and actually got stuck in an
endless loop if the bteAllRadios was not checked and the Update method was called.

I guess the repeat until loops exit procedure is not correct:

Here is what's in my src:

Code Select Expand

if bteAllRadios in fDeviceEnum then Inc(idxRadio);

  until idxRadio >= RadioCount;

and I guess it should be:

Code Select Expand

if bteAllRadios in fDeviceEnum then Inc(idxRadio);
else break;

  until idxRadio >= RadioCount;

Any thoughts?

kind regards
   Mike