Problem z notatnikiem

Czy moze mi ktos wyjaśnić dlaczego używajac poniżeszego kodu:

WinExec('Notepad.exe',SW_SHOW);
SetActiveWindow(FindWindow('Notepad',Nil));
BringWindowToTop(FindWindow('Notepad',Nil));
Windows.SetFocus(FindWindowEx(FindWindow('Notepad',Nil),0,'Edit',Nil));
keybd_event(Ord('H'),0,0,0);
keybd_event(Ord('e'),0,0,0);
keybd_event(Ord('l'),0,0,0);
keybd_event(Ord('l'),0,1,0);
keybd_event(Ord('o'),0,0,0);
keybd_event(Ord(','),0,0,0);
keybd_event(Ord(' '),0,0,0);
keybd_event(Ord('A'),0,0,0);
keybd_event(Ord('z'),0,0,0);
keybd_event(Ord('g'),0,0,0);
keybd_event(Ord('o'),0,0,0);
keybd_event(Ord('n'),0,0,0);
keybd_event(Ord(' '),0,0,0);
keybd_event(Ord('w'),0,0,0);
keybd_event(Ord('a'),0,0,0);
keybd_event(Ord('s'),0,0,0);
keybd_event(Ord(' '),0,0,0);
keybd_event(Ord('h'),0,0,0);
keybd_event(Ord('e'),0,0,0);
keybd_event(Ord('r'),0,0,0);
keybd_event(Ord('e'),0,0,0);
keybd_event(Ord(' '),0,0,0);
keybd_event(Ord(':'),0,0,0);
keybd_event(Ord(')'),0,0,0);

Program otorzy notatnik i wpisze w nim: "h5/ a7/, 1 85" i otwiera okienko wyszukiwania i wpisuje w nim: "5 ".

Za pomoc z góry dziękuje.

wprawdzie nie udalo mi sie tego zroibc ale zobacz co mozna zroibc z komputerem jak walniesz kod z petla od 0 do 255, a zamiast ord('x') dasz i :D mialem schize :) ale jakos zyje moj kompik i nic sie nie stalo :)