Вопрос о выводе сообщений

[Yur@]

Всем привет!
Есть библиотека для работы с Com портом
Вот её фрагмент:

function OpenComPort (NPort,BaudRate,Parity,StopBits,ByteSize:integer):tHandle;
var PortName:pchar;
    Port:tHandle;
begin
 result:=0;
 try
   if not (NPort in [1..4]) then exit;
   PortName:=pchar('COM'+inttostr(NPort));
   port:=createfile(portname,generic_read + generic_write,0,nil,open_existing,0,0);
    if port=invalid_handle_value then
      begin
       application.MessageBox('Порт отсутствует или занят другим приложением',
       pansichar('Ошибка инициализации порта :'+portname),mb_iconstop);
       exit;
      end;

Я подцепляю её к своей программе. Я бы хотел чтобы сообщение 'Порт отсутствует или занят другим приложением' выводилось в Label.caption в моей программе. Как это сделать?Заранее спасибо!

[Gambler]

application.MessageBox('Порт отсутствует или занят другим приложением',
       pansichar('Ошибка инициализации порта :'+portname),mb_iconstop);

замени на

Label.caption:='Порт отсутствует или занят другим приложением';