Se vc quer um exemplo simples e pratico então
Baixe gratuitamente o meu exemplo do Borland conference 2006 q acabei de atualizar no code central. http://cc.codegear.com/Item/24209 desenvolvimento ntier no Delphi [e simples.. vc tem o banco(camada de persistência) cria um servidor de alica;ao no Delphi(camada de acesso a daddos) q basicamente [e iniciar um novo projeto e colocar nele RemoteDataModules. E depois colocar ele so o servi;co do Borland Socket Server(BSS), bastando pra siso instal-lo como serviço(scktsrvr.exe install). E por fim, fazer a aplicacao cliente se conectando no Server através do SocketConnection, configurando o host(ip), a porta(VS define ela no BSS, e por padrão vem a 211) e o Server(q e na verdade nomedoprojetoserver.nomedaclasse q vc vai preencher ou serão listados tds pra vc) Seria basicamente isso, e no mais sera um prazer ajudar, sinta-se a vontade de entrar em contato sempre que precisar. Abracos Bruno De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de ricardo_sx Enviada em: quinta-feira, 17 de maio de 2007 20:26 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] Programação em 3 camadas Bruno, agradeço a boa vontade em tentar auxiliar-me. Sobre o desejo de material, não procuro nada de alta performance ou distribuição geográfica. Sou um simples mortal aprendendo a programar rsrsrsrs. Eu, realmente, gostaria de algo prático Bruno. Gostaria de ver como é feito a programação em 3 camadas de uma forma clara e objetiva. No momento, não estou interessado na filosofia da Programação em 3 camadas. Quero deixar claro que isso não é crítica alguma e, sim, uma necessidade iminente da minha pessoa. Eu passei a forma como estou fazendo a minha "progamação em 3 camadas", está aí embaixo. Gostaria realmente de saber se estou certo ou não. Se estou errado, queria ver como é o correto. Posso até ler algo teórico, mas necessito mesmo é ver como é escrito em 3 camadas no delphi. Atc., Ricardo --- Em delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> , "Bruno Lichot" <[EMAIL PROTECTED]> escreveu > > Se vc quer material sobre desenvolvimento n-tier voltado para aplicações > comerciais, de alta performance e distribuição geográfica, > > > > O grupo de discussão que vc deve entrar é [EMAIL PROTECTED] <mailto:nddv%40yahoogrupos.com.br> > > > > E tem Tb o meu link de downloads gratuitos(abaixo da minha assinatura) com > bastante material sobre o assunto. > > > > E na minha opinião a melhor referencia de desenvolvimento n-tier esta no > help do Delphi. > > > > > > Abraços, > > > > Bruno Lichot > > CodeGegar Product Evangelist > > > > http://www.codegear.com > > http://cc.codegear.com/Author/795118 > > > > > > > > De: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> [mailto:delphi- [EMAIL PROTECTED] <mailto:br%40yahoogrupos.com.br> ] Em > nome de ricardo_sx > Enviada em: quarta-feira, 16 de maio de 2007 13:06 > Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> > Assunto: [delphi-br] Programação em 3 camadas > > > > Gostaria de saber do grupo, se alguém tem conhecimento de um site que > contenha material didático e prático de como escrever programas em 3 > camadas no delphi? Pois estou fazendo o projeto final de curso e, a > forma que estou utilizando, já me falaram que está errada. Segue um > exemplo de como estou fazendo em "3 camadas": > > no form: > ObjTeste.nome:=EdtNome.text; > if (ObjTeste.cadastrar) then > showmessage('cadastrado com sucesso'); > > na classe: > > type TUCTeste = class > private > Fnome:string; > public > property nome:string read Fnome write Fnome; > function cadastrar:boolean; > ... > > function TUCTeste.cadastrar:boolean; > begin > result:=DtmBanco.cadastrar(self); > end; > > no DataModule: > > function TDtmBanco.cadastrar(obj:TUCTeste):boolean; > begin > result:=false; > try > sqlTeste.close; > sqlTeste.sql.clear; > sqlTeste.sql.add('INSERT INTO TESTANDO'); > sqlTeste.sql.add('(Nome)'); > sqlTeste.sql.add('VALUES(:pNome)'); > sqlTeste.parambyname('pNome').value:=obj.nome; > ... > > except raise; > end; > end; > > Espero que eu tenha sido claro nas informações para que possam > entender e me auxiliar da melhor maneira possível, pois confio nas > informações prestadas pelos colaboradores dessa lista. > > Grato, > Ricardo > > > > __________ Informação do NOD32 IMON 2264 (20070514) __________ > > Esta mensagem foi verificada pelo NOD32 sistema antivírus > http://www.eset.com.br > > > > [As partes desta mensagem que não continham texto foram removidas] > __________ Informação do NOD32 IMON 2275 (20070517) __________ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]
