Re: [delphi-br] erros internos Delphi: URW e Stack Overflow no Compilador

2008-10-28 Por tôpico Oswaldo dos Santos Araujo
Esse projeto tem mais de 10 anos, sendo constantemente atualizado. Já
compilei em outras versões. Já apaguei, mas qq coisa que eu faça sempre dá
no mesmo erro. Até agora...



2008/10/28 Onjahyr - GMAIL [EMAIL PROTECTED]

   Alguma vez você conseguiu compilar usando o Delphi 7 (nestas máquinas 2
 Duo)?
 Por acaso já tentou apagando as .DCU e o .RES? Depois disso fechar o
 delphi e abri-lo novamente...

 oswaldosaraujo escreveu:

 
  Olá amigos
 
  Boa Noite!
 
  Faz uns 10 dias que eu tento contornar um problema no Delphi e não
  consigo. De uma hora para outra não consigo mais compilar meu
  principal projeto.
 
  Ele abriu uma janela chamada Danger com uma mensagem Stack
  Overflow. Save your work and restart Delphi. e em algumas vezes
  algumas mensagens Internal Error URW com um número que varia 3237,
  depois 3235.
 
  Eu já coloquei isto em 5 máquinas diferentes (um Core 2 Duo e 4 Dual
  Core) , desinstalei e reinstalei o Delphi, reinstalei o Jedi na última
  versão 3.34. Tentei criar pacotes e isolar partes do sistema. Além de
  começar a refazer o projeto do 0 umas duas vezes. Tem uns 500
  formulários no projeto. A maioria deles faz referencia à constantes
  tipadas do formulário principal, algo como o nome do escritório, um
  código de cliente atual, o usuário logado. Ele ainda usa BDE e paradox.
 
  Já tentei compilar direto da linha de comando para ver o que acontecia
  e dá um erro no compilador.
 
  Usei Delphi 6 Pro e 7 Enterprise, ambos atualizados. Retirei o que
  havia do antigo RXLIB e tirei algumas referencias múltiplas em
  formulários de busca com diversos forms chamadores, todos com
  constantes tipadas usadas como parâmetros.
 
  Nada funcionou!!!
 
  Tentei rodar num D2007 trial, mas não foi possível porque não deu
  para instalar o Jedi. Jcl e JVCL. (o trial não roda a versão linha de
  comando para que eu saiba se o projeto ao menos compila em outra versão.
 
  Já conversei com algumas pessoas, mas ainda ninguém foi capaz de dizer
  o que significam esses erros.
 
  Aceito sugestões! Qualquer uma!
 
  Muito obrigado!
 
  Oswaldo dos Santos Araujo
  [EMAIL PROTECTED] oswaldosaraujo%40gmail.com mailto:
 oswaldosaraujo%40gmail.com oswaldosaraujo%2540gmail.com
  (11) 9259-4094
 
 

 




-- 
Atenciosamente

Oswaldo dos Santos Araujo
mailto:[EMAIL PROTECTED]

Telefones escritório: (11) 6996-1101/6994-3586
MSN [EMAIL PROTECTED]


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



Re: [delphi-br] erros internos Delphi: URW e Stack Overflow no Compilador

2008-10-28 Por tôpico Oswaldo dos Santos Araujo
Olá amigos

Para esclarecer.

Só o principal era criado automaticamente. E o problema acontecia ao
compilar o programa, ele não chegava nem a gerar o executável.

*Dava erro ao usar o compilador em linha de comando. No próprio dcc32!*

Abas tem bastante tb. Mas o problema estava no compilador do Delphi, por
causa de alguma referência cruzada na chamada de units, ou seja a unit A
chama a unit B que chama a Unit A novamente.

*Não cheguei a achar exatamente onde estava o erro, mas fui tirando tudo o
que podia neste sentido e isolando grande parte dos formulários. Parte deles
inclusive foram colocados em packages. Por exemplo módulos de exportação de
dados, gráficos e coisas que são bem estanques e isoladas.*
**
*Agora o que ficou para mim é que o principal é manter o máximo de
isolamento. Quero inclusive eliminar variáveis e constantes tipadas
públicas, só que justamente isto está me deixando com algumas dúvidas. Como
fazer isto na prática. Algumas variáveis que eu lia de configurações uma vez
ao iniciar o programa, essas foram eliminadas , criando a variável
localmente onde seria usada e usando uma unit que lia a configuração no
arquivo .ini,*
**
*Mas queria saber de vocês qual a melhor opção para fazer isto, ou seja
manter um dado como o nome do usuário corrente no sistema sem usar uma
vairável pública, tem alguma maneira, além de gravar em ini, xml, arquivo
local??? Ou seria essa mesma a solução?*
**
*Outra coisa que acontece é que ás vezes é necessário um módulo chamar
outro, no meu caso o Cliente chama a Cobrança ou o Caso (processo), como
fazer isto de uma maneira que não seja chamado um pelo outro, mas por uma
janela como o principal, ou outra?. *
**
**
28/10  - Dia de São Judas Tadeu - Santos das Causas Desesperadas, era o meu
caso!

Abraços

Oswaldo dos Santos Araujo


2008/10/28 Coutinho - Yahoo [EMAIL PROTECTED]

   É uma boa prática deixar os forms sem serem criados automaticamente..
 por que?
 1. Sua aplicação inicializa + rápido
 2. menor consumo dos recursos de RAM
 3. Se o sistema tiver muitos relatórios e forms com PageControl, vai ser
 pau em cima de pau... memória...
 4. Para quer entuoir a memória com todos os forms do sistema, se muitos
 deles podem ser usados meras 2 ou 3 vezes por mês?

 Pensa nisso!!!

 Emanuel Coutinho

 Nicolas escreveu:
 
  Ha muito tempo atrás vi acontecer algo parecido num projeto gigante
  cujos formulários estavam todos como AutoCreate, ou seja,
  sobrecarregava a memória e não abria mais.
 
  Se este for seu caso, deixe apenas o formulário principal como
  autocreate, e criando os demais apenas
  em tempo de execução.
 
  []s
 
  Alexandre Nicolas
 
  - Original Message -
  From: oswaldosaraujo
   To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brmailto:
 delphi-br%40yahoogrupos.com.br delphi-br%2540yahoogrupos.com.br
  Sent: Monday, October 27, 2008 9:34 PM
  Subject: [delphi-br] erros internos Delphi: URW e Stack Overflow no
  Compilador
 
  Olá amigos
 
  Boa Noite!
 
  Faz uns 10 dias que eu tento contornar um problema no Delphi e não
  consigo. De uma hora para outra não consigo mais compilar meu
  principal projeto.
 
  Ele abriu uma janela chamada Danger com uma mensagem Stack
  Overflow. Save your work and restart Delphi. e em algumas vezes
  algumas mensagens Internal Error URW com um número que varia 3237,
  depois 3235.
 
  Eu já coloquei isto em 5 máquinas diferentes (um Core 2 Duo e 4 Dual
  Core) , desinstalei e reinstalei o Delphi, reinstalei o Jedi na última
  versão 3.34. Tentei criar pacotes e isolar partes do sistema. Além de
  começar a refazer o projeto do 0 umas duas vezes. Tem uns 500
  formulários no projeto. A maioria deles faz referencia à constantes
  tipadas do formulário principal, algo como o nome do escritório, um
  código de cliente atual, o usuário logado. Ele ainda usa BDE e paradox.
 
  Já tentei compilar direto da linha de comando para ver o que acontecia
  e dá um erro no compilador.
 
  Usei Delphi 6 Pro e 7 Enterprise, ambos atualizados. Retirei o que
  havia do antigo RXLIB e tirei algumas referencias múltiplas em
  formulários de busca com diversos forms chamadores, todos com
  constantes tipadas usadas como parâmetros.
 
  Nada funcionou!!!
 
  Tentei rodar num D2007 trial, mas não foi possível porque não deu
  para instalar o Jedi. Jcl e JVCL. (o trial não roda a versão linha de
  comando para que eu saiba se o projeto ao menos compila em outra versão.
 
  Já conversei com algumas pessoas, mas ainda ninguém foi capaz de dizer
  o que significam esses erros.
 
  Aceito sugestões! Qualquer uma!
 
  Muito obrigado!
 
  Oswaldo dos Santos Araujo
  [EMAIL PROTECTED] oswaldosaraujo%40gmail.com mailto:
 oswaldosaraujo%40gmail.com oswaldosaraujo%2540gmail.com
  (11) 9259-4094
 
  --
 
  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com http://www.avg.com
  Version: 8.0.175 / Virus Database: 270.8.4/1750 - Release Date

[delphi-br] Como descobrir se um componente Activex está instalado ou não...

2005-10-19 Por tôpico Oswaldo dos Santos Araujo
Olá amigos

Eu queria saber como saber se um determinado componente Activex está
instalado...

Eu estou só criando e usando, mas quando uso numa máquina não está
instalada dá erro. Só que eu queria usar isto como diferenciação do
software, ou seja se existe a Activex instalada eu deixo opções ativas
no menu, senão eu desligo tudo...

--
Atenciosamente

Oswaldo dos Santos Araujo
mailto:[EMAIL PROTECTED]

Telefones escritório: (11) 6996-1101/6994-3586
MSN [EMAIL PROTECTED]


-- 
 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] Off-Topic - Windows Terminal Server roda Win32

2005-07-05 Por tôpico Oswaldo dos Santos Araujo

Olá Amigos

Estou com uma dúvida cruel. Alguém já usou o Windows Terminal Server
utilizando aplicações Delphi x DBexpress x Firebrid ou ainda Delphi x BDE
x Paradox? Funciona? Tenho um cliente que quer colocar isto no escritório
dele para rodar alguns programas meus e eu não conheço esta tecnologia...
Alguém conhece ou já trabalhou com isto?


Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]

