[delphi 5]pb o shutdown du pc

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [delphi 5]pb o shutdown du pc

wam

petit pb sur une appli delphi 5 :

au shutdown du pc l'application ne ce kill pas ce ki entraine le 'non arret' de windows.
l'application n'a pas l'air d'intercepter le message de fermeture.
y'a t'il la possibilité de forcer cela?

edit : l'application est invisible

[edtdd]--Message édité par WaM--[/edtdd]

---------------
Daïlaïte Da Discussions

Publicité

wam

e bein up

---------------
Daïlaïte Da Discussions

juju_le_barbare

Vous fiez pas aux apparences !

Salut,

J'avais le même problème, et j'ai trouvé comment intercépter le message de fermeture de win. Je me suis même amusé à envoyer une messagebox qui demandait si on voulait réellement fermer windows lol. Mais je ne l'ai pas sous la main, en tout cas je vais essayer de le poster le + vite possible.

@++

---------------
Visitez mon site : http://www.jujubarbare.linux-fan.com

wam

juju_le_barbare a écrit a écrit :

Salut,

J'avais le même problème, et j'ai trouvé comment intercépter le message de fermeture de win. Je me suis même amusé à envoyer une messagebox qui demandait si on voulait réellement fermer windows lol. Mais je ne l'ai pas sous la main, en tout cas je vais essayer de le poster le + vite possible.

@++

oki!
marci bcp!
j'espere ke tu vas retrouver ça!
j'arriiiiveeee poooo :cry:

---------------
Daïlaïte Da Discussions

juju_le_barbare

Vous fiez pas aux apparences !

Salut,

J'ai retrouvé en charchant sur le site http://www.phidels.com...

Code :

unit Unit1;
//Michel.bardou@wanadoo.fr
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Label1: TLabel;
private
// déclaration de la procédure qui interceptera les messages que windows
// envoie lorsqu'il veut se fermer à savoir WM_QUERYENDSESSION
// voir tutorial message.
procedure WMQueryEndSession(var Message: TWMQueryEndSession); message WM_QUERYENDSESSION;
public
{ Déclarations publiques}
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.WMQueryEndSession(var Message: TWMQueryEndSession);
begin
inherited;
if messagedlg('confirmation de la fermeture de Windows', mtConfirmation, [mbYes, mbNo], 0) <>mryes
then Message.Result:=0; // on demande à Windows de ne pas se fermer.
end;
end.

---------------
Visitez mon site : http://www.jujubarbare.linux-fan.com

wam

juju_le_barbare a écrit a écrit :

Salut,

J'ai retrouvé en charchant sur le site http://www.phidels.com...

Code :

unit Unit1;
//Michel.bardou@wanadoo.fr
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Label1: TLabel;
private
// déclaration de la procédure qui interceptera les messages que windows
// envoie lorsqu'il veut se fermer à savoir WM_QUERYENDSESSION
// voir tutorial message.
procedure WMQueryEndSession(var Message: TWMQueryEndSession); message WM_QUERYENDSESSION;
public
{ Déclarations publiques}
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.WMQueryEndSession(var Message: TWMQueryEndSession);
begin
inherited;
if messagedlg('confirmation de la fermeture de Windows', mtConfirmation, [mbYes, mbNo], 0) <>mryes
then Message.Result:=0; // on demande à Windows de ne pas se fermer.
end;
end.

merci bcp pr ton aide !
j'ai tjrs le meme pb
@+

---------------
Daïlaïte Da Discussions

FORUM HardWare.fr

Programmation

[delphi 5]pb o shutdown du pc

Sujets relatifs
avenir de delphi	Besoin d'un petit conseil sous Delphi
[DELPHI]BDE repertoire de recherche?	Question : Delphi ou Visual C++ ?? ceci est une vrai question !!
[Delphi] 2 question: ordonner listbox ?? + programme tjs visible??	[Delphi][C'est encore moi] Vérifier le type des données...
[Delphi/InstallShield] On l'integre comment dans le 6 ?	[Delphi] [dernière ligne droite] Détruire une form proprement...
[DElphi 6] utilisation de direct Draw...	[Delphi] Fonction CreateDirectory
Plus de sujets relatifs à : [delphi 5]pb o shutdown du pc

Page générée en 0.042 secondes