Clique para saber mais...
  Home     Download     Produtos / Cursos     Revista     Vídeo Aulas     Fórum     Contato   Clique aqui para logar | 06 de Outubro de 2026
  Login

Codinome
Senha
Salvar informações

 Esqueci minha senha
 Novo Cadastro

  Usuários
94 Usuários Online

  Revista ActiveDelphi
 Assine Já!
 Edições
 Sobre a Revista

  Conteúdo
 Apostilas
 Artigos
 Componentes
 Dicas
 News
 Programas / Exemplos
 Vídeo Aulas

  Serviços
 Active News
 Fórum
 Produtos / Cursos

  Outros
 Colunistas
 Contato
 Top 10

  Publicidade

  [Artigos]  O que são arquivos UDL?
Publicado por ActiveDelphi : Terça, Fevereiro 07, 2006 - 10:10 GMT-3 (4197 leituras)
Comentários comentar   Enviar esta notícia a um amigo Enviar para um amigo   Versão para Impressão Versão para impressão
Administrador UDL é a extensão mais apropriada para os arquivos de vinculação de dados usados na programação Delphi. Mas se é tão fácil ligar o Delphi a um banco de dados (falando-se dos componentes ADO), por que usar esse tipo de arquivo? Porque sem esses arquivos...

de vinculação o caminho para o banco de dados é passado para o arquivo executável (o BDE usa os famosos aliases para driblar este problema), o que deixa seu programa “frágil”.
   

Para fazer um arquivo UDL é fácil. Abra o bloco de notas e escreva:
 

[oledb]
provider = Microsoft.jet.oledb.4.0; data source = caminho do banco de dados; persistent security info = false (*).

 

    Pronto. Salve com a extensão UDL (por ser um arquivo de vinculação poderia ser a maioria das extensões, mas UDL é melhor).
 

    Agora no ADOConnection vá até a propriedade (Object Inspector) ConnectionString e coloque File Name = teste.UDL (supondo que o nome do arquivo seja teste e ele esteja no mesmo diretório do arquivo executável).
Agora seu sistema está mais flexível e se você mudar seu arquivo UDL e o seu programa muda automaticamente.
 

    No Delphi 5 essa solução não funcionará, pois o Delphi5 transforma o ConnectionString na string de conexão que realmente está em uso (a do arquivo UDL). Você terá que usar um componente TADOConnectionX e declarar:

private
  FUDLFile : string; // variável que guardará o caminho do arquivo UDL
protected
  procedure DoConnect : override;
  //sobrecarregando a função DOConnect para obedecer ao seu comando
published
  property UDLFile : string read FUDLFile write FUDLFile;
end;
procedure TADOConnectio.DoConnect;
begin
  If FUDLFile <> ‘’ then
    ConnectionString = ‘File Name’ + FUDLFile;
  inherited;
end;

 

(*) Para ficar mais fácil essa digitação de nomes estranhos faça o caminho normal no ConnectionString de CTRL+X e cole no bloco de notas.

Até a próxima.
Leandra - leandraleoa@ig.com.br



Comentários Comentários
   Ordem:  
Comentários pertencem aos seus respectivos autores. Não somos responsáveis pelo seus conteúdos.
  Edição 112

Revista ActiveDelphi

  50 Programas Fontes


  Produtos

Conheça Nossos Produtos

Copyright© 2001-2016 – Active Delphi – Todos os direitos reservados