动态给 SPcomm控件属性赋值 的问题————在线等待！！！！！

Question

大家好：
    请大家帮俺解决一个问题吧？？？问题如下：
    String 类型的数据怎样转换成 TParity,TBytesize,TStopbits类型的数据啊？？？？？TParity,TBytesize,TStopbits这三个类型的数据是SPcomm控件的“奇偶校验位”，“数据位”，“停止位”这三个属性的数据类型。在程序中我想用
   Edit控件的Text属性给这三个属性动态的赋值，请问我该怎么
   办啊？难死俺拉！？？拜托拜托您帮帮我吧？？！！！

Answer 1

给你举个例子：
  if s='sb1_0' then cbCSLSStopBits.ItemIndex:=0
  else if s='sb1_5' then cbCSLSStopBits.ItemIndex:=1
  else cbCSLSStopBits.ItemIndex:=2;