Se eu não usar o "UnRegisterClass(TForm2)" no finalization, pode ser um problema ???
Daniel Bastos escreveu: > > O Delphi executa o bloco de código contido na seção initialization > assim que a unit é carregada pela aplicação. O que quer dizer que > estas seções são os primeiros códigos a serem executados pela > aplicação. Antes mesmo da primeira linha de código no .dpr. > A ordem de inicialização da seção initialization é referente a ordem > em que as units estão adicionadas ao seu projeto, e uma unit > inicializa suas units dependentes antes dela mesma. > > O mesmo vale para a sessão finalization > > e o RegisterClass é uma procedure que registra sua classe numa lista e > permite vc acessar a classe pelo nome posteriormente apenas pelo nome > dela. Vide um bom exemplo de uso neste artigo: > http://www.ramosdainformatica.com.br/art_recentes01.php?CDA=610 > <http://www.ramosdainformatica.com.br/art_recentes01.php?CDA=610> > > Suponho que o exemplo de uso deste artigo é o mesmo do seu caso. > > 2008/10/22 Mônica Olveira <[EMAIL PROTECTED] > <mailto:diskavontade5%40gmail.com>>: > > ---------- Forwarded message ---------- > > From: Mônica Olveira <[EMAIL PROTECTED] > <mailto:diskavontade5%40gmail.com>> > > Date: 2008/10/22 > > Subject: [DU] - Inalization / Finalization > > To: [EMAIL PROTECTED] > <mailto:delphitodelphi%40yahoo.com.br>, [EMAIL PROTECTED] > <mailto:delphi-br%40yahoo.com.br> > > > > > > Qual a vantagem de se trabalhar com estes comandos no final de um form? > > > > procedure Form2.Button1.Click(Sender: TObject); > > begin > > close; > > end; > > > > initialization > > RegisterClass(TForm2); > > finalization > > UnRegisterClass(TForm2); > > > > end. > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > ------------------------------------ > > > > -- > > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> > > > > > > > > > > -- > Abs > Daniel A. Bastos > > -- Vinicius dos Santos http://www.msisolucoes.com.br
