برطرف کردن مشکل یک کامپوننت

[maisam57]

سلام
سورس یه برنامه رو در اختیار من قراردادن تا edit کنم یه برنامه نویس برای خوندن پرت بارکدریدر از یه کامپوننت استفاده کرده که نمیتونم پیداش کنم اتفاقا یکی از دوستان یه ocx معرفی کرد ولی نصب که کردم بمحض گذاشتن روی فرم error میده
MSCommLib_TLB
اینو توی uses وارد شده بود و توی سورس هم اینارو نوشته بود

procedure TForm1.Timer1Timer(Sender: TObject);

begin

if form1.Active=false then form1.Activate;

 if (comm.PortOpen) then

    begin

      memo1.Text:=memo1.Text+comm.Input;

      statusbar1.Panels[0].Text:='متصل';

    end

    else

      statusbar1.Panels[0].Text:='قطع';





if  trim(pchar(memo1.Text))='' then

      statusbar1.Panels[1].Text:='اطلاعات بار گذاری نشده'

else

      statusbar1.Panels[1].Text:='اطلاعات بارگذاری شده';



 end;

comm همون کامپوننتی که برای بارکد ریئر استفاده شده