no encuentra mi aplicacion FindWindow

[federicorl]

se que algo debo estar haciendo mal estoy probando un teclado virtual y empece con el notepad

Var
manejador : THandle;
h: HWND;
Begin
h := FindWindow('Notepad', nil);
if h = 0 then ShowMessage('No se encontro la Aplicacion')
else
begin
SetForegroundWindow(h);

y me funciono bien pero cuando en Findwindow cambie 'Notepad' por el nombre de mi aplicacion no funciona, inmediatamente me indica que no encontro la aplicacion, alguien sabra que estoy haciendo mal?

de antemano les agradezco su tiempo, saludos!