Telefones escritório: (11) 6996-1101/6994-3586
celular: (11) 9259-4094




-- 
 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] Could not find object

2005-05-24 Por tôpico Oswaldo dos Santos Araujo
O alias existe?

 Alguém sabe porque a mensagem Could not find object aparece quando tento
 abrir um SQL em tempo de execução.

Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]



-- 
 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: RES: [delphi-br] Mudar Caption do Form

2005-04-28 Por tôpico Oswaldo dos Santos Araujo
Olá

Vc não está usando algum Componente do RX ou outro que controle o 
Caption do Form, já tive este problema e era só mudar no outro 
.Caption que funcionava...RXGradientCaption ou JvGradientCaption por 
ex???

Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]


On 28 Apr 2005 at 17:26, Mauro Menezes wrote:

 
 Rafael,
 
 Você está usando o Delphi 6 - Enterprise ??? aqui não funciona.
 
 Mauro
 
  Mensagem Original 
 
 
  aqui funcionou normalmente, depois do form aberto, criado e rodando
 
  procedure TForm1.Button1Click(Sender: TObject);
  begin
  form1.caption := 'Fechar processo';
  application.ProcessMessages;
  end;
 
 
  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br
  [mailto:[EMAIL PROTECTED]
  nome de Mauro Menezes
  Enviada em: quinta-feira, 28 de abril de 2005 15:17
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Mudar Caption do Form
 
 
  Rafael,
 
  O problema é mudança após o Show. Exemplicando:
  Tem um Caption := 'Pordutos que SAIRAM' e após o acionamento de 
 um
  botão do Form quero mudar o Caption deste Form para Caption :=
  'Produtos que NÃO SAIRAM'...Entendeu  isot não tá funcionando.
 
 
   Mensagem Original 
  Assunto: Re: [delphi-br] Mudar Caption do Form
  Remetente: Rafael Souza [EMAIL PROTECTED]
  Data: Qui, 28 de Abril de 2005, 12:35
  
  
   Mauro,
   Procure a propriedade caption do form em questão ou se quiser 
 usar
  esta
   linha, coloque-a no evento onshow ou no oncreate.
  
   Form1.Caption := 'Novo titulo ';
  
   .RRS.
  
   Mauro Menezes [EMAIL PROTECTED] wrote:
  
   Como faço para mudar um Caption de um FORM qdo este está ativo, 
 ou
  seja, o controle está no próprio form ??? fiz conforma abaixo, mas
  não funciona.
  
  
   Form1.Caption := 'Novo titulo ' ;
  
  
   --



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

 





(Fwd) Re: [delphi-br] Error !!!

2005-04-19 Por tôpico Oswaldo dos Santos Araujo


--- Forwarded message follows ---
From:   Oswaldo dos Santos Araujo [EMAIL PROTECTED]
To: Omazio Alves [EMAIL PROTECTED]
Subject:Re: [delphi-br] Error !!!
Send reply to:  [EMAIL PROTECTED]
Date sent:  Fri, 15 Apr 2005 13:57:33 -0300

Olá Omázio

Vc tem que criar uma alias com nome 
novo 
que aponte para o diretório dos dados (onde vc colocar os arquivos de
DBFS.ZIP) o Programa FICTEC chama sempre o alias novo que consta na
propriedade DataBaseName do TTable (que é isto que vc precisa), o
programa Frente nada mais faz que chamar diversos programas, entre
eles o FICTEC, WINEXEC('C:\modif\fictec\fictec.EXE', SW_SHOW); onde 
vc
o deixar é o diretóeio que vc deve substituir...

Para criar um alias use o BDE Administrator no Painel de Controle
clique na aba Databases e de um Ctrl+N escolha Standard e ok renomeie
o alias para novo depois troque o DEFAULT DRIVER para DBASE e coloque
no PATH o diretório onde vc colocou os arquivos de DBFS.ZIP

Daí vc deve ter resolvido seu problema...

On 15 Apr 2005 at 10:31, Omazio Alves wrote:

From:   Omazio Alves [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Subject:Re: [delphi-br] Error !!!
Date sent:  Fri, 15 Apr 2005 10:31:18 -0300

 Olá Oswaldo, envie novamente recebeu ???
 
 foram três e-mail´s, cada um com um arquivo zipado, ok...
 
 
 - Original Message - 
 From: Oswaldo dos Santos Araujo [EMAIL PROTECTED] To:
 Omazio Alves [EMAIL PROTECTED] Sent: Thursday, April 14,
 2005 5:38 PM Subject: Re: [delphi-br] Error !!!
 
 
  Olá
 
  Manda de novo que eu só recebi este e-mail aqui... e não mande
  pela lista...que não aceita atachados...
 
  On 14 Apr 2005 at 15:05, Omazio Alves wrote:
 
  From:   Omazio Alves [EMAIL PROTECTED]
  To: [EMAIL PROTECTED]
  Subject:Re: [delphi-br] Error !!!
  Date sent:  Thu, 14 Apr 2005 15:05:15 -0300
 
   Olá Oswaldo, boa tarde ...
  
   vc. recebeu o meu e-mail com parte do sistema para analise do
   meu problema ???
  
   Atenciosamente,
  
   Omazio Alves
  
   - Original Message - 
   From: Omazio Alves [EMAIL PROTECTED]
   To: [EMAIL PROTECTED]
   Sent: Wednesday, April 13, 2005 2:36 PM
   Subject: Re: [delphi-br] Error !!!
  
  
Olá Oswaldo, boa tarde ...
   
Estou lhe enviando parte do sistema que não consigo abri-lo
devido ao erro mencionado ...
   
Veja se vc. consegui descobri qual seria o alias que ele
precisa e vc.
   pode
mim ajudar, este sistema é se um cliente que não tem mas
manutençao e esta precisando de umas modificações e estou
tentando, mas como não domino
   muito
estou com este problema, ok...
   
Atenciosamente,
   
Omazio Alves
Recife / PE
   
  
  
  
  
   -- 
   No virus found in this incoming message.
   Checked by AVG Anti-Virus.
   Version: 7.0.308 / Virus Database: 266.9.10 - Release Date:
   14/04/05
  
 
  Atenciosamente
 
  Oswaldo dos Santos Araujo
  http://www.santosaraujo.com.br
  mailto:[EMAIL PROTECTED]
 
  Telefones escritório: (11) 6996-1101/6994-3586
 
 
 
 
  -- 
  No virus found in this incoming message.
  Checked by AVG Anti-Virus.
  Version: 7.0.308 / Virus Database: 266.9.7 - Release Date:
  12/04/2005
 
 
 
 
 
 
 -- 
 No virus found in this incoming message.
 Checked by AVG Anti-Virus.
 Version: 7.0.308 / Virus Database: 266.9.11 - Release Date: 14/04/05
 

Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]

Telefones escritório: (11) 6996-1101/6994-3586
celular: (11) 9259-4094

--- End of forwarded message ---Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]

