Вопрос к программистам в Delphi не могу найти ошибку "[Fatal Error] Project1.dpr(4): File not found: 'massages.dcu'"

Доброго времени суток товарищи программисты и те кто начинает программировать, такой вот вопрос не могу найти ошибку в коде, пишет что не может найти модуль. "[Fatal Error] Project1.dpr(4): File not found: 'massages.dcu'" посмотрите свежим взглядом может кто найдет! "
вот исходник (это шаблон) :

program Project1;

uses
Windows, massages, sysutils;

{$R *.res}

Var
Instance:HWnd;
WindowClass:TWndClass;
Handle:HWnd;
msg:TMsg;

//Процедура выхода из программы

procedure DoExit;
begin
Halt;
end;

// функция обработки события Windows

function WindowProc (Hwn,msg,wpr,lpr: longint): longint; stdcall);
begin
result:=defwindowpro(hwn,msg,wpr,lpr);
if msg=wm_destroy then
DoExit;

if msg=wm_KeyDown then
if wpr=VK_ESCAPE then
poExit;
end;

begin
//Получаем описать модуля
intance:=GetModuleHandle(nil);
//Заполняем строку WindowClass
WindowClass.style:=CS_HRedraw or CS_VRedraw;
WindowClass.Lpfnwndproc:=@windowproc;
WindowClass.Hinstance:=Instance;
WindowClass.HbrBackground:= color_btnface;
WindowClass.LpszClassName:='DX';
WindowClass.Hcursor:=LoadCursor(0,IDC_ARROW);

//регистрируем новый клас
RegisterClass (WindowClass);

//создаём окно
Handle:=CreateWindowEx (0, 'DX',",WS_POPUP, 1,1, 200, 200,0,0, Instance,nil);

ShowWindow(Handle, SW_SHOW);
UpdateWindow (Handle);

//здесь производ инициализацию

//Öцикл обработки сообщений
while (GetMessage(msg, 0, 0, 0)) do
begin
translatemessage(msg);
dispatchmessage (msg);
end;
end.