Data acquisition time on the PicoScope 9201A

Post any questions you may have about our current range of oscilloscopes
Post Reply
Satarov
Newbie
Posts: 0
Joined: Wed Mar 28, 2012 8:53 am

Data acquisition time on the PicoScope 9201A

Post by 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 180 times

Post Reply