Telefones escritório: (11) 6996-1101/6994-3586
celular: (11) 9259-4094



-- 
 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] Error !!!

2005-04-13 Por tôpico Oswaldo dos Santos Araujo

Olá Omazio

Verifique
1) Se o alias que este programa está esperando está criado
2) Se o seu BDE está inteiro (reinstale-o na última versão 5.2)
3) Às vezes por falta de recursos na máquina dá este erro...

Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]

Telefones escritório: (11) 6996-1101/6994-3586
celular: (11) 9259-4094


On 13 Apr 2005 at 10:27, Omazio Alves wrote:

 
 Eu ja tenho o BDE instalado ...
 
 - Original Message - 
 From: Futura System Informática [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Wednesday, April 13, 2005 9:40 AM
 Subject: Re: [delphi-br] Error !!!
 
 
 
 Vc tem que instalar o BDE.
  - Original Message - 
  From: Omazio Alves
  To: delphi-br@yahoogrupos.com.br
  Sent: Wednesday, April 13, 2005 7:56 AM
  Subject: [delphi-br] Error !!!
 
 
  Olá pessoal, bom dia ...
 
  Baixei um aplicativo que trabalha com a base de dados (*.dbf).
 
  Tentei acessar e esta mostrando o seguinte erro !!!
 
  Application Error
  Exception EDatabase Error in
  module Project1.exe at 0005:11EB
  An error accurred while attempting to initialize the Borland 
 Database
 Engine ( error $2108 )
 
  Se alguem puder mim ajudar, desde já agradeço ...
 
  Sei que a maioria dos aplicativos do Delphi é preciso configurar o
 BDE, mas nunca testei um com base de dados (*.dbf).
 
  Atenciosamente,
 
  Omazio Alves
  Recife / PE
  [EMAIL PROTECTED]
 
 
  [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:
 
  São Paulo Rio de Janeiro Curitiba Porto Alegre 
 Belo
 Horizonte Brasília
 
 
 
 
 --
 -- --
  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!.
 
 
 
 [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.308 / Virus Database: 266.9.5 - Release Date: 07/04/2005
 
 
 
 
 -- 
  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]
 
 
 



-- 
 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] Dúvida ClientDataSet+Trigger+FB com Campo Auto-Increment o

2005-04-05 Por tôpico Oswaldo dos Santos Araujo


Caros

Estou começando a migrar sistemas do PARADOX para FB/IB e considerei que a
melhor forma era usar uma Trigger, só que eu não consigo ler o valor dado
ao Campo sem dar um refresh nos dados...estou usando um DBNavigator e
DBEdits para testar...(e eu ainda não consegui somar 1+1 aqui :(((  )

Tirei o trigger e coloquei uma solução que achei no Forum do Clube
Delphi que dá erro (ACCESS VIOLATION) (tirei a Trigger).

type
  TSuperVetDataMod = class(TDataModule)
SQLConnection1: TSQLConnection;
ClientesSQL: TSQLQuery;
...
procedure ClientesCDSReconcileError(DataSet:
TCustomClientDataSet;
  E: EReconcileError; UpdateKind: TUpdateKind;
  var Action: TReconcileAction);
procedure ClientesCDSNewRecord(DataSet: TDataSet);
  private
{ Private declarations }
  public
{ Public declarations }
Function AutoInc(gen:String):Integer;
  end;

var
  SuperVetDataMod: TSuperVetDataMod;

implementation

{$R *.dfm}

procedure TSuperVetDataMod.ClientesCDSReconcileError(
  DataSet: TCustomClientDataSet; E: EReconcileError;
  UpdateKind: TUpdateKind; var Action: TReconcileAction);
begin
   MessageDlg('Erro ao gravar dados'+E.Message,mtError,[mbOk],0);
end;

function TSuperVetDataMod.AutoInc(gen: String): Integer;
Var
  ResultSet : TCustomSQLDataSet;
  SQLstmt : string;
begin
  result := 0;
  SQLstmt := 'select gen_id('+gen+',1) ' +
  'as VALOR from RDB$DATABASE;';
  ResultSet := nil;
  try
SQLConnection1.Execute(SQLstmt, nil, @ResultSet);
if Assigned(ResultSet) then
  Result := ResultSet.FieldByName('VALOR').AsInteger;
  finally
ResultSet.Free;
  end;
end;


procedure TSuperVetDataMod.ClientesCDSNewRecord(DataSet: TDataSet);
begin
   ClientesSQLCODCLI.AsInteger := AutoInc('GEN_CLIENTES_ID');
end;

Alguém tem alguma dica prática para trabalhar com campos auto-
incremento no D6/7 FB+DBExpress com ClientDataSet...



Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]

Telefones escritório: (11) 6996-1101/6994-3586
celular: (11) 9259-4094




-- 
 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] migrando de Delphi 5 para o Delphi 7 - QuickReport?!?

2005-04-01 Por tôpico Oswaldo dos Santos Araujo

Olá
Tem, sim! Vc tem que instalar o componente...

Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]

Telefones escritório: (11) 6996-1101
On 1 Apr 2005 at 12:22, José Maria wrote:

 
 
 Olá PessoALL,
 
  Bom dia. De cara vi que não temos o quickreport no 7. Tem alguma
 ferramenta para converter Quick para Rave? Qual a melhor alternativa?
 E quanto ao IBX? Continua funcionando ou devo migrar para DBExpress?
 
 Obrigado!
 José Maria
 
 
 
 
 
 
 -- 
  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]
 
 
 




