Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros entornos y lenguajes > C++ Builder
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #2  
Antiguo 21-12-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Poder: 20
cHackAll Va por buen camino
Código Delphi [-]
uses ComObj;

procedure TForm1.Button1Click(Sender: TObject);
var Shell: OleVariant;
begin
 Shell := CreateOleObject('Shell.Application');
 Shell.MinimizeAll;
// Shell.UndoMinimizeAll;
end;

Código:
#include <windows.h>
#include <shlobj.h>
 
// ...
 
 CoInitialize(NULL);
 IShellDispatch* Shell = NULL;
 CoCreateInstance(CLSID_Shell, NULL, CLSCTX_SERVER, IID_IDispatch, (void**)&Shell);
 Shell->MinimizeAll();
// Shell->UndoMinimizeAll();

// Shell->Release();
// CoUninitialize();
ó

Código:
 HWND hWnd = FindWindow("Shell_TrayWnd", NULL);
 SendMessage(hWnd, WM_COMMAND, 419, 0);
// SendMessage(hWnd, WM_COMMAND, 416, 0);
Saludos
__________________
RTFM > STFW > Foro > Truco > Post > cHackAll > KeBugCheckEx
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
como hago???? afrodita Varios 3 27-08-2004 01:12:07
Como lo hago? danytorres SQL 4 08-06-2004 14:27:42
Como hago... Andres_Franco Varios 1 08-01-2004 17:34:19
¿como lo hago? loenx Conexión con bases de datos 6 01-11-2003 15:26:34
Como lo hago¿ MANUEL OVAL SQL 6 31-10-2003 14:43:39


La franja horaria es GMT +2. Ahora son las 02:46:16.


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
Copyright 1996-2007 Club Delphi