Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   API de Windows (https://www.clubdelphi.com/foros/forumdisplay.php?f=7)
-   -   Form en la barra de tarea de windows (2) y icono del ejecutable (https://www.clubdelphi.com/foros/showthread.php?t=25469)

Moises22 23-09-2005 13:37:53

Form en la barra de tarea de windows (2) y icono del ejecutable
 
Hola a todos, en primer lugar me gustaria felicitar a todos los responsables de este foro que funciona genial y es de gran utilidad.

Por otra parte mi duda es que con respecto al hilo http://www.clubdelphi.com/foros/show...ight=minimizar
el fin es exactamente lo que me gustaria hacer en mi aplicacion, pero estoy bastante verde en Delphi ya que soy un novato en el.

Con respecto al codigo que se da como solucion del hilo para minimizar la aplicacion directamente en la barra de tareas:

Código Delphi [-]
 procedure TForm2.CreateParams(var Params: TCreateParams);
 begin
   inherited;
   Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
   Params.WndParent := GetDesktopWindow;
 end;
Me da el mismo fallo que a alguien que lo pregunta en el mismo hilo, es decir, lo pongo en la parte de implementation del programa y me da el siguiente error
Method 'CreateParams' hides virtual method of base type 'TCustomForm', estoy utilizando Delphi 6. He puesto delante como se indica en el foro la palabra override de esta manera

Código Delphi [-]
 override procedure TForm2.CreateParams(var Params: TCreateParams);
 begin
   inherited;
   Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
   Params.WndParent := GetDesktopWindow;
 end;
dandome el siguiente error ahora [Error] administracionvvs.pas(38): Declaration expected but identifier 'override' found.Si alguien me puede ayudar o agradeceria muchisimo!!!!.
--------------------------------------------------------------------------
La otra duda es una bobada pero no estoy seguro de saber si funciona bien, la cosa es que en el Form e colocado un icono a la aplicacion pero cuando la minimizo sale el logotipo de Delphi, me gustaria que este fuera el que yo he creado ¿como se hace?

POR ADELANTADO, MUCHAS GRACIAS POR TODO

delphi.com.ar 23-09-2005 13:53:08

Cita:

Empezado por Moises22
Me da el mismo fallo que a alguien que lo pregunta en el mismo hilo, es decir, lo pongo en la parte de implementation del programa y me da el siguiente error
Method 'CreateParams' hides virtual method of base type 'TCustomForm', estoy utilizando Delphi 6. He puesto delante como se indica en el foro la palabra override de esta manera
dandome el siguiente error ahora [Error] administracionvvs.pas(38): Declaration expected but identifier 'override' found.Si alguien me puede ayudar o agradeceria muchisimo!!!!.

Simplemente te dice que estas redefiniendo un método de un ancestro, en lugar de sobreescribirlo. Lo solucionas poniendo la directiva override luego de la definición:
Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, FileCtrl;

type
  TForm1 = class(TForm)
  private
  protected
    procedure CreateParams(var Params: TCreateParams); override;
  public
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
  Params.WndParent := GetDesktopWindow;
end;

end.

Por otro lado, te recomiendo amigarte con la ayuda de delphi, que es exelente y si escribes override y presionas la tecla F1, te mostrará claramente como debes usar esta directiva.

Saludos!

jmariano 23-09-2005 14:04:51

Para cambiar el icono de la aplicación has de ir a la opción de menú: Project->Options, y, por último, a la pestaña "Application"

Saludos!

Moises22 26-09-2005 09:39:28

Muchas gracias a los dos por responder el programa me ha funcionado y lo del icono esta resuelto totalmente como me habeis dicho.

Pero aun tengo un problema y es que creo que entonces en el hilo no lo entendi muy bien. Yo lo que quiero es que cuando se minimice la aplicacion aparesca el icono al lado del reloj; como el MSN,el Emule... Pero con el codigo que he creado no funciona.

¿Que debo hacer?
Desde luego agradezco muchisimo vuestra ayuda,GRACIAS.

delphi.com.ar 27-09-2005 14:46:44

Cita:

Empezado por Moises22
Yo lo que quiero es que cuando se minimice la aplicacion aparesca el icono al lado del reloj; como el MSN,el Emule... Pero con el codigo que he creado no funciona.

El código si funciona, pero no es para lo que tu quieres.
Busca en el foro la palabra "TrayIcon" y encontrarás unas cuantas preguntas al respecto.

Saludos!

Moises22 07-10-2005 09:57:14

Problema solucionado, muchas gracias por todo.;)


La franja horaria es GMT +2. Ahora son las 20:57:28.

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