-- 
 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] Afinal quem da lista vai participar do 5o. DDD amanhã?

2005-04-01 Por tôpico Oswaldo dos Santos Araujo

Olá pessoal

Alguém da lista vai participar do 5o DDD? Eu vou...

Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]

Telefones escritório: (11) 6996-1101



-- 
 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] Erro com XML e ClienteDataSet

2005-03-15 Por tôpico Oswaldo dos Santos Araujo

Olá amigos

Estou com um problema que não consigo solucionar...estou utilizando 
um arquivo XML como base de dados local com o ClientDataSet, só que 
depois de achar um determinado registro na pequena base que tenho, e 
editar um determinado campo booleano, dá erro no Post...

AgendasCDS: Provedor de Dados ou Base de Dados perdidos 

Alguém sabe o que é isto?

Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]

Telefones escritório: (11) 6996-1101/6994-3586
celular: (11) 9259-4094



-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.2 - Release Date: 11/03/05



-- 
 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] Erro com XML e ClienteDataSet

2005-03-15 Por tôpico Oswaldo dos Santos Araujo

Olá 

O FileName está correto, chequei em tempo de execução tb...é 
realmente olhe que interessante..
procedure TAvisoProvidenciaForm.FormCreate(Sender: TObject);
begin
   ADVResidenteMain.ADVResDM.AgendasCDS.Open;
   ADVResidenteMain.ADVResDM.AgendasCDS.First;
   if 
