Test and Measurement Forum

Data acquisition time on the PicoScope 9201A

Post any questions you may have about our current range of oscilloscopes

Data acquisition time on the PicoScope 9201A

Postby Satarov » Wed Mar 28, 2012 9:47 am

Здравстуйте !
У нас имеется проблема с осциллографом PicoScope 9201A.
Она проявляется в следущем: при сборе данных в цикле время опроса с каждым разом увеличивается.
Как повторить проблему:
Используя пример на Delphi из SDK_2.3.2 мы добавили цикл сбора данных и засекаем время от начало до конца сбора.
Пример в приложении.
Фаил: MainClient.pas:
Code: Select all
      Ansver := AnsiString(FUDS_RC.ExecCommand(ComboBox1.Text));
//      Ansver := Spider.ExecuteStringOfCommands(ComboBox1.Text);

      if Trim(UpperCase(ComboBox1.Text)) = 'WFM:DATA?' then
+      begin
+        Label1.Caption:=   DateTimeToStr(now);
+          for iii:=1 to 1000 do begin
+            Ansver := AnsiString(FUDS_RC.ExecCommand(ComboBox1.Text));
+            DrawCurve(Ansver);
+       end;
+        Label2.Caption:=   DateTimeToStr(now);
+      end;

      if FDelay > 0 then
        begin
          Dec(FDelay);
          if FDelay = 0 then
            ClrImage
        end;


При первом старте время сбора занимает 16 секунд, при втором - 25, при третьем - 34, при четвертом - 44 и т.д.
С чем это связано и как от этого избавиться?
Спасибо.
Dear Support!
We have the problem with PicoScope 9201A.
Problem description: A data acquisition time is increasing if we collect data in a loop.
How to reproduce it:
We use your example from SDK_2.3.2 on a Delphi. We added some code for the loop and we check the time from a beginning to the end of the data collection.
File: MainClient.pas:
Code: Select all

      Ansver := AnsiString(FUDS_RC.ExecCommand(ComboBox1.Text));
//      Ansver := Spider.ExecuteStringOfCommands(ComboBox1.Text);

      if Trim(UpperCase(ComboBox1.Text)) = 'WFM:DATA?' then
+      begin
+        Label1.Caption:=   DateTimeToStr(now);
+          for iii:=1 to 1000 do begin
+            Ansver := AnsiString(FUDS_RC.ExecCommand(ComboBox1.Text));
+            DrawCurve(Ansver);
+       end;
+        Label2.Caption:=   DateTimeToStr(now);
+      end;

      if FDelay > 0 then
        begin
          Dec(FDelay);
          if FDelay = 0 then
            ClrImage
        end;


The first start acquisition time are 16 seconds, the second - 25 seconds, the third - 34 seconds, in the fourth - 44 and so on. Please see attachment file.
Why is this and how to solve it?
Best wishes
Attachments
Delphi_Client_Example.zip
(230.81 KiB) Downloaded 130 times
Satarov
Newbie
 
Posts: 0
Joined: Wed Mar 28, 2012 8:53 am

Return to USB PC Oscilloscopes

Who is online

Users browsing this forum: No registered users and 0 guests