Valeu amigo.. esqueci mesmo do inherited... :o( Obrigado... Fellipe H.
2008/12/1 Silvio Clécio <[EMAIL PROTECTED]> > Olá pessoal, > > Fellipe, eu acho faltou uma inherited: > > > destructor TTeste.Destroy; > begin > if Assigned(FEndServs) then > FreeAndNil(FEndServ s); > >>inheritedDestroy; <-- Aqui, não? > end; > > Bem eu não tenho certeza se é isso, veja também sobre Notification. > > (http://www.datasus.gov.br/ccs/tutoriais/cursocomp/cmpdelp.htm#Pag25) > ________________________________ > []'s, Silvio Clécio > Contatos/Blog > Skype: silvioprog > E-mail, Yahoo! Messenger: [EMAIL PROTECTED]<silvioprog%40yahoo.com.br> > Gmail, Google Talk: [EMAIL PROTECTED] <silvioprog%40gmail.com> > Hotmail, MSN: [EMAIL PROTECTED] <silvio_prog%40hotmail.com> > BlogSpot: http://silvioclecio.blogspot.com/ > > ________________________________ > De: Fellipe Henrique <[EMAIL PROTECTED] <fellipeh%40gmail.com>> > Para: "delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br>" < > delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br>> > Enviadas: Segunda-feira, 1 de Dezembro de 2008 13:34:58 > Assunto: [delphi-br] Problemas ao excluir um componente criado por mim de > um projeto... > > > Amigos, > > Estou desenvolvendo um componente simples... porém na hora de excluir ele > do > meu form dá um erro no delphi, e pronto, tenho que fechar o delphi e abrir > denovo... > > o erro: Falha catastrofica e Invalid Pointer Operation > > type > TTeste = class(TComponent) > private > FEndServs: TStringList; > procedure SetEndServs( const Value: TStringList) ; > protected > > public > { Construtor do Componente } > constructor Create(aOwner: TComponent); override; > { Destroi o Componente } > destructor Destroy; override; > > published > property EndServs: TStringList read FEndServs write SetEndServs; > end; > > constructor TTeste.Create( aOwner: TComponent); > begin > inherited; > FEndServs := TStringList. Create; > end; > > destructor TTeste.Destroy; > begin > if Assigned(FEndServs) then > FreeAndNil(FEndServ s); > end; > > O que posso fazer? O que tem de errado ali!? > > Obrigado desde já... > > -- > ____________ _________ _________ ___ > T.·.F.·.A.·. > Fellipe Henrique > Blog: www.digitumsoft. com.br/blogs/ fellipeh > ------------ --------- --------- --------- --------- --------- - > CAMPANHA POR UMA INTERNET SEGURA > Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar > mensagens use SEMPRE o "Cco" (cópia oculta). > Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar > um e-mail, delete todas as informações que apareçam no corpo do e-mail e > que > possam ser usadas por hackers. > ############ ######### ######### ######### > > Veja quais são os assuntos do momento no Yahoo! +Buscados > http://br.maisbuscados.yahoo.com > > [As partes desta mensagem que não continham texto foram removidas] > > > -- _________________________________ T.·.F.·.A.·. Fellipe Henrique Blog: www.digitumsoft.com.br/blogs/fellipeh ------------------------------------------------------------------------------- CAMPANHA POR UMA INTERNET SEGURA Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar mensagens use SEMPRE o "Cco" (cópia oculta). Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar um e-mail, delete todas as informações que apareçam no corpo do e-mail e que possam ser usadas por hackers. ####################################### [As partes desta mensagem que não continham texto foram removidas]