Re: [delphi-br] Classe Recursiva
ou isso hehehe declaração de métodos é tão comum que nem me liguei... ;P o/ Em 26/08/2010 20:40, Rubem Rocha escreveu: > No Object Pascal do Delphi 7, declarações "forward" são usadas com > classes, > interfaces, procedures e functions. > > Sds. > > De: delphi-br@yahoogrupos.com.br > <mailto:delphi-br%40yahoogrupos.com.br> > [mailto:delphi-br@yahoogrupos.com.br > <mailto:delphi-br%40yahoogrupos.com.br>] Em > nome de Roni Rodrigo > Enviada em: quinta-feira, 26 de agosto de 2010 19:28 > Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> > Assunto: Re: [delphi-br] Classe Recursiva > > se eu não me engano, declarações forward são só para classes sim... > o/ > > Em 26/08/2010 09:30, Diego Garcia escreveu: > > eu tentei fazer isso com Record e não consegui... é somente com classe? > > > > *Diego Garcia* > > Twitter:http://www.twitter.com/drgarcia1986 > > > > > > Em 26 de agosto de 2010 09:20, Rubem Nascimento da Rocha< > > djpardalro...@hotmail.com <mailto:djpardalrocha%40hotmail.com> > <mailto:djpardalrocha%40hotmail.com> > escreveu: > > > > > >> > > >> > > >> > > >> > Como diria a Oi, "Simples Assim!". > >> > > >> > type > >> > TMinhaClasse = class; > >> > > >> > TMinhaClasse = class > >> > private > >> > fCampo1: string; > >> > fCampo2: string; > >> > fCampo3: string; > >> > fObjetoPai: TMinhaClasse; > >> > public > >> > property ObjetoPai: TMinhaClasse read fObjetoPai write fObjetoPai; > >> > end; > >> > > >> > Para entender isso, informe-se no help do Delphi sobre declarações > prévias > >> > (ou forward) de classes. Sim, pq melhor do que pegar algo pronto pra > uso é > >> > entender o que se recebe, certo:;) > >> > > >> > Boa sorte. > >> > > >> > Sds. > >> > > >> > > >> > To:delphi-br@yahoogrupos.com.br > <mailto:delphi-br%40yahoogrupos.com.br> > <mailto:delphi-br%40yahoogrupos.com.br> > > >> > From:marcosdoer...@gmail.com <mailto:marcosdoerner%40gmail.com> > <mailto:marcosdoerner%40gmail.com> > > >> > Date: Wed, 25 Aug 2010 22:13:10 + > >> > Subject: [delphi-br] Classe Recursiva > >> > > >> > > >> > Ola a todos, > >> > > >> > estou criando uma classe na minha regra de negocio mais ou menos da > >> > seguinte forma > >> > > >> > Type > >> > TminhaClasse = Class > >> > private > >> > atributo1 : string; > >> > atributo2 : string; > >> > atributo3 : string; > >> > classePai : TminhaClasse; > >> > public > >> > ... > >> > end; > >> > > >> > A minha duvida é como declaro o atributo classePai já que a minha > >> > TminhaClasse ainda não foi declarada. > >> > E a classePai pode conter ou não a estrutura e acaba sendo recursiva, > >> > o Pai pode ter um pai e assim por diante. > >> > > >> > Marcos > >> > > >> > > >> > > >> > [As partes desta mensagem que não continham texto foram removidas] > >> > > >> > > >> > > >> > > [As partes desta mensagem que não continham texto foram removidas] > > > > [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Classe Recursiva
No Object Pascal do Delphi 7, declarações forward são usadas com classes, interfaces, procedures e functions. Sds. De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Roni Rodrigo Enviada em: quinta-feira, 26 de agosto de 2010 19:28 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Classe Recursiva se eu não me engano, declarações forward são só para classes sim... o/ Em 26/08/2010 09:30, Diego Garcia escreveu: > eu tentei fazer isso com Record e não consegui... é somente com classe? > > *Diego Garcia* > Twitter:http://www.twitter.com/drgarcia1986 > > > Em 26 de agosto de 2010 09:20, Rubem Nascimento da Rocha< > djpardalro...@hotmail.com <mailto:djpardalrocha%40hotmail.com> > escreveu: > > >> > >> > >> > >> > Como diria a Oi, "Simples Assim!". >> > >> > type >> > TMinhaClasse = class; >> > >> > TMinhaClasse = class >> > private >> > fCampo1: string; >> > fCampo2: string; >> > fCampo3: string; >> > fObjetoPai: TMinhaClasse; >> > public >> > property ObjetoPai: TMinhaClasse read fObjetoPai write fObjetoPai; >> > end; >> > >> > Para entender isso, informe-se no help do Delphi sobre declarações prévias >> > (ou forward) de classes. Sim, pq melhor do que pegar algo pronto pra uso é >> > entender o que se recebe, certo:;) >> > >> > Boa sorte. >> > >> > Sds. >> > >> > >> > To:delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> >> > From:marcosdoer...@gmail.com <mailto:marcosdoerner%40gmail.com> >> > Date: Wed, 25 Aug 2010 22:13:10 + >> > Subject: [delphi-br] Classe Recursiva >> > >> > >> > Ola a todos, >> > >> > estou criando uma classe na minha regra de negocio mais ou menos da >> > seguinte forma >> > >> > Type >> > TminhaClasse = Class >> > private >> > atributo1 : string; >> > atributo2 : string; >> > atributo3 : string; >> > classePai : TminhaClasse; >> > public >> > ... >> > end; >> > >> > A minha duvida é como declaro o atributo classePai já que a minha >> > TminhaClasse ainda não foi declarada. >> > E a classePai pode conter ou não a estrutura e acaba sendo recursiva, >> > o Pai pode ter um pai e assim por diante. >> > >> > Marcos >> > >> > >> > >> > [As partes desta mensagem que não continham texto foram removidas] >> > >> > >> > >> > [As partes desta mensagem que não continham texto foram removidas] > [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Classe Recursiva
eu tentei fazer isso com Record e não consegui... é somente com classe? *Diego Garcia* Twitter: http://www.twitter.com/drgarcia1986 Em 26 de agosto de 2010 09:20, Rubem Nascimento da Rocha < djpardalro...@hotmail.com> escreveu: > > > > Como diria a Oi, "Simples Assim!". > > type > TMinhaClasse = class; > > TMinhaClasse = class > private > fCampo1: string; > fCampo2: string; > fCampo3: string; > fObjetoPai: TMinhaClasse; > public > property ObjetoPai: TMinhaClasse read fObjetoPai write fObjetoPai; > end; > > Para entender isso, informe-se no help do Delphi sobre declarações prévias > (ou forward) de classes. Sim, pq melhor do que pegar algo pronto pra uso é > entender o que se recebe, certo: ;) > > Boa sorte. > > Sds. > > > To: delphi-br@yahoogrupos.com.br > From: marcosdoer...@gmail.com > Date: Wed, 25 Aug 2010 22:13:10 + > Subject: [delphi-br] Classe Recursiva > > > Ola a todos, > > estou criando uma classe na minha regra de negocio mais ou menos da > seguinte forma > > Type > TminhaClasse = Class > private > atributo1 : string; > atributo2 : string; > atributo3 : string; > classePai : TminhaClasse; > public > ... > end; > > A minha duvida é como declaro o atributo classePai já que a minha > TminhaClasse ainda não foi declarada. > E a classePai pode conter ou não a estrutura e acaba sendo recursiva, > o Pai pode ter um pai e assim por diante. > > Marcos > > > > [As partes desta mensagem que não continham texto foram removidas] > > > [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> <*> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages <*> Para falar com o moderador, envie um e-mail para: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Classe Recursiva
ok obrigado, Marcos Em 26 de agosto de 2010 09:20, Rubem Nascimento da Rocha < djpardalro...@hotmail.com> escreveu: > > > > Como diria a Oi, "Simples Assim!". > > type > TMinhaClasse = class; > > TMinhaClasse = class > private > fCampo1: string; > fCampo2: string; > fCampo3: string; > fObjetoPai: TMinhaClasse; > public > property ObjetoPai: TMinhaClasse read fObjetoPai write fObjetoPai; > end; > > Para entender isso, informe-se no help do Delphi sobre declarações prévias > (ou forward) de classes. Sim, pq melhor do que pegar algo pronto pra uso é > entender o que se recebe, certo: ;) > > Boa sorte. > > Sds. > > > To: delphi-br@yahoogrupos.com.br > From: marcosdoer...@gmail.com > Date: Wed, 25 Aug 2010 22:13:10 + > Subject: [delphi-br] Classe Recursiva > > > Ola a todos, > > estou criando uma classe na minha regra de negocio mais ou menos da > seguinte forma > > Type > TminhaClasse = Class > private > atributo1 : string; > atributo2 : string; > atributo3 : string; > classePai : TminhaClasse; > public > ... > end; > > A minha duvida é como declaro o atributo classePai já que a minha > TminhaClasse ainda não foi declarada. > E a classePai pode conter ou não a estrutura e acaba sendo recursiva, > o Pai pode ter um pai e assim por diante. > > Marcos > > > > [As partes desta mensagem que não continham texto foram removidas] > > > [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> <*> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages <*> Para falar com o moderador, envie um e-mail para: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Classe Recursiva
sugiro que use o padrão de projeto "composite" http://pt.wikipedia.org/wiki/Composite http://sourcemaking.com/design_patterns/composite/delphi o/ Em 25/08/2010 19:13, marcosdoerner escreveu: > Ola a todos, > > estou criando uma classe na minha regra de negocio mais ou menos da > seguinte forma > > Type > TminhaClasse = Class > private > atributo1 : string; > atributo2 : string; > atributo3 : string; > classePai : TminhaClasse; > public > ... > end; > > A minha duvida é como declaro o atributo classePai já que a minha > TminhaClasse ainda não foi declarada. > E a classePai pode conter ou não a estrutura e acaba sendo recursiva, > o Pai pode ter um pai e assim por diante. > > Marcos