[NumLock]

Код:

library Project1;

uses
  Windows;

begin
  MessageBox(0, 'library Project1', 'MessageBox', MB_OK);
end.