Ver Mensaje Individual
  #2  
Antiguo 01-03-2008
Avatar de ArdiIIa
[ArdiIIa] ArdiIIa is offline
Miembro Premium
 
Registrado: nov 2003
Ubicación: Valencia city
Posts: 1.481
Reputación: 24
ArdiIIa Va por buen camino
Puedes controlar a windows cuando salta el protector de pantalla e interceptarlo..
Un ejemplo...


Código Delphi [-]
procedure TFormMain.ApplicationEventsMessage(var Msg: tagMSG; var Handled: Boolean);
begin
    Handled := False;

      if  (Msg.Message = WM_SYSCOMMAND) and (Msg.wParam = SC_SCREENSAVE) then
          Begin
            Handled := True;
                if (Screen.ActiveForm = FormMain ) and Handled then
                    Begin
                        Application.CreateForm(TFormAbout, FormAbout);
                        FormAbout.Show;
                    End;
          End;
End;
__________________
Un poco de tu generosidad puede salvar la vida a un niño. ASÍ DE SENCILLO
Responder Con Cita