[Gambas-user] Errotr message " Illegal seek"

[frenchpark43]

When I execute the code below , it works fine for the first "Single" button
push. But on the second push
I get an error message " System error. Illegal seek". Any ideas ?

PUBLIC SUB Single_Click()
  DIM i AS Integer
  DIM dump AS Byte
 DIM data AS Byte
 ' DIM data AS String
 PRINT "Test"
  PRINT #hfile "S"                ' Send S to start sweep
     FOR i = 0 TO points - 1
     READ #hfile, data, points
     buffer[i] = data
     NEXT    
   draw_chart(buffer, points) 
END
-- 
View this message in context: http://www.nabble.com/Errotr-message-%22-Illegal-seek%22-tp23359909p23359909.html
Sent from the gambas-user mailing list archive at Nabble.com.