Convertir Aplicacion en Activa

[bohemioloco]

Hola a todos

Me gustaría que me ayuden con lo siguiente:

Estoy haciendo una aplicación con sockets (server y client) para que corra normalmente en segundo plano y/o miimizada, lo que necesito es que cuando el ServerSocket reciba datos del cliente (evento OnClienteRead) la aplicación se convierta en activa y pase a primer plano del escritorio o por lo menos saque un mensaje en primer plano, he intentado hacerlo con showmessage pero si estoy trabajando con otra aplicación el mensaje no se muestra y el beep no me garantiza la atencion del usuario


Código Delphi [-]
procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
Socket: TCustomWinSocket);
var
ClientMensaje:string;
begin
ClientMensaje:=Socket.ReceiveText;
Beep;
showmessage(ClientMensaje);
mmResultados.Lines.Add(ClientMensaje);
end;




y... abusando de su paciencia, , quiesiera saber como hago para hacer que mi aplicación se ejecute al iniciar windows, encontre un hilo pero es para Windows 9x y yo necesito para windows xp

toda ayuda sera bienvenida

Saludos a todos