Dúvida básica sobre controle Edit estendido

Delphi

13/07/2013

E aí pessoal...

Estou com uma dúvida que acredito ser básica. Estou com uma unit que estende o controle Edit.

Dando uma olhada no código, verifiquei que não existe a procedure Register. Como posso então utilizar essa unit em um aplicativo ?

Obrigado.

Adalberto.
Adalberto Brasaca

Adalberto Brasaca

Curtidas 0

Respostas

Alessandro Yamasaki

Alessandro Yamasaki

13/07/2013

Não entendi sua dúvida. Mas não é só vc registrar a classe?

initialization
RegisterClass(TFormXXX);
end.
GOSTEI 0
Marco Salles

Marco Salles

13/07/2013

como vc esta estendendo ???

Utilizando Classe Amigas ou Overload da VCL

se for Overload da VCL , basta esta Unidade onde vc reescreve a Classe TEdit ser a ultima Unidade
na declaração da Uses

Tipo isto



unit uMyEdit;

interface

uses
 Vcl.StdCtrls;

Type
 TEdid = class ( Vcl.StdCtrls.TEdit)
   //alguma coisas;
 end;

implementation

end.


e Quando for Utilizar esta classe estendida




interface //  Observe Seção Interface

uses 
  ....., Vcl.StdCtrls, uMyEdit; //Depois a declaração


[]sds
GOSTEI 0
Alessandro Yamasaki

Alessandro Yamasaki

13/07/2013

Ola Marco

Qual a diferença de utilizarmos na classe overload e estendida? Performace apenas ou não?
GOSTEI 0
Adalberto Brasaca

Adalberto Brasaca

13/07/2013

Valeu pessoal... Coloquei a procedure Register e deu certo. Obrigado...
GOSTEI 0
Marco Salles

Marco Salles

13/07/2013

Valeu pessoal... Coloquei a procedure Register e deu certo. Obrigado...


então não é estendida .. È Herança que vc quiz dizer no início.

[]sds
GOSTEI 0
Adalberto Brasaca

Adalberto Brasaca

13/07/2013

Valeu pessoal... Coloquei a procedure Register e deu certo. Obrigado...


então não é estendida .. È Herança que vc quiz dizer no início.

[]sds


Isso Marco...

Obrigado.
GOSTEI 0
POSTAR