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(dmCadastros) 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.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]

Responder a