伊人激情av一区二区三区,亚洲国产精品一区二区制服,国产高潮流白浆喷水免费,老外插女人视频

danwei
級(jí)別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 89 個(gè)
工控威望: 234 點(diǎn)
下載積分: 1526 分
在線時(shí)間: 292(小時(shí))
注冊(cè)時(shí)間: 2013-05-22
最后登錄: 2025-04-10
查看danwei的 主題 / 回貼
樓主  發(fā)表于: 2018-01-10 17:15
    三菱MX通訊控件
ReadDeviceBlock參數(shù)怎么給,為什么讀取的軟元件類型跟地址寫進(jìn)去總是報(bào)錯(cuò)   單單一個(gè)字母入"m"時(shí)就不報(bào)
axActProgType1.ReadDeviceBlock("m" , b, out arry[0]);
求指導(dǎo)
worker02
級(jí)別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 116 個(gè)
工控威望: 296 點(diǎn)
下載積分: 713 分
在線時(shí)間: 283(小時(shí))
注冊(cè)時(shí)間: 2008-08-01
最后登錄: 2025-05-27
查看worker02的 主題 / 回貼
1樓  發(fā)表于: 2018-01-18 09:58
Procedure TForm1.Read_Data1;///////順序讀取/////////////////////
Var     R_Msg,Re_Add,ReData_Len,I,Col,Row,D8:Integer;
        Re_Data:Array of LongInt;
        Sen_Add:WideString;
        str,Str1:String;
        Str_Len:Integer;
begin
        Re_Add   :=StrToInt(Edit1.Text);//取出起始地址值
        ReData_Len:=StrToInt(Edit2.Text);//取出數(shù)據(jù)長(zhǎng)度
IF(ComboBox1.Text='X')OR(ComboBox1.Text='Y') then //判定是為8進(jìn)制類型設(shè)備X,y最大獲取范圍
        begin
IF (ReData_Len+Re_Add)>128 then
        ReData_Len:=128-Re_Add;
        end;
        FOR I:= 0 To ReData_Len-1 DO
        begin
IF(ComboBox1.Text='X')OR(ComboBox1.Text='Y')Then //判定是為8進(jìn)制類型設(shè)備X,y最大獲取范圍
        D8:=DectoD8(Re_Add+I)
        else
        D8:=Re_Add+I;
         IF I=0 THEN
        Sen_Add:=ComboBox1.Text+IntToStr(D8)
        else
        Sen_Add:=Sen_Add+#10+ComboBox1.Text+IntToStr(D8);
        end;
IF (Re_Add>=0)And(ReData_Len>0)then
        Begin
        SetLength(Re_Data,ReData_Len);
IF RadioButton4.Checked=True Then
        R_Msg:=FX_Com.ReadDeviceRandom(Sen_Add,ReData_Len,Re_Data[0])
        else
        R_Msg:=FX_Usb.ReadDeviceRandom(Sen_Add,ReData_Len,Re_Data[0]);
        end
        ELSE
IF Re_Add<0 then
        ShowMessage('起始地址有誤')
        else
        ShowMessage('長(zhǎng)度填寫有誤碼');
IF R_Msg=0 Then
        Stat_Bar.Panels.Items[7].Text:='接收成功'
        else
        Begin
        Stat_Bar.Panels.Items[7].Text:='接收失敗錯(cuò)誤代碼:'+#13+IntTOstr(R_Msg);
        Exit;
        end;
        FOR I:=0 TO High(Re_Data) DO
        Begin
IF(ComboBox1.Text='X')OR(ComboBox1.Text='Y') then//判定是為8進(jìn)制類型設(shè)備
        begin
        D8:=DectoD8(Re_Add+I);
        Col:= (I+Re_ADD) MOD 8+1;
        Row:= (I+Re_ADD) DIV 8+1;
        end
ELSE

        BEGIN
        Col:= (I+Re_ADD) MOD 10+1;
        Row:= (I+Re_ADD) DIV 10+1;
        end;
        IF Dec.Checked then
        StringGrid1.Cells[Col,Row]:=IntToStr(Re_Data[I])
        else
        IF Hex.Checked then
        StringGrid1.Cells[Col,Row]:=IntToHex(Re_Data[I],2)
         else
        IF Bin.Checked then
        begin
        str:=IntTostr(Re_Data[I]);
        Str_Len:=Length(str);
        str:=IntToBin(Re_Data[I],Str_Len*4);
        Str1:='1';
        Str_Len:=Pos(Str1,str);
        Delete(Str,1,Str_Len-1);
        IF str='0000' then
        str:='0'
        else
        str:=str;
        StringGrid1.Cells[Col,Row]:=str;
        end;

        StringGrid1.Font.Name:='宋體';
        stringGrid1.Font.Size:=13;
        Form1.Add_tpye;
        end;

        end;
我是用DELPHI寫,用的接口是USB,沒(méi)有問(wèn)題,測(cè)試過(guò)。
worker02
級(jí)別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 116 個(gè)
工控威望: 296 點(diǎn)
下載積分: 713 分
在線時(shí)間: 283(小時(shí))
注冊(cè)時(shí)間: 2008-08-01
最后登錄: 2025-05-27
查看worker02的 主題 / 回貼
2樓  發(fā)表于: 2018-01-18 10:03
圖片:
這是軟件測(cè)試過(guò)程

中文字幕熟女五十路中出| 国产黄片一区二区在线看| 国产打屁股在线播放91| 美女搞基网站日本免费看| www16尻屄| 91 av视频在线观看| 日韩高清在线观看AV片| 国产一级性生活免费播放| 夜爽爽8888妓女免费| 操美女骚逼网站| 国产精品无码mv在线观看| 日韩av另类专区av日韩| 精品久久无遮挡中文字幕| 把鸡巴捅进女生阴部动漫| 午夜影院免费在线观看电影| 末成年女A∨片一区二区| 含羞草一级黄色片免费看| 亚洲av和国产综合av| 亚洲AV永久无码老湿机| 苍井空日韩一区二区三区| 禁断の肉体乱爱中文字幕| 日韩在线视频一区二区三区| 亚洲日韩小电影在线观看| 最淫荡的中国老骚屄视频| 国产又黄又潮娇喘视频h| 运动男生鸡巴大视频下载| 亚洲激情短视频在线播放| 午夜精品一区二区三区久久| 日大眯眯DVD| 黄片免费在线观看色欧美| 亚洲伦中文字幕另类不卡| 千年老逼吃嫩屌| 国产成人8x人网视频毛片| 精品av久久久久久电影| 97精品伊人久久大香线蕉| 欧美日韩国产成免费网站| 日本一区二区三区视频电影| 久久高清免费不卡一区中文| 美女大吊干美女| 潮吹无码在线看| 一区二区三区 日韩在线|