Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > API de Windows
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #2  
Antiguo 07-02-2006
Avatar de xEsk
[xEsk] xEsk is offline
Miembro Premium
 
Registrado: feb 2006
Posts: 454
Poder: 21
xEsk Va por buen camino
Ui, un poco mas cerca de la solucion

Parece que ya lo he logrado, creo que es algo chapuza, pero hace lo que yo quiero... asi que ya me vale, hasta que no vea lo contrario xDDD

Aqui mi Chapu-Codigo (Demostracion de funcionamiento):

Código Delphi [-]
  ...
  // Activa la sombra por si estaba desactivada
  SystemParametersInfo(SPI_SETDROPSHADOW, 0, Pointer(True), 0);
  SetClassLong(Handle,GCL_STYLE, GetClassLong(Handle, GCL_STYLE) or CS_DROPSHADOW);
  RecreateWnd;

  // Actualitza el form y espera 1 segundito (para observar q hay sombra)
  Refresh;
  sleep(1000);

  // Desactiva la sombra (del windows entero)
  SystemParametersInfo(SPI_SETDROPSHADOW, 0, Pointer(False), 0);
  RecreateWnd;  // Recrea la ventana

  // Actualiza el form y espera 1 segundito para observar que ya no hay sombra
  Refresh;
  sleep(1000);
  // Activa la sombra a todo el windos otra vez
  SystemParametersInfo(SPI_SETDROPSHADOW, 0, Pointer(True), 0);
  ...

Ahora solo queda mejorarlo, para que no active las sombras de todo el windows en caso de que el usuario las tuviera desactivadas, pero eso ya es mas facil paritiendo de la base que tengo ahora.

Saludos.

Última edición por xEsk fecha: 07-02-2006 a las 15:09:24.
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 codifico las transacciones en delphi, y como jalo una vista desde SQL Server? Felipe Conexión con bases de datos 2 06-01-2008 03:00:04
Como quitar las barras del Explorer??? danytorres HTML, Javascript y otros 24 21-10-2005 11:49:57
Como fijar una ventana? juliopag1 Varios 17 13-10-2005 07:00:39
Como muestro una ventana de proceso carlosmoralesm OOP 2 04-06-2004 05:07:48
Como paso un la intancia Tstrings de un TComboBox (ComboBox.items) por parametro? orfeo OOP 1 05-05-2003 07:58:52


La franja horaria es GMT +2. Ahora son las 21:15:55.


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