Ver Mensaje Individual
  #2  
Antiguo 23-09-2005
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Reputación: 27
delphi.com.ar Va por buen camino
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!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.

Última edición por delphi.com.ar fecha: 23-09-2005 a las 13:55:16.
Responder Con Cita