一个关于一段vb程序在delphi中如何表述的问题(100分)

具体内容如下：
串行端口接收二进制数据的一端通常并不知道传送端到底传送了多少字节过来，所以用动态数组来存放收到的二进制数据，程序如下：
dim getbyte( ) as byte
...
...
getbyte=mscomm1.input
for I=LBound(getbyte) to UBound(getbyte) //LBound,UBound目的是取得getbyte
//数组的最小，最大索引值
var (I) = getbyte (I)
next I
请问这段vb程序如果在delphi中如何写，其中mscomm1为本人在delphi中安装的控件，望精通vb,delphi以及串口通讯的学长们多多帮忙，万分感谢！！！