Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 08-05-2013
yevabas yevabas is offline
Miembro
NULL
 
Registrado: nov 2010
Posts: 42
Poder: 0
yevabas Va por buen camino
Visualizar Caption en form minimizado

Buenas tardes

Aquí de nuevo con una consulta, he buscado pero no he encontrado nada, perdón si ya lo trataron pero llevo dando vueltas hace varios días.

Tengo aplicación donde el caption del formulario varia, es un contador, lo que quiero es que al minimizar la aplicación en la barra de tareas de Windows el caption se visualice y siga contando, en realidad no se si eso sea posible.

espero haberme hecho entender y muchas gracias por su colaboración y tiempo.
Responder Con Cita
  #2  
Antiguo 08-05-2013
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola yevabas.

Proba si este código realiza algo similar a lo que estas buscando:
Código Delphi [-]
uses ... , ShellApi;
type
  TForm1 = class(TForm)
    Timer1: TTimer;
    procedure Timer1Timer(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    FTitle: string;
    FMinimized: Boolean;
    procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND;
  public
  end;
...

implementation

var
  Cont: Integer = 0;

procedure TForm1.FormCreate(Sender: TObject);
begin
  FTitle         := Application.Title;
  FMinimized     := False;
  Timer1.Enabled := True;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Inc(Cont);
  Caption := IntToStr(Cont);
  if FMinimized then
    Application.Title := IntToStr(Cont)
  else
    Application.Title := FTitle;
end;

procedure TForm1.WMSysCommand(var Msg: TWMSysCommand);
begin
  FMinimized := Msg.CmdType = SC_MINIMIZE;
  DefaultHandler(Msg)
end;

Saludos.

Edito: Modifiqué el título original de tu mensaje "Caption" por el actual, ya que el anterior no reflejaba el contenido de tu consulta.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 08-05-2013 a las 23:42:26.
Responder Con Cita
  #3  
Antiguo 09-05-2013
yevabas yevabas is offline
Miembro
NULL
 
Registrado: nov 2010
Posts: 42
Poder: 0
yevabas Va por buen camino
Visualizar Caption en form minimizado

Hola ecfisa

Gracias por tu tiempo y colaboración.

Probé tu código y funciona al perfección, solo me gustaría saber una cosita mas y es que al minimizar la pantalla, esta queda al lado izquierdo inferior, no se si sea posible que quede el la barra de tareas de windows, como cuando uno minimiza word, excel, pero de todos modos lo que me diste me sirve muchísimo y así también lo puedo implementar muchas gracias, y como siempre ustedes sacándonos de apuros a los que no somos diestros en el manejo de delphi y otras cositas..
Responder Con Cita
  #4  
Antiguo 09-05-2013
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.021
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Busca por "minimizar en trayicon". No mezcles temas distintos en el mismo hilo, gracias.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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
Caption de un form MDI Chid lbidi OOP 3 22-07-2011 19:54:00
Problemas con el caption del Form José Luis Garcí Varios 1 24-04-2011 10:57:48
Cargar Version en el Caption del Form Paulao Varios 2 22-03-2011 03:04:42
Evitar el minimizado del form maximizado Xema API de Windows 4 27-09-2004 14:02:14


La franja horaria es GMT +2. Ahora son las 13:53:55.


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