Ai está...

procedure Cria_Alias;
begin
  if Session.IsAlias('Clientes') = False then begin
  
Session.AddStandardAlias('Clientes',ExtractFilePath(Application.ExeName)+'Dados','Paradox');
  Session.SaveConfigFile;
  end;
end;

procedure Deleta_Alias;
begin
  Session.DeleteAlias('Clientes');
  Session.SaveConfigFile;
end;

Mas começe a planejar a alteração de banco de dados para um relacional, como 
Firebird que é free ou o interbase...



  ----- Original Message ----- 
  From: Anderson 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Saturday, September 24, 2005 11:51 PM
  Subject: [delphi-br] Informação


  Se vc poder me mandar... 

  Anderson 


  Jeito tem... vc pode fazer com que em cada vez que ele inicializar verificar 
  se o alias existe, se ele não existir ele o cria dinamicamente... 
  se vc quiser a função qwue faz isso me avise que eu te mando 
  ----- Original Message ----- 
  From: "Anderson" <[EMAIL PROTECTED]> 
  To: "Grupo Delphi" <delphi-br@yahoogrupos.com.br> 
  Sent: Friday, September 23, 2005 4:34 PM 
  Subject: [delphi-br] Informação 


  Aes Pessoal... 

  Desenvolvi um sistema utilizando bd paradox... 
  Só que eu queria entregar para o cliente apenas o executável e as tabelas, e 
  o mesmo ao clicar no executável já rodar o sistema... ao invés de precisar 
  criar o alias e configurar para rodar em rede... 
  Alguém sabe se é possível fazer isso? 
  Pois tive reclamações por causa disso (o cliente achava muito complicado ter 
  que configurar o alias e fazer todo o processo para que o sistema rode) 

  Anderson 
  Rio Claro-SP 

  [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: 
  [EMAIL PROTECTED] ou [EMAIL PROTECTED] 

  Links do Yahoo! Grupos 










  -- 
  No virus found in this incoming message. 
  Checked by AVG Anti-Virus. 
  Version: 7.0.344 / Virus Database: 267.11.6/111 - Release Date: 23/09/2005 








  _______________________________________________________ 
  Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e 
  muito mais. Instale agora! 
  www.yahoo.com.br/messenger/ 


  -- 
  <<<<< 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: 
  [EMAIL PROTECTED] ou [EMAIL PROTECTED] 





  Yahoo! Grupos, um serviço oferecido por: 



  
--------------------------------------------------------------------------------
 
  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: 
  [EMAIL PROTECTED] 

  O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
  Yahoo!. 

  ---------- 


  [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:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



        Yahoo! Grupos, um serviço oferecido por: 
          


------------------------------------------------------------------------------
  Links do Yahoo! Grupos

    a.. Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/
      
    b.. Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]
      
    c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




------------------------------------------------------------------------------


  No virus found in this incoming message.
  Checked by AVG Anti-Virus.
  Version: 7.0.344 / Virus Database: 267.11.6/111 - Release Date: 23/09/2005



[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:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
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:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a