ADVResidenteMain.ADVResDM.AgendasCDS.Locate('CodigoCliente;CodigoCaso;
NroEvento', 
VarArrayOf([CodigoClienteAtual,CodigoCasoAtual,NroEventoAtual]), []) 
then
  begin
 ADVResidenteMain.ADVResDM.AgendasCDS.Edit;
 ADVResidenteMain.ADVResDM.AgendasCDSAvisoAtivo.Value:=True;
 ADVResidenteMain.ADVResDM.AgendasCDS.Post;  //Aqui dá o erro
 ADVResidenteMain.ADVResDM.AgendasCDS.ApplyUpdates(-1);
  end
   else
  close;

o erro dá no POST...


On 15 Mar 2005 at 16:56, Francisco Thiago wrote:

 
 Por algum motivo o CDS está perdendo a referência ao arquivo que você
 tem com base. Atribua a localização deste arquivo na propriedade
 FileName. Isso deve resolver o seu problema
 
 Espero ter ajudado
 
 Francisco Thiago de Almeida
 EnterPlug Informática
 Divisão: Desenvolvimento e Banco de dados
 MSN: [EMAIL PROTECTED]
 Skype: enterplug_thiago
 
 - Original Message - 
 From: Oswaldo dos Santos Araujo [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Tuesday, March 15, 2005 4:51 PM
 Subject: [delphi-br] Erro com XML e ClienteDataSet
 
 
 
  Olá amigos
 
  Estou com um problema que não consigo solucionar...estou utilizando
  um arquivo XML como base de dados local com o ClientDataSet, só que
  depois de achar um determinado registro na pequena base que tenho, e
  editar um determinado campo booleano, dá erro no Post...
 
  AgendasCDS: Provedor de Dados ou Base de Dados perdidos
 
  Alguém sabe o que é isto?
 
  Atenciosamente
 
  Oswaldo dos Santos Araujo
  http://www.santosaraujo.com.br
  mailto:[EMAIL PROTECTED]
 
  Telefones escritório: (11) 6996-1101/6994-3586
  celular: (11) 9259-4094
 
 
 
  -- 
  No virus found in this outgoing message.
  Checked by AVG Anti-Virus.
  Version: 7.0.308 / Virus Database: 266.7.2 - Release Date: 11/03/05
 
 
 
  -- 
   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
 
 
 
 
 
 
 
 
  
 
 
 
 
 
 -- 
  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]
 
 
 

Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]

Telefones escritório: (11) 6996-1101/6994-3586
celular: (11) 9259-4094



-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.2 - Release Date: 11/03/05



-- 
 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] Controlar Licença

2005-03-15 Por tôpico Oswaldo dos Santos Araujo

Ola

Existe um componente free TregwareII que pode ser usado por vcs...Eu 
peguei no Torry há algum tempo...

Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]

On 15 Mar 2005 at 16:59, Gabriel Ferrarini wrote:

 
 Creio que se isso acontecer o sistema será, em partes, inútil para o
 cliente pois grande parte dos processamentos e geração de relatórios
 se baseia em datas, principalmente Contas a Pagar e Contas a Receber.
 
 Gabriel.
  - Original Message - 
  From: [EMAIL PROTECTED] 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, March 15, 2005 4:35 PM
  Subject: Re: [delphi-br] Controlar Licença
 
 
  Mas existe um problema.
  Supondo que o vencimento da licença seja em 31/03/2005 e se o 
 usuário sempre mantiver a data do sistema em 30/03/2005 não vai 
 bloquear...
 
  - Original Message - 
  From: Marcos Jordao 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, March 15, 2005 1:35 PM
  Subject: Re: [delphi-br] Controlar Licença
 
 
  Amigo, eu controlo da seguinte maneira:
  Tenho uma tabela no banco onde armazeno: Ultimo Uso,
  Codigo de Uso e Serial do HD.
 
  Esse Código de Uso é gerado por um algoritmo que eu
  criei que gera um número serial onde está contido uma
  data. Tipo assim... eu informo uma data aí ele vai
  realizando operações matemáticas e concatenação com
  strings nos números da data. Com o processo inverso eu
  obtenho uma data de tal serial.
 
  Antes do primeiro uso eu crio um serial e com um
  sisteminha de Registro coloco na tabela, junto com o
  serial do HD e a primeira data de uso.
 
  Na abertura do sistema, antes de tudo eu verifico o
  serial do HD (função que você obtém fácil em sites),
  se for diferente do gravado quer dizer que o sistema
  está sendo rodado em máquina onde não foi licenciado.
  No caso de trabalho em rede você deve ter controle de
  várias linhas na tabela, uma com cada Serial de HD.
 
  Se o Serial do HD confere, eu gravo na tabela a data
  do sistema e comparo com a obtida através do serial
  também armazenado na tabela, se for maior o sistema
  fica travado e como a data atual já está armazenada no
  Ultimo Uso, mesmo que o usuário volte a data do
  sistema o sistema continua travado.
 
  Deu pra entender?
 
  Qualquer coisa é só escrever
 
  Abraços
 
  Marcos Antonio Campos Jordão
 
 
  --- easywaysistemas [EMAIL PROTECTED]
  wrote:
  -
 
  Alguém tem algum exemplo ou algo qualquer referente a
  controle de 
  licença de 
  um sistema? Estou desenvolvendo um sistema que
  funcionara por 
  assinatura 
  mensal, mas ainda não sei como controlar isto? 
 
 
 
 
 
  -- 
   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: 
 
  function SearchComboBox() {
  if (document.form_combo.keyword.value.length==0){ 
  alert(Por favor, digite algo.); return false; }else
  { document.form_combo.action
 
 =http://br.rd.yahoo.com/SIG=12aa8r547/M=264105.3931087.6562589.158805
 1/D=brclubs/S=2137111264:HM/EXP=1110981717/A=2361264/R=0/SIG=11uaou2jn
 /*http://www.bondfaro.com/bondfaro/in/combosearch_in.jsp?sk=11;;
  } return true;} 
  [input] 
  [input] [input] 
 
 
  -
  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! Mail - Com 250MB de espaço. Abra sua conta! 
 http://mail.yahoo.com.br/
 
 
  -- 
   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.308 / Virus Database: 266.7.2 - Release Date: 
 11/03/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

Re: [delphi-br] Erro com XML e ClienteDataSet

2005-03-15 Por tôpico Oswaldo dos Santos Araujo

Olá

Perguntas...Onde eu mudo o LogChanges?? Não é visível em tempo de 
projeto do D6...o padrão do PacketRecords é -1?

Oswaldo

On 15 Mar 2005 at 17:53, Francisco Thiago wrote:

 
 Olha, se você está usando arquivos, o ApplyUpdates é desnecessário.
 Você pode setar também a propriedade LogChanges para false.
 
 Voltando ao problema
 
 É interessante o erro dar apenas no post...
 Você não teria um DataSetProvider ligado a este CDS, teria?
 Existe alguma outra propriedade modificada do padrão do CDS (algo que
 podesse gerar erro)... exemplo... PacketRecords... Depure o post com
 F7 e veja onde pára, ou onde dá o erro... 

O DataSet (clique de direita
 em cima do CDS) está criado em tempo de projeto?
 
 Se continuar dando erros, verfique como está o arquivo XML (se não tem
 algo errado nele) e experimente usar arquivos binários (.cds)
 
 Francisco Thiago de Almeida
 EnterPlug Informática
 Divisão: Desenvolvimento e Banco de dados
 MSN: [EMAIL PROTECTED]
 Skype: enterplug_thiago
 
 
 
 - Original Message - 
 From: Oswaldo dos Santos Araujo [EMAIL PROTECTED]
 To: Francisco Thiago [EMAIL PROTECTED]; 
 delphi-br@yahoogrupos.com.br
 Sent: Tuesday, March 15, 2005 5:36 PM
 Subject: Re: [delphi-br] Erro com XML e ClienteDataSet
 
 
 
  Olá
 
  O FileName está correto, chequei em tempo de execução tb...é
  realmente olhe que interessante..
  procedure TAvisoProvidenciaForm.FormCreate(Sender: TObject);
  begin
  ADVResidenteMain.ADVResDM.AgendasCDS.Open;
  ADVResidenteMain.ADVResDM.AgendasCDS.First;
  if
  
 ADVResidenteMain.ADVResDM.AgendasCDS.Locate('CodigoCliente;CodigoCaso;
  NroEvento', 
 VarArrayOf([CodigoClienteAtual,CodigoCasoAtual,NroEventoAtual]), []) 
 then  begin  ADVResidenteMain.ADVResDM.AgendasCDS.Edit; 
 ADVResidenteMain.ADVResDM.AgendasCDSAvisoAtivo.Value:=True; 
 ADVResidenteMain.ADVResDM.AgendasCDS.Post; //Aqui dá o erro 
 ADVResidenteMain.ADVResDM.AgendasCDS.ApplyUpdates(-1);  end  else 
 close;   o erro dá no POST...On 15 Mar 2005 at 16:56,
 Francisco Thiago wrote:Por algum motivo o CDS está perdendo a
 referência ao arquivo que você  tem com base. Atribua a localização
 deste arquivo na propriedade  FileName. Isso deve resolver o seu
 problema   Espero ter ajudado   Francisco Thiago de Almeida 
 EnterPlug Informática  Divisão: Desenvolvimento e Banco de dados 
 MSN: [EMAIL PROTECTED]  Skype: enterplug_thiago   -
 Original Message -  From: Oswaldo dos Santos Araujo
 [EMAIL PROTECTED]  To: delphi-br@yahoogrupos.com.br 
 Sent: Tuesday, March 15, 2005 4:51 PM  Subject: [delphi-br] Erro com
 XML e ClienteDataSet   Olá amigos Estou com um
 problema que não consigo solucionar...estou utilizando   um arquivo
 XML como base de dados local com o ClientDataSet, só que   depois
 de achar um determinado registro na pequena base que tenho, e  
 editar um determinado campo booleano, dá erro no Post...
 AgendasCDS: Provedor de Dados ou Base de Dados perdidos
 Alguém sabe o que é isto? Atenciosamente Oswaldo
 dos Santos Araujo   http://www.santosaraujo.com.br  
 mailto:[EMAIL PROTECTED] Telefones escritório:
   --   No virus found in this outgoing message.   Checked by
 AVG Anti-Virus.   Version: 7.0.308 / Virus Database: 266.7.2 -



-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.7.2 - Release Date: 11/03/05



-- 
 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] XP x WIN98 NO DBE

2005-03-01 Por tôpico Oswaldo dos Santos Araujo

Caros 

XP com 98 ok, mas 98 com Win2000, 2003 dá pau de todo o tipo com o 
BDE, se alguém souber porque, eu agradeço

On 1 Mar 2005 at 18:06, Campus wrote:

 
 Quando o Win98 saiu o protocolo de rede passou a ser o tcp/ip, seu
 antecessor, o Win95 usava o NetBeui, misturando os dois una rede,
 ocorria vez por outra a perda de acesso e consequentemente de indices
 em Clipper.
 
 Com o XP e o Win98 parece ter algo parecido...
 
 As vezes eu recebo uma mensagem de erro dizendo que não tenho acesso
 ao diretório, durante a carga do programa (na maquina XP que é cliente
 com servidor 98), mas é só colocar a impressora local como padrão que
 funciona, se a impr. local for de rede, acontece o erro.
 
 vai entender...
 
 - Original Message - 
 From: Williams Diaz [EMAIL PROTECTED]
 To: delphi-br@yahoogrupos.com.br
 Sent: Tuesday, March 01, 2005 5:48 PM
 Subject: Re: [delphi-br] XP x WIN98 NO DBE
 
 
 
  Nunca tive problemas de perda de dados com essa configuração, agora 
 o
 outro
  dia encontrei um caso muito extranho. O w98 não acessava (via bde, 
 porque
  pelo windows explorer você acessava todas as máquinas) a minha base 
 de
 dados
  que estava em sql server. No final ativei o named-pipes (em lugar do
 tcp-ip)
  e funcionou. Não dei maior importância porque tinha alguns 
 problemas de
  impressão também então eu supus que fosse algum problema de 
 protocolo na
  rede (no qual não me envolvo).
 
  williams
 
  *---
  Williams Díaz
  [EMAIL PROTECTED]
  http://www.interban.com.br
 
 
  - Original Message - 
  From: Futura System Informática [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Tuesday, March 01, 2005 4:16 PM
  Subject: Re: [delphi-br] XP x WIN98 NO DBE
 
 
 
  Olha amigo minha experiência com essa combinação foi desastrosa, 
 pedi o
  banco de dados inteiro varias vezes mesmo fazendo todas as 
 configurações
  possiveis e imaginarias, não consegui fazer funcionar a solução foi 
 deixar
  tudos 98 ou tudo XP.
 
  Abraços e Sucesso []'s
 
 
 
 
  -- 
  No virus found in this outgoing message.
  Checked by AVG Anti-Virus.
  Version: 7.0.300 / Virus Database: 266.5.2 - Release Date: 
 28/02/2005
 
 
 
  -- 
   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
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 -- 
  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]
 
 
 

Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]

Telefones escritório: (11) 6996-1101/6994-3586
celular: (11) 9259-4094



-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 266.5.4 - Release Date: 01/03/05



-- 
 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] Amigos Paradoxianos

2005-03-01 Por tôpico Oswaldo dos Santos Araujo

Caro

Creio que o problema está relacionado com o FILES do Autoexec.bat 
Não???

Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]

Telefones escritório: (11) 6996-1101/6994-3586


On 1 Mar 2005 at 17:42, info.Desenvolvimento wrote:

 
 Não me expressei bem, o que eu quis dizer que tive problemas pois o
 sistema que desenvolvo trabalha com mais de 40 tabelas e uso muitos
 DBGrids e alguns dados não aparecem quando o XP é CLIENTE e se faço a
 inversão roda perfeitamente o sistema, então já deixei de aviso que o
 melhor é colocar a ultima versão do sistema rodando como servidor de
 dados e colocar o Windows 98 como CLIENTE. Isso depende do sistema que
 cada programador desenvolve, uns com mais complexidade e outros mais
 simples.
 
 Paulo César Fernandes
  Desenvolvimento
 
 
 [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]
 
 
 




-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 266.5.4 - Release Date: 01/03/05



-- 
 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] URGENTE: relatório com duas páginas

2005-02-22 Por tôpico Oswaldo dos Santos Araujo

Olá
Use o QRcomposite e cuidado com a visualização, pois visualizadores 
proprios dão erro com o composite...


Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]

On 22 Feb 2005 at 15:44, Giovani - Terra wrote:

 
 Sim, use a função composite...
 
  Pessoal... 
 
  Estou usando o QReport!
 
  Eu tenho que fazer um relatório com dados de cadastro, só que 
 existem muitos dados e eles não cabem numa folha só como eu faço
 então???
  Tem como juntar dois QuickReps???
  Por favor me ajudem!!! :-)
 
  Obrigado galera!!!
 
  _
  --
 
 No virus found in this outgoing message.
 Checked by AVG Anti-Virus.
 Version: 7.0.300 / Virus Database: 266.3.0 - Release Date: 21/02/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]
 
 
 



-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 266.3.0 - Release Date: 21/02/05



-- 
 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] Ajuda com BDE ::Em Rede::

2005-02-11 Por tôpico Oswaldo dos Santos Araujo

Desistale o BDE e reinstale, deve haver mistura de versões, pelo 
menos esta é a resposta de muitos sites, inclusive da comunidade 
Borland para isto... normalmente é isto, o que tb ocorre é quando há 
erro nas placas de rede, que tb dá esta mensagem...

 
  Boa Tarde!
 
  Ao comprimentá-los, solicito ajuda com relação ao BDE.
 
  O problema ocorre da seguinte forma:
  O banco de dados esta em rede, assim que uma das máquinas clientes é
 reiniciada, e o programa reiniciado, uma mensagem de erro surge com
 relação a um arquivo criado pelo programa; {Pdoxusrs.net}.
  Com a seguinte mensagem:
 
  Network initialization failed.
  Unknown internal operating system error.
  File: \\BM-LJO-OO45\C\SCBM\DADOS\Pdoxusrs.net
  Directory: \\BM-LJO-OO45\C\SCBM\DADOS\ 
 
  Já tentei excluir mas o arquivo insiste em ser recriado 
 automaticamente impedindo assim, que após uma máquina seje 
 reiniciada, o funcionamento do programa.
 
  Alguém pode me ajudar a resolver este problema??
 
  Agradeço desde já.
 
  Abraço.
 
 
 
  __
  Converse com seus amigos em tempo real com o Yahoo! Messenger 
  http://br.download.yahoo.com/messenger/ 
 
  [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!. 
 
 
 
 [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]
 
 
 

Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]

Telefones escritório: (11) 6996-1101/6994-3586
celular: (11) 9259-4094



-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.7 - Release Date: 10/02/05



-- 
 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] registros entre datas em paradox

2005-02-09 Por tôpico Oswaldo dos Santos Araujo

Olá

Creio que a máquina em questão esteja usando datas no padrão 
diferente do usual, tipo Ano/Mês/Dia, troque o Periodo.Text (que deve 
ser um TEdit por um componente da RX ou da JVCL que teste a data 
antes de sair da edição)... pode ser tb ParamByName('vData1').Value 
que ficaria...  ParamByName('vData1').AsDateTime...

On 9 Feb 2005 at 17:43, Clovis Ferreira wrote:

 
 Ola pessoal
 
 Procurei em varios lugares, inclusive dentro da lista, e não 
 encontrei algo que pudesse me ajudar. Preciso dar um select, no 
 paradox, para levantar os registros entre duas datas. Estou usando
 assim e da erro de '01/11/2002' is not a valid date
  datam1.NotaFiscaldb.Open;
  vSQL := 'SELECT * FROM NotaFiscal WHERE (Plandata BETWEEN :vDAta1 and
 :vDAta2)';
  datam1.qy.Close;
  datam1.qy.SQL.Clear;
  datam1.qy.SQL.Add(vSQL);
  datam1.qy.ParamByName('vData1').Value := strtodate(Periodo1.Text); -
  nesta linha
  datam1.qy.ParamByName('vData2').Value := strtodate(Periodo2.Text);--
 --- nesta linha
  datam1.qy.ExecSQL;
  datam1.qy.Open;
  datam1.qy.First;
 
 
 [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]
 
 
 

Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br
mailto:[EMAIL PROTECTED]


-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.6 - Release Date: 07/02/05



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

2005-01-31 Por tôpico Oswaldo dos Santos Araujo

Olá Érika

No OnExit do Campo vc coloca
algo do tipo
   PageControl1.ActivePage:=NomeTabSheet;

Atenciosamente

Oswaldo dos Santos Araujo
http://www.santosaraujo.com.br

On 31 Jan 2005 at 9:59, Erika Lemes wrote:

 
 Bom dia
 
 Eu tenho um TpageControl para facilitar um cadastro que é muito 
 extenso mas estou com alguns problemas:
 
 - quando iniciar eu quero que ele abra no primeito TabSheet, como
 faço? - quando o usuário sair do ultimo campo do TabSheet1 por
 exemplo, ele já pular para o próximo campo no TabSheet2... - tem como
 mudar as ordens dos TabSheet? Tipo o que está em ultimo eu preciso
 colocar em prmeiro...
 
 Desculpem tantas perguntas...rs...rs..
 
 Obrigado!  Erika
 
 __
 Converse com seus amigos em tempo real com o Yahoo! Messenger 
 http://br.download.yahoo.com/messenger/ 
 
 [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]
 
 
 




-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.2 - Release Date: 28/01/05



-- 
 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: RES: [delphi-br] TESTE DE DATA

2005-01-28 Por tôpico Oswaldo dos Santos Araujo

Olá

Isto funciona só quando há certeza dos 4 digitos na data...é melhor 
usar  

  if trim(Text) = '/  /' then

Se usar o DateEdit do RX ou o JvDateEdit tem uma propriedade para 
testar a data ao sair da ediçãofunciona...

Atenciosamente

Oswaldo dos Santos Araujo


On 28 Jan 2005 at 13:09, Eduardo Silva ® wrote:

 
 Para limpar a data e, por exemplo, desistir da data que foi digitada,
 abra o fieldseditor da sua tabela, selecione o campo data e no evento
 OnSettext digite
 
  if Text = '   /   / ' then
  Sender.asString := ''
  else
  Sender.asString := Text;
 
 Para a mensagem de erro vc usa a função abaixo:
 
 function TestaData(Data: string): Boolean;
 begin
  try
  StrToDate(Data);
  Result := True;
  except
  Result := False;
  Messagebox(application.handle,'Data inválida !','Erro',MB_OK or
 MB_ICONERROR);
  SetActiveWindow(Application.handle);
  end;
 end;
 
 
 
 -Mensagem original-
 De: Trama Paulista .:sites .:sistemas 
 [mailto:[EMAIL PROTECTED]
 Enviada em: sexta-feira, 28 de janeiro de 2005 12:01
 Para: Delphi - BR
 Assunto: [delphi-br] TESTE DE DATA
 
 
  Pessoal,
 
  Tenho um form com um campo data com máscara 99/99/. Entretanto,
 se for digitada uma data errada eme dá uma mensagem de erro e pede
 para teclar escape para sair, coisa que qualquer usuário odeia.
 
  Gostaria de saber como fazer para evitar esta mensagem, ou seja, como
 contornar esta situação, colocando eu mesmo uma mensagem de erro e
 possibilitando a redigitação de uma data correta ou mesmo de limpar o
 campo.
 
  Desde já, obrigado.
 





-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.7.6 - Release Date: 27/01/05



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