v1.0.8

Author: RaspberryFpc

bin/udp_player

@@ -22,10 +22,11 @@
         <ComponentName Value="Form1"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
+        <IsVisibleTab Value="True"/>
         <EditorIndex Value="0"/>
         <WindowIndex Value="0"/>
-        <TopLine Value="343"/>
-        <CursorPos Y="348"/>
+        <TopLine Value="2"/>
+        <CursorPos X="67" Y="9"/>
         <UsageCount Value="200"/>
         <Loaded Value="True"/>
         <LoadedDesigner Value="True"/>
@@ -38,11 +39,10 @@
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
         <UnitName Value="Unit2"/>
-        <IsVisibleTab Value="True"/>
         <EditorIndex Value="1"/>
         <WindowIndex Value="0"/>
         <CursorPos Y="101"/>
-        <UsageCount Value="133"/>
+        <UsageCount Value="134"/>
         <Loaded Value="True"/>
         <LoadedDesigner Value="True"/>
       </Unit>
@@ -219,10 +219,6 @@
         <Filename Value="unit2.pas"/>
         <Caret Line="335" Column="44" TopLine="323"/>
       </Position>
-      <Position>
-        <Filename Value="unit2.pas"/>
-        <Caret Line="337" Column="23" TopLine="345"/>
-      </Position>
       <Position>
         <Filename Value="unit2.pas"/>
         <Caret Line="206" Column="11" TopLine="198"/>
@@ -235,6 +231,10 @@
         <Filename Value="unit2.pas"/>
         <Caret Line="123" Column="30" TopLine="114"/>
       </Position>
+      <Position>
+        <Filename Value="unit1.pas"/>
+        <Caret Line="322" Column="6" TopLine="305"/>
+      </Position>
     </JumpHistory>
     <RunParams>
       <FormatVersion Value="2"/>

source/udp_player

@@ -319,10 +319,17 @@ procedure TReceiverThread.Execute;
        snd_pcm_delay(pcm, @delay);
 
       frames := snd_pcm_writei(pcm, @audiobuffer[12], (received - 12) div 4);
-      if frames < 0 then
-        begin
-        frames := snd_pcm_recover(pcm, frames, 0); // try to recover from any error
-        end;
+       if frames < 0 then
+begin
+  frames := snd_pcm_recover(pcm, frames, 0);
+  if frames >= 0 then
+    frames := snd_pcm_writei(pcm, @audiobuffer[12], (received - 12) div 4);
+end;
+
+
+
+
+
     end;