diff options
| -rw-r--r-- | src/base/URecord.pas | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/src/base/URecord.pas b/src/base/URecord.pas index 2c2093a0..a3f665e5 100644 --- a/src/base/URecord.pas +++ b/src/base/URecord.pas @@ -753,11 +753,12 @@ var // search devices with same description for i := 0 to deviceIndex-1 do begin - if (AudioInputProcessor.DeviceList[i].Name = name) then - begin - Result := true; - Break; - end; + if (AudioInputProcessor.DeviceList[i] <> nil) then + if (AudioInputProcessor.DeviceList[i].Name = name) then + begin + Result := true; + Break; + end; end; end; |