traer form adelante

[calco_hugo]

desde ya mas que agradecido por tus prontas respuestas (no se hasta que hora me quedare hoy con esto, lo tengo que tener para mañana), pero te comento, tengo ttimer en la aplicacion, en el evento

if GetAsyncKeyState( Ord( '8' ) ) = -32767 then
begin
form1.formStyle := fsStayOnTop
end;

(en este caso la tecla 8)

Pero no logro en ningun caso que la aplicacion pase a primer plano y tenga el foco, (ni siquiera logro que pase a primer plano), lo mas que logro es que la aplicacion en la barra de tareas titile.-
hugo