Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #16  
Antiguo 02-03-2007
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Poder: 29
Lepe Va por buen camino
Exacto, es así.

En el caso de que algún heredero de TMiform deba hacer algo distinto en el procedimiento Habilita, puedes redefinir su comportamiento así:
Código Delphi [-]
unit Unit2;

interface

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

type
  TForm2 = class(TMiForm)
    Edit1: TEdit;
    Button2: TButton;
    procedure Button2Click(Sender: TObject);
  protected
     procedure Habilita(Edit: TEdit); override;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form2: TForm2;

implementation
{$R *.dfm}

procedure TForm2.Habilita(Edit:TEdit);
begin
   inherited Habilita(Edit);  // llama a TMiForm.Habilita
   // hacer algo más
end;

end.

La diferencia con tu codigo es la línea donde pone override. Es una directiva que significa "sobreescribir", es decir, ahora el TForm2 tiene su propio método Habilita, que llama a TMiForm.Habilita y además puede añadirle alguna funcionalidad extra.

Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
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 usar los formularios MDI, constructores de componentes Narlohe OOP 3 11-12-2006 10:54:10
¿Cómo crear una DLL con varios formularios? Javi2 Varios 3 25-05-2006 10:35:06
usar botones y etiquetas de flash en los formularios?? nidia Gráficos 1 25-11-2005 01:51:09
Obtener varios registros de Stored Procedure Phacko Firebird e Interbase 6 19-08-2005 17:56:43
CTRL-P en varios formularios magm2000 Varios 2 20-10-2004 09:38:09


La franja horaria es GMT +2. Ahora son las 03:24:52.


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