简单问题，各位朋友帮帮忙！！

Question

strtoint(copy(ComboBox2.text,1,pos('|',ComboBox2.text)-1));
 GotoBook(pointer(DBGrid1.SelectedRows.Items[0]));
 parmid.Caption := Fields[0].AsString;
 year.ItemIndex := year.Items.IndexOf(Fields[1].AsString);
 wz.Caption := Fields[2].AsString;
 zz.Caption := Fields[3].AsString;
这5条语句什么意思？？？

Answer 1

楼主的后面几段代码应该是跟在某个with语句后面的吧；
strtoint(copy(ComboBox2.text,1,pos('|',ComboBox2.text)-1));
      //将combobox2中‘|’前边的一个字符复制到combobox2中；GotoBook(pointer(DBGrid1.SelectedRows.Items[0]));
      //这句代码的意思好像是要让数据集指针跳到指定的位置；不过感觉有点不对；parmid.Caption := Fields[0].AsString; 
             //为parmid控件的caption赋值数据集的第一个字段的内容；下面的几句代码大同小异；都是这个意思；

Answer 2

strtoint(copy(ComboBox2.text,1,pos('|',ComboBox2.text)-1));
//得到COMBOBOX2中 第一个'|'前的字符串,并转换为INT型GotoBook(pointer(DBGrid1.SelectedRows.Items[0]));
//回到标签位置. 不过标签应该在此之前定义过了,parmid.Caption := Fields[0].AsString;
wz.Caption := Fields[2].AsString;
 zz.Caption := Fields[3].AsString;
//为parmid控件的caption赋值数据集的第1/2/3个字段的内容；
 year.ItemIndex := year.Items.IndexOf(Fields[1].AsString);
//YEAR控件的当前显示项的值为Fields[1].AsString值对应的index值