Pessoal !!! URGENTE !!
Respondam ai !! Estão pensando o que ?? Se ele perguntou tem que responder e rápido !!! Berdam escreveu: > será que isso é tão difícil assim galera, ou o pessoal que sabe não quer > responder?? > > Jean Barreiros <[EMAIL PROTECTED]> escreveu: Cara > aho que basta você usar isso: > if not Assigned(dmCadastros) then > dmCadastros := TdmCadastros. Create(Self) ; > Jean Barreiros > Programador/Web-Designer > Delphi, C++, PHP, JavaScript > FireBird/InterBase, MySql, SQLServer, PostGree, Oracle > msn: [EMAIL PROTECTED] > e-mail: [EMAIL PROTECTED] > > ----- Mensagem original ---- > De: Berdam <[EMAIL PROTECTED]> > Para: Delphi <delphi-br@yahoogrupos.com.br> > Enviadas: Sexta-feira, 30 de Maio de 2008 9:46:01 > Assunto: [delphi-br] Criando dm > > Galera, eu tenho que testar se o dm está criado ou não, eu fiz essa função > abaixo, tem alguma maneira de fazer isso genérico?? > > Será que não tem alguma maneira de criar o dm apenas passando nome, eu até > fiz a função, mas não fui pra frente no momento em que testo o tipo dele > (Tdatamodule) , alguém por favor pode dar uma ajuda?? > > procedure TFSinprod.CriaDm( dm:String) ; > begin > if dm = 'dmcadastros' then > if not Assigned(dmCadastro s) then > begin > dmCadastros := TdmCadastros. Create(Self) ; > end > end; > > ------------ --------- --------- --------- --------- --------- - > Uberdam Cavaletti > Formado em Tecnologia da Informação - Unoesc - Xxe > Pós-graduado em desenvolvimento Java - Unoesc - Xxe > > ------------ --------- --------- --- > http://www.curricul ar.com.br/ berdam > > Visite > http://passandovene no.blogspot. com > ------------ --------- --------- --------- --------- --------- - > > ------------ --------- --------- --- > Abra sua conta no Yahoo! Mail, o único sem limite de espaço para > armazenamento! > > [As partes desta mensagem que não continham texto foram removidas] > > Abra sua conta no Yahoo! Mail, o único sem limite de espaço para > armazenamento! > http://br.mail.yahoo.com/ > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > ---------------------------------------------------------------------------------------- > Uberdam Cavaletti > Formado em Tecnologia da Informação - Unoesc - Xxe > Pós-graduado em desenvolvimento Java - Unoesc - Xxe > > > --------------------------------- > http://www.curricular.com.br/berdam > > Visite > http://passandoveneno.blogspot.com > ---------------------------------------------------------------------------------------- > > > --------------------------------- > Abra sua conta no Yahoo! Mail, o único sem limite de espaço para > armazenamento! > > [As partes desta mensagem que não continham texto foram removidas] > > > ------------------------------------ > >
