Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Trucos (https://www.clubdelphi.com/foros/forumdisplay.php?f=52)
-   -   Diálogo salir de Windows - obtener (https://www.clubdelphi.com/foros/showthread.php?t=80485)

marcoszorrilla 26-06-2006 00:43:51

Diálogo salir de Windows - obtener
 
Código Delphi [-]
interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls,ShellApi,ShlObj;

    procedure ExitWindowsDialog(Handle: THandle); stdcall; external 'shell32.dll' index 60; //API declaration
....
procedure TForm1.Button1Click(Sender: TObject);
begin
  ExitWindowsDialog(Handle);
end;


La franja horaria es GMT +2. Ahora son las 15:51:09.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi