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

[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 همون کامپوننتی که برای بارکد ریئر استفاده شده