谁可以帮我把下面的DELPHI转成C#??
procedureTForm1.Button8Click(Sender:TObject);vars:string;i,j,start,len:integer;buff:a...
procedure TForm1.Button8Click(Sender: TObject); var s:string; i,j,start,len:integer; buff:array[0..63] of byte; begin s:=''; start:=combobox7.ItemIndex or (combobox6.ItemIndex shl 8); len:=strtoint(combobox8.Text); buff[0]:=combobox5.itemindex; for i:=1 to 6 do begin try buff[i]:=strtoint('$'+copy(edit14.Text,i*2-1,2)); except beep; messagebox(handle,'数据错误!','提示信息',16); edit14.SetFocus; exit; end; end; i:=readic(start,len,@buff[0]); if i=0 then for j:=0 to len-1 do s:=s+inttohex(buff[j],2); edit21.Text:=s; SHOWMESSAGE('Result: '+inttostr(i)); end;
展开
1个回答
展开全部
是Form1的Button8的Click事件,界面上有下拉列表combobox5,combobox6,combobox7,combobox8 private void button8_Click(object sender, EventArgs e) { string s=""; int i,j,start,len; byte[] buff; start = combobox7.SelectedIndex || ( combobox6.SelectedIndex ) len=int.Parse(combobox8.Text); 额……至于后面的,因为我C#里面Byte数组学的不好,翻译不到~~不过是根据for(i=0;i<=6;i++)循环将文本框edit14.Text字符串中的i*2-1开始截取2位,放到byff数组中。 。。。。。。。 }
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询