Formul�rio herdado

Question

Ol�...
Fiz um formul�rio de cadastro e coloquei no evento oncreate:

(para aparecer o nome do formul�rio)
Fm_Cadastro.FormName := name;
StatusBar1.Panels[2].Text := formname;

No Pai funciona, mas no formul�rio herdado n�o.
Algu�m sabe o que est� errado???

Catharina.

Marcelo Saviski · Answer

Fm_Cadastro.FormName := name; StatusBar1.Panels[2].Text :=Fm_Cadastro.FormName ;  :?: � isso?...

Rafael Heise · Answer

n�o funciona porque voc� est� referenciando o nome da form.. e a filha n�o tem o mesmo nome do pai .. quando referenciar a form use Self no lugar do nome... valeu...

Catharina · Answer

N�o entedi!!!! Como usar o Self no lugar do nome????...

Kinob · Answer

eu imagino que seja assim:self.FormName := self.name; StatusBar1.Panels[2].Text := self.formname; Deve ser similar ao this do Java. . . Eu nunca usei heran�a em Delphi, mas ao que tudo indica deve ser isso. N�o se pode colocar Fm_Cadastro por causa do que o zerneo tinha falado e tb o Fm_Cadastro � o nome da classe em que seu formul�rio est� herdando e n�o corresponde ao nome do objeto que vc instaciou da classe(formul�rio) herdada e a palavra reservada self deve servir para apontar o nome desse objeto. No caso do formul�rio pai funcionou porque o nome do objeto era realmente Fm_Cadastro e ele era da classe Form, naum sei o nome espec�fico no Delphi. Ser� que eu falei besteira?...

Rafael Heise · Answer

N�o falou besteira n�o .. � isso mesmo ....
quando se usa Self.. voc� esta indicando o componente da classe instanciada..... por exemplo, quando voc� cria uma nova form no seu projeto voc� est� instanciando um TForm, criando por exemplo TForm_Cadastro. e tudo que estiver dentro do TForm_Cadastro = class(TForm)
private... public.. end; pertencer� ao TForm_Cadastro instanciado ... assim .... quando voc� usar Self da forma como foi dito.. Self.FormName, Self.Caption ou qualquer propriedade voc� estar� referenciando o componente da classe instanciada... fui claro ?
abra�os....

F�rum Formul�rio herdado #173377