[delphi-br] Re: URGENTE: Gravar e Ler imagem no banco MYSQL

2009-01-20 Por tôpico Carlos
Meu camarada, boa noite! Estou te enviando anexo, em pvt, pequeno
exemplo onde gravo, exibo e excluo uma imagem.
Qualquer dúvida, volte a postar!
Fraterno abraço,
Carlos



[delphi-br] Re: Urgente ! - Dúvida DblookupComboBox

2008-09-12 Por tôpico Carlos
Bom dia meu camarada! Pelo que entendi, ao adicionar um novo produto,
vc quer que ele seja exibido no DbLookupComboBox e ele não está
mostrando, mas os itens que já constavam no cadastro de produtos sim.
Então ao gravar um produto na tabela, deve ser dado um refresh para
atualizar os dados.
Espero ter ajudado.

Fraterno abraço,
Carlos



[delphi-br] Re: URGENTE - Converte projeto CLX para VCL

2008-06-25 Por tôpico Jorge Ericsson
 Olá amigos, estou precisando de algumas dicas para migrar um sistema de CLX
 para VCL com certa urgência.

 Alguém já experimentou tal proeza ou conheci alguma ferramenta paga ou free
 que faça isso ?

 Valew pessoal.




[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Re: URGENTE: Consulta incremental LIKE

2008-05-06 Por tôpico Leandro A. Nunes
use a o 
BETWEEN 









  - Original Message - 
  From: Jorge Ericsson 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, May 05, 2008 3:24 PM
  Subject: Re: [delphi-br] Re: URGENTE: Consulta incremental LIKE


  Na verdade eu andei verificando a minha situação e o like não resolve o meu
  problema.

  Eu preciso usar a claúsula IN para retorna dados entre determinando
  intervalo da seguinte forma:

  select co_agrupado from tabela where co_agrupado in ['A001'..'A999'], onde
  ele precisa me retornar todos os registro dentro desse intervalo tipo:

  A119|B333|C8282|D822
  A113|B323|A003|D8292
  A559|B343|C223|D6552

  Obs: Esse select eu não tó conseguindo montar.

  Valew pessoal

  2008/5/5 carlos alberto do amaral [EMAIL PROTECTED]:

   Olá Jorge,
  
   Bom, pelo menos no exemplo, não vejo a necessidade de utilização
   do upper... Cuidado, dependendo da situação, vc terá que criar um
   índice para a consulta com a função... Seria interessante, gravar já
   com o upper para evitar transtornos...
  
   Quando vc utiliza um select assim: Select co_agrupado from tabela
   where
   upper(co_agrupado) like Vc tem que ter um índice com a função
   upper, correndo o risco de caso não tê-lo, o banco fazer um full scan
   na table... Claro, caso a sua table tenha muitas linhas...
  
   Por que não assim ??
  
   Select co_agrupado from tabela where
   co_agrupado like '%E668%A668%D654%C333%';
  
   Um abraço,
  
   Carlos
  
   P.S.: A primeira vez que vi desta forma o like, foi aqui na lista...
  
   --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br,
   Jorge Ericsson
   [EMAIL PROTECTED] escreveu
  
   
Olá amigos delphianos,
   
Meio confuso meu problema, mas crio que a solução está apenas na
   monstagem
da minha instrução SQL.
   
Bom, eu estou com um problema de pesquisa incremental genérica pois
   utilizo
uma aplicação que pode retorna informções de 3 bancos Firebird,
   PostgreeSql
e Oracle ao mesmo tempo.
   
Na minha tabela eu possuo campos da seguinte forma:
   
CO_AGRUPADO
A124|B545|C785|D999|E478
*A334|B767|C333|D354|E809
B786|A792|D654|C333|E668
*
Eu gostaria de ao pesquisar por um código tipo E668A334D654C333 -
   sem
informa a barra de divisão - ele me retornasse por exemplo a *2ª e
   3ª
linhas de registro apenas*, ignorando a 1ª linha pois não existem
   nenhuma
informação nela que atenda a solicitação do usuário.
   
Eu tentei da seguinte forma:
   
Select co_agrupado from tabela where
upper(co_agrupado) like upper(E668) or
upper(co_agrupado) like upper(A668) or
upper(co_agrupado) like upper(D654) or
upper(co_agrupado) like upper(C333)
   
Mas, apresenta problemas na montagem do FILTER nos componentes
   usando
Zeos(Firebird), ADO(Oarcle) e DBExpress(PostgreSql) dando erro.
   
Alguém poderia dar uma dica ?
   
Valew pessoal
   
Att,
   
Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsson.com.br
61 9227.4785 / 3967.6172
Brasília - DF
   
   
[As partes desta mensagem que não continham texto foram removidas]
   
  
   
  

  -- 
  Att,

  Jorge Ericsson S. Pinheiro
  Analista/Projetista de Sistemas
  Ericsson Sistemas e Soluções
  http://www.jericsson.com.br
  61 9227.4785 / 3967.6172
  Brasília - DF

  [As partes desta mensagem que não continham texto foram removidas]



   

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Re: URGENTE: Consulta incremental LIKE

2008-05-05 Por tôpico carlos alberto do amaral
Olá Jorge,

   Bom, pelo menos no exemplo, não vejo a necessidade de utilização 
do upper...   Cuidado, dependendo da situação, vc terá que criar um 
índice para a consulta com a função...  Seria interessante, gravar já 
com o upper para evitar transtornos...

  Quando vc utiliza um select assim:  Select co_agrupado from tabela 
where
 upper(co_agrupado) like   Vc tem que ter um índice com a função 
upper, correndo o risco de caso não tê-lo, o banco fazer um full scan 
na table...  Claro, caso a sua table tenha muitas linhas...

Por que não assim ??

 Select co_agrupado from tabela where
   co_agrupado like '%E668%A668%D654%C333%';



  Um abraço,

   Carlos

P.S.: A primeira vez que vi desta forma o like, foi aqui na lista...


--- Em delphi-br@yahoogrupos.com.br, Jorge Ericsson 
[EMAIL PROTECTED] escreveu

 Olá amigos delphianos,
 
 Meio confuso meu problema, mas crio que a solução está apenas na 
monstagem
 da minha instrução SQL.
 
 Bom, eu estou com um problema de pesquisa incremental genérica pois 
utilizo
 uma aplicação que pode retorna informções de 3 bancos Firebird, 
PostgreeSql
 e Oracle ao mesmo tempo.
 
 Na minha tabela eu possuo campos da seguinte forma:
 
 CO_AGRUPADO
 A124|B545|C785|D999|E478
 *A334|B767|C333|D354|E809
 B786|A792|D654|C333|E668
 *
 Eu gostaria de ao pesquisar por um código tipo E668A334D654C333 - 
sem
 informa a barra de divisão -  ele me retornasse por exemplo a *2ª e 
3ª
 linhas de registro apenas*, ignorando a 1ª linha pois não existem 
nenhuma
 informação nela que atenda a solicitação do usuário.
 
 Eu tentei da seguinte forma:
 
 Select co_agrupado from tabela where
 upper(co_agrupado) like upper(E668) or
 upper(co_agrupado) like upper(A668) or
 upper(co_agrupado) like upper(D654) or
 upper(co_agrupado) like upper(C333)
 
 Mas, apresenta problemas na montagem do FILTER nos componentes 
usando
 Zeos(Firebird), ADO(Oarcle) e DBExpress(PostgreSql) dando erro.
 
 Alguém poderia dar uma dica ?
 
 Valew pessoal
 
 Att,
 
 Jorge Ericsson S. Pinheiro
 Analista/Projetista de Sistemas
 Ericsson Sistemas e Soluções
 http://www.jericsson.com.br
 61 9227.4785 / 3967.6172
 Brasília - DF
 
 
 [As partes desta mensagem que não continham texto foram removidas]





Re: [delphi-br] Re: URGENTE: Consulta incremental LIKE

2008-05-05 Por tôpico Jorge Ericsson
Na verdade eu andei verificando a minha situação e o like não resolve o meu
problema.

Eu preciso usar a claúsula IN para retorna dados entre determinando
intervalo da seguinte forma:

select co_agrupado from tabela where co_agrupado in ['A001'..'A999'], onde
ele precisa me retornar todos os registro dentro desse intervalo tipo:

A119|B333|C8282|D822
A113|B323|A003|D8292
A559|B343|C223|D6552

Obs: Esse select eu não tó conseguindo montar.

Valew pessoal



2008/5/5 carlos alberto do amaral [EMAIL PROTECTED]:

   Olá Jorge,

 Bom, pelo menos no exemplo, não vejo a necessidade de utilização
 do upper... Cuidado, dependendo da situação, vc terá que criar um
 índice para a consulta com a função... Seria interessante, gravar já
 com o upper para evitar transtornos...

 Quando vc utiliza um select assim: Select co_agrupado from tabela
 where
 upper(co_agrupado) like Vc tem que ter um índice com a função
 upper, correndo o risco de caso não tê-lo, o banco fazer um full scan
 na table... Claro, caso a sua table tenha muitas linhas...

 Por que não assim ??

 Select co_agrupado from tabela where
 co_agrupado like '%E668%A668%D654%C333%';

 Um abraço,

 Carlos

 P.S.: A primeira vez que vi desta forma o like, foi aqui na lista...

 --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br,
 Jorge Ericsson
 [EMAIL PROTECTED] escreveu

 
  Olá amigos delphianos,
 
  Meio confuso meu problema, mas crio que a solução está apenas na
 monstagem
  da minha instrução SQL.
 
  Bom, eu estou com um problema de pesquisa incremental genérica pois
 utilizo
  uma aplicação que pode retorna informções de 3 bancos Firebird,
 PostgreeSql
  e Oracle ao mesmo tempo.
 
  Na minha tabela eu possuo campos da seguinte forma:
 
  CO_AGRUPADO
  A124|B545|C785|D999|E478
  *A334|B767|C333|D354|E809
  B786|A792|D654|C333|E668
  *
  Eu gostaria de ao pesquisar por um código tipo E668A334D654C333 -
 sem
  informa a barra de divisão - ele me retornasse por exemplo a *2ª e
 3ª
  linhas de registro apenas*, ignorando a 1ª linha pois não existem
 nenhuma
  informação nela que atenda a solicitação do usuário.
 
  Eu tentei da seguinte forma:
 
  Select co_agrupado from tabela where
  upper(co_agrupado) like upper(E668) or
  upper(co_agrupado) like upper(A668) or
  upper(co_agrupado) like upper(D654) or
  upper(co_agrupado) like upper(C333)
 
  Mas, apresenta problemas na montagem do FILTER nos componentes
 usando
  Zeos(Firebird), ADO(Oarcle) e DBExpress(PostgreSql) dando erro.
 
  Alguém poderia dar uma dica ?
 
  Valew pessoal
 
  Att,
 
  Jorge Ericsson S. Pinheiro
  Analista/Projetista de Sistemas
  Ericsson Sistemas e Soluções
  http://www.jericsson.com.br
  61 9227.4785 / 3967.6172
  Brasília - DF
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 

 




-- 
Att,

Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsson.com.br
61 9227.4785 / 3967.6172
Brasília - DF


[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Re: Urgente - Componente para Comunicação Remota Free com fontes

2007-10-30 Por tôpico jadirconsult
Bom dia a todos !

Amigão, eu uso o LogMein.com estou gostando muito !!

é quase um VNC !

vc poderia enviar o link onde vc achou o DelphiVnc para Delphi ?


Muito Obrigado !

--- Em delphi-br@yahoogrupos.com.br, Jorge Ericsson 
[EMAIL PROTECTED] escreveu

 Olá pessoal,
 
 Gostaria de implementar em minha aplicação um controle de acesso 
remoto,
 para dár suporte a distância aos meus clientes.
 
 Alguém poderia dar-me alguma informação a respeito de algum 
componente ou
 mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ?
 Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho 
alguns
 clientes com certas restrições de uso desses programas e que não 
possuem
 permissão para tal procedimento.
 
 Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e 
VNCClient para
 delphi, mas ao compilar essas aplicações são gerados vários 
problemas com a
 versão nova do Indy(10 e 9) que possuo.
 
 Alguém poderia daar-me a direção das pedras ?
 
 Value
 
 -- 
 Jorge Ericsson S. Pinheiro
 Analista/Projetista de Sistemas
 Ericsson Sistemas e Soluções
 http://www.jericsson.com.br
 61 9227.4785 / 3965.2992 / 3039.1768
 Brasília - DF
 
 
 [As partes desta mensagem que não continham texto foram removidas]





[delphi-br] Re: urgente

2006-11-01 Por tôpico edu_ccp2005
Bom dia a todos! Sou novo no grupo e ainda estou me situando quanto as
mensagens. Achei esta em que o assunto envolve dúvidas com o
DevExpress e resolvi aproveitar a oportunidade para tentar esclarecer
uma dúvida minha.

É o seguinte.. estou trabalhando em cima de um programa que está com
um tamanho MTO grande, portanto são usadas VÁRIAS BPLs para diminuir o
exe e assim poder rodar também em Windows 98.
Ainda com as BPLs, o exe está mto grande e está no limite de aceitação
do Win 98, mas o maior problema é o seguinte...
Na tela principal do sistema, é usado um componente TdxNavBar, que nas
máquinas com Win XP funcionam perfeitamente, porém em Win 98 está
MITO lento!! Lento a ponto de não ser usual!
Gostaria de saber o que eu poderia fazer para que isto funcione numa
velocidade aceitável...

Desde já, agradeço a todos!
Eduardo S. Marçal


--- Em delphi-br@yahoogrupos.com.br, Daniel Bastos [EMAIL PROTECTED]
escreveu

 Posta aqui na lista as suas dúvidas aqui tem muita gente que
trabalhou
 ou trabalha com dev e 2006 (como eu :- )
 
 Em 30/10/06, alan_adolfo2 [EMAIL PROTECTED] escreveu:
 
  Espto procurando pessoas que programão em Delphi 2006 e que utiliza
  coponentes DEV Express, para tirar duvidas de programação.
  sobre os componentes.
 
 
  
 
 
 
 [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]
 
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

 



Re: [delphi-br] Re: Urgente: Meu Del phi não consegue compilar mais nada!

2005-07-01 Por tôpico Lipe
eu não fiz o backup. Eu procurei os arquivos antes, mas notei que eles não 
estavam na mesma pasta lib, como os arquivos de tradução não 
sobreescreveriam os originais, pensei não haver problema. Acho que você tem 
razão, o arquivo de tradução deve ser de outro delphi.
Eu consegui corrigir o problema, desinstalando e reinstalando o delphi. Mas 
o susto que levei quando não conseguia compilar mais nada foi terrível, rsrs
[]'s

Em 30/06/05, Osmar de Souza Júnior [EMAIL PROTECTED] escreveu:
 
 
 Sim filho, e você não fez backup dos arquivos originais do Delphi em
 inglês ???
 
 Esses arquivos de tradução tem que tomar cuidado. O primeiro passo é
 verificar se esses arquivos são confiáveis. Eu já vi um que dizia que
 era os arquivos de tradução do Delphi 7, mas na verdade era do 6, o
 cara só tinha renomeado os arquivos.
 
 E como eu disse, antes de substituir os arquivos na pasta de
 instalação do Delphi, tem que fazer backup dos originais. Senão vai
 ter que reinstalar...
 
 --- Em delphi-br@yahoogrupos.com.br, Lipe [EMAIL PROTECTED] escreveu
  Galera,
  de novo eu preciso da ajuda de vocês. Agora a pouco eu instalei um
 pacote
  que traduz as mensagens do Delphi 5 pra portugues. Até aí tudo bem,
 coloca
  na pasta lib, depois no projeto usa-se build all, porém, agora nenhum
  arquivo meu que acesse banco de dados está sendo compilado, todas as
 vezes
  fica exibindo a seguinte mensagem:
  [Fatal Error] Unit1.pas(7): Unit Db was compiled with a different
 version
  of DbConsts.SFieldNotFound
  [Fatal Error] Unit1.pas(7): Unit DBCommon was compiled with a different
  version of DbConsts.SFieldNotFound
  [Fatal Error] Unit1.pas(7): Unit Db was compiled with a different
 version of
  DbConsts.SFieldNotFound
  [Fatal Error] Unit1.pas(7): Unit DBCommon was compiled with a different
  version of DbConsts.SFieldNotFound
  Tentei apagar os arquivos que tinha colocado na pasta lib, e usar
 build all
  de novo mas não deu certo. Tentei também reinstalar o delphi, mas
 também não
  funcionou. Alguém sabe uma maneira de corrigir isso? É muito
 importante,
  pois tenho um sistema para entregar e não consigo compilá-lo.
  Desde já agradeço pela ajuda!
  []'s
 
 
  [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
 
 
 
 



[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

 





[delphi-br] Re: Urgente: Meu Delphi não consegue compilar mais nada!

2005-06-30 Por tôpico Osmar de Souza Júnior

Sim filho, e você não fez backup dos arquivos originais do Delphi em
inglês ???

Esses arquivos de tradução tem que tomar cuidado. O primeiro passo é
verificar se esses arquivos são confiáveis. Eu já vi um que dizia que
era os arquivos de tradução do Delphi 7, mas na verdade era do 6, o
cara só tinha renomeado os arquivos.

E como eu disse, antes de substituir os arquivos na pasta de
instalação do Delphi, tem que fazer backup dos originais. Senão vai
ter que reinstalar...

--- Em delphi-br@yahoogrupos.com.br, Lipe [EMAIL PROTECTED] escreveu
 Galera,
 de novo eu preciso da ajuda de vocês. Agora a pouco eu instalei um
pacote 
 que traduz as mensagens do Delphi 5 pra portugues. Até aí tudo bem,
coloca 
 na pasta lib, depois no projeto usa-se build all, porém, agora nenhum 
 arquivo meu que acesse banco de dados está sendo compilado, todas as
vezes 
 fica exibindo a seguinte mensagem:
  [Fatal Error] Unit1.pas(7): Unit Db was compiled with a different
version 
 of DbConsts.SFieldNotFound
 [Fatal Error] Unit1.pas(7): Unit DBCommon was compiled with a different 
 version of DbConsts.SFieldNotFound
 [Fatal Error] Unit1.pas(7): Unit Db was compiled with a different
version of 
 DbConsts.SFieldNotFound
 [Fatal Error] Unit1.pas(7): Unit DBCommon was compiled with a different 
 version of DbConsts.SFieldNotFound
  Tentei apagar os arquivos que tinha colocado na pasta lib, e usar
build all 
 de novo mas não deu certo. Tentei também reinstalar o delphi, mas
também não 
 funcionou. Alguém sabe uma maneira de corrigir isso? É muito
importante, 
 pois tenho um sistema para entregar e não consigo compilá-lo.
  Desde já agradeço pela ajuda!
 []'s
 
 
 [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

 




[delphi-br] Re: Urgente Index is out of date

2005-04-06 Por tôpico Edison Garcia


Ola Telma
Tentei subir o arquivo Pdxrbld para a seção arquivos do grupo, mas 
foi negado por falta de espaço.  Tenho este utilitário  ( qe não é de 
minha autoria) mas é freewere, e que checa e corrige tabelas 
paradox.  Rápido, facílimo de utilizar.  Se quizer, me mande um e-
mail informando o seu, que poderei envia-lo para voce.
[]s  Edison

--- Em delphi-br@yahoogrupos.com.br, telma woerle [EMAIL PROTECTED] 
escreveu
 Oi Pessoal,
  
 o banco de dados paradox do meu cliente está dando o problema 
de index is out of date em uma das tabelas. Tem alguma forma de 
corrigir esse problema via programação em delphi? Eu tenho uma função 
q recria os indices mas quando ocorre este problema ela não funciona. 
Ou o unico meio de resolver isso é apagando todos os arquivos menos o 
db e criando os indices de novo pelo database desktop?
  
 desde agradeço a  ajuda
  
 Telma
 
   
 -
 Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador 
agora!
 
 [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

 





[delphi-br] Re: Urgente - Criar Alias Paradox no arquivo de instalação

2005-02-24 Por tôpico Luiz Henrique Severo d Oliveira

Telma,

Não sei se vai te ajudar mas esta rotina cria ou atrualiza o alias dentro do 
programa. Acho melhor do que criar pelo Inno.

procedure TDataModule.DataModuleCreate(Sender: TObject);
var
  AParams: TStringList;
  Dir: string;
begin
  If Session1.IsAlias('DB') Then
  Begin
AParams := TStringList.Create;
try
  // get the current parameters
  Session.GetAliasParams('DB',AParams);

  Dir := Copy(AParams.Strings[0],6,255);

  // Update the alias parameters
  AParams.Clear;
  AParams.Add('PATH=' + Dir);
  Session1.ModifyAlias('DB',AParams);

  Session1.SaveConfigFile;
finally
  AParams.Free;
end;
  End
  Else
Session1.AddStandardAlias('DB', 'C:\AMS2005\', 'Paradox');

  AbreBanco;
end;


Abraços
Luiz Henrique Severo d Oliveira
RPG Soluçoes
www.rpgsolucoes.com.br

 
  Mensagem: 20
  Data: Thu, 24 Feb 2005 09:29:35 -0300 (ART)
De: telma woerle [EMAIL PROTECTED]
   Assunto: Urgente - Criar Alias Paradox no arquivo de instalação
 
 Oi Pessoal,
  
 estou precisando de um script do inno setup para criar o alias no BDE para 
 Paradox o sistema q usa o alias foi desenvolvido em Delphi. Já tive esse 
 problema outra vez e com a ajuda de vcs eu consegui resolver mas tive alguns 
 problemas com a minha maquina e acabei perdendo o modelo. Se puderem me 
 ajudar novamente eu agradeceria... 
  
 obrigada
  
 Telma



-- 
 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

 





Re: [delphi-br] Re: Urgente - Criar Alias Paradox no arquivo de instalação

2005-02-24 Por tôpico telma woerle

O Luiz,
 
obrigada, mas eu preciso q seja pelo inno setup mesmo pq eu tenho o mesmo 
sistema funcionando em rede na empresa e instalado no notebook dos vendedores 
então fica complicado configurar o alias no próprio sistema
 
Telma

Luiz Henrique Severo d Oliveira [EMAIL PROTECTED] wrote:
Telma,

Não sei se vai te ajudar mas esta rotina cria ou atrualiza o alias dentro do 
programa. Acho melhor do que criar pelo Inno.

procedure TDataModule.DataModuleCreate(Sender: TObject);
var
  AParams: TStringList;
  Dir: string;
begin
  If Session1.IsAlias('DB') Then
  Begin
AParams := TStringList.Create;
try
  // get the current parameters
  Session.GetAliasParams('DB',AParams);

  Dir := Copy(AParams.Strings[0],6,255);

  // Update the alias parameters
  AParams.Clear;
  AParams.Add('PATH=' + Dir);
  Session1.ModifyAlias('DB',AParams);

  Session1.SaveConfigFile;
finally
  AParams.Free;
end;
  End
  Else
Session1.AddStandardAlias('DB', 'C:\AMS2005\', 'Paradox');

  AbreBanco;
end;


Abraços
Luiz Henrique Severo d Oliveira
RPG Soluçoes
www.rpgsolucoes.com.br

 
  Mensagem: 20
  Data: Thu, 24 Feb 2005 09:29:35 -0300 (ART)
De: telma woerle [EMAIL PROTECTED]
   Assunto: Urgente - Criar Alias Paradox no arquivo de instalação
 
 Oi Pessoal,
  
 estou precisando de um script do inno setup para criar o alias no BDE para 
 Paradox o sistema q usa o alias foi desenvolvido em Delphi. Já tive esse 
 problema outra vez e com a ajuda de vcs eu consegui resolver mas tive alguns 
 problemas com a minha maquina e acabei perdendo o modelo. Se puderem me 
 ajudar novamente eu agradeceria... 
  
 obrigada
  
 Telma



-- 
 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: São Paulo Rio de Janeiro Curitiba 
Porto Alegre Belo Horizonte Brasília 

-
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!. 



-
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! 
agora.

[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

 





[delphi-br] Re: Urgente!!!! Record not found or Changed by Another User

2004-09-17 Por tôpico Claus
Vc está setando as ProviderFlags ?

[]´s
Claus

--- Em [EMAIL PROTECTED], Marcelo de Oliveira 
[EMAIL PROTECTED] escreveu
 Tenho uma tela simples de cadastro de pedidos, os componentes 
de 
 conexão são : SqlDataSet, DataSetProvider, ClientDataset e um 
 DataSource. O banco utilizado é o FB 1.0 e utilizo o D7 Enterprise. 
 
 Após a chamada ao método ApplyUpdates(0) em uma inclusão de 
 apenas um simples registro, por um acaso, logo em seguida a 
inclusão 
 o usuário seleciona o botão excluir (comando Delete, seguido de um 
 ApplyUpdates(0)). 
 
   É exibida a msg  Record not found or Changed by Another 
 User. Eu acabei de incluir a #$%* do regitro e etou vendo ele na 
 tela! Por que aparece esta msg? O mesmo acontece quando chamo o 
 ApplyUpdates(0) em uma edição!
 
 Tentei após gravar o registro chamar o método Refresh, o 
 registro simplesmente some da tela! Todos os campos ficam 
totalmente 
 em branco! 
 
   Só consegui resolver isso guardando antes de incluir a chave 
 primária, chamar ApplyUpdates(0), fechar o cds, passar como 
 parâmetro a chave que acabou de ser incluída e abrir. Ai funciona 
 tanto a exclusão como a alteração, mas não acredito que isso seja o 
 correto.
 
 Ficarei muito agradecido a todos que puderem ajudar, estou com 
o 
 projeto totalmente parado devido a este comportamento.
 
   Um forte abraço a todos,
 
 Marcelo de Oliveira.



-- 
 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