デジタルオシロスコープからデータを読み込みます.

データ取得 ボタン を押すとオシロスコープからデータを取り出します.

調べたところ研究室にあるオシロスコープは、全画面に10,000個のデータが必要なことが分かりました.

今回、取り込むデータをその半分の5,000個に固定しました.

void __fastcall TForm1::Button4Click(TObject *Sender)
{
　　　GpibSend( 0 , 1, "XSND A,C1,0,5000,O"); //データ出力要求
　　　b=GpibReceive(0,1); //オシロからのヘッダ取得
　　　for(i=0;i<5000;i++){
　　　　　　b=GpibReceive(0,1); //オシロからデータ取り出し
　　　　　　Memo1->Lines->Add(b); //取り出したデータをMemo1に出力
　　　　　　n[i]=StrToFloat(b);//グラフ化用のデータ配列
　　　}
}