Explicação sobre Inherit e self
Pessoal gostaria q alguem me orientasse sobre esses dois <<<comandosInherit e self>>> e qdo devo usa-los c for possivel... deem um exemplo pq vi eles em um codigo e fiquei curioso... de como usá- los
E qdo declaro uma procedure public como consigo usar ela...
sendo que ja declarei o form na uses do outro form e fiz form.proceduretal e n deu certo como devo fazer ?
E qdo declaro uma procedure public como consigo usar ela...
sendo que ja declarei o form na uses do outro form e fiz form.proceduretal e n deu certo como devo fazer ?
Jonasaf
Curtidas 0
Respostas
Tnaires
19/01/2004
Olá jonas
Tenho um sistema aqui em casa q eu fiz o seguinte: criei um form padrão e vários outros eu construí ´herdados´ deste. O termo Inherit quer dizer exatamente isso: herança. Vc define uma classe com suas variáveis e métodos (procedures e functions), depois vc define outra q herda da primeira: todos os atributos q vc definiu na anterior passam a fazer parte tb desta última.
O termo Self se refere a um objeto hipotético da própria classe q vc está definindo. Por exemplo, vc faz seu form e põe um botão com o nome ´Button1´. Se vc digitar ´Self.´ e esperar, aparece tudo o q estará disponível para o objeto do form, q será criado em tempo de execução (ex: Self.Button1.Caption := ´OK´ é o mesmo do q fazer Button1.Caption := ´OK´).
Tudo isso fica complicado se vc tiver poucas noções de programação orientada a objetos. Na net há muitos textos legais sobre isso. [url=http://www.nosachamos.com/n_a/apostilas/Delphicurso.zip]Tente este link.[/url].
Finalmente, seu procedimento para procedures públicas está correto... não sei o q há de errado.
Abraços
Tenho um sistema aqui em casa q eu fiz o seguinte: criei um form padrão e vários outros eu construí ´herdados´ deste. O termo Inherit quer dizer exatamente isso: herança. Vc define uma classe com suas variáveis e métodos (procedures e functions), depois vc define outra q herda da primeira: todos os atributos q vc definiu na anterior passam a fazer parte tb desta última.
O termo Self se refere a um objeto hipotético da própria classe q vc está definindo. Por exemplo, vc faz seu form e põe um botão com o nome ´Button1´. Se vc digitar ´Self.´ e esperar, aparece tudo o q estará disponível para o objeto do form, q será criado em tempo de execução (ex: Self.Button1.Caption := ´OK´ é o mesmo do q fazer Button1.Caption := ´OK´).
Tudo isso fica complicado se vc tiver poucas noções de programação orientada a objetos. Na net há muitos textos legais sobre isso. [url=http://www.nosachamos.com/n_a/apostilas/Delphicurso.zip]Tente este link.[/url].
Finalmente, seu procedimento para procedures públicas está correto... não sei o q há de errado.
Abraços
GOSTEI 0