Ver Mensaje Individual
  #1  
Antiguo 27-11-2007
Avatar de fedelphi
fedelphi fedelphi is offline
Miembro
 
Registrado: abr 2006
Ubicación: Santa Fe
Posts: 122
Reputación: 19
fedelphi Va por buen camino
Derivar una funcion

Hola foro, despues de estar investigando un rato logre utilizar una funcion derivada de su clase padre, paso a explicar; tengo un form con una funcion que verifica que el ingreso de los datos en los distintos campos sean correctos(por ejemplo que tenga letras el precio, que no se extienda un campostring mas de n caracteres, etc)mi objetivo es utilizar esta funcion en las clases derivadas. Lo que hice fue lo siguiente:
form principal
Código Delphi [-]
TFModifProductos = class(TForm)
.
.
.

public
    function verifica:boolean;
  end;
en la clase derivada
Código Delphi [-]
 TFAltaProducto = class(TFModifProductos)
    .
.
.

  private

  public
    function verifica:boolean;
  end;

implementation

function TFAltaProducto.verifica: boolean;
begin
  inherited verifica;
end;


Es correcta esta manera de realizarlo? ya que he visto metodos de sobreescritura de metodos (con virtual y override) y demas pero no entendi muy bien. Gracias
Fede
__________________
De lo que hay no falta nada!!!
Responder Con Cita