Re: [delphi-br] Dúvida com DBLookupComboBox

2007-05-07 Por tôpico Paulo Sérgio de Souza

Boa tarde Fabrício,

Para que todos os registros aparecam, é necessário colocar o comando FetchAll 
logo após o open da query que carrega o DBLookupComboBox.

Espero ter ajudado.

Paulo Sérgio
Desenvolvedor
[EMAIL PROTECTED]
Belo Horizonte/MG


  - Original Message - 
  From: Fabricio Venancio 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Saturday, May 05, 2007 4:45 PM
  Subject: [delphi-br] Dúvida com DBLookupComboBox


  Pessoal, no meu DBLookupComboBox, quando tento selecionar uma das opções, 
aparece apenas uma linha de cada vez, apesar da propriedade DropDownRows ser 
igual a 7. Gostaria que aparecesse todas as opções, sem ter que clicar na barra 
de rolagem. O que pode ser?

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



   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition. 
  Version: 7.5.467 / Virus Database: 269.6.5/792 - Release Date: 06/05/2007 
21:01


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



Re: [delphi-br] Numero de usuários

2007-04-20 Por tôpico Paulo Sérgio de Souza
Galera,

Se o aplicativo estiver usando o Interbase ou o Firebird pode-se utilizar o 
seguinte código:

Coloque no seu form principal o componente TIBDatabaseInfo da paleta InterBase 
com o name de:
 InfoBanco;

No onShow do formulário coloque:

begin
  InfoBanco.Database := ''Seu IBDataBase;
  if InfoBanco.UserNames.Count  sua quantidade de cópias then
  begin
 ShowMessage('Número de conexões ao sistema excedido.');
 Application.Terminate;
  end;

Espero ter ajudado.

Sds,

Paulo Sérgio
Desenvolvedor
[EMAIL PROTECTED]
Belo Horizonte/MG


  - Original Message - 
  From: Desenvolvimento (Anderson) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, April 20, 2007 10:26 AM
  Subject: Re: [delphi-br] Numero de usuários


  tem uma solução q usa Ky...rsrsrsrs

  vc pode usar um campo q escreva uma data/hora... assim, vc sabe se o usuario 
permanece usando o sistema.
  coloca um timeout de 5 minutos para ver se o usuario ainda ta no sistema... e 
um timeout de 1 minuto no cliente.

  - Original Message - 
  From: Sérgio T. Uetanabaro 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, April 19, 2007 5:32 PM
  Subject: RES: [delphi-br] Numero de usuários

  Infelizmente só tem solução q dói... hehehe. Tentar ver algum esquema de dar
  um broadcast na rede em que seu software responda a esse broadcast e conte o
  nro de softwares rodando... tem muito softwares q estao fazendo isso.

  []´s

  Sergio

  _ 

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Ricardo César Cardoso
  Enviada em: quinta-feira, 19 de abril de 2007 16:06
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Numero de usuários

  CAD = CTRL + ALT + DEL. Imagine... abreviação da abreviação...

  Alberto alberto.ferreira@ mailto:alberto.ferreira%40tan.com.br
  tan.com.br escreveu: Obrigado Sergio, mas...

  não tem nada mais simples? É que é um software distribuído, de prateleira
  e sem manutenção. Teria que colocar esse autenticador como um serviço no
  windows e tudo mais, me preocupar se ele está no ar, além do mais pode ser
  que algumas máquinas desses usuários não possam nem ser chamadas de estação,
  quem dirá de servidores.
  O que é CAD?

  []s

  - Original Message - 
  From: Sérgio T. Uetanabaro 
  To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br 
  Sent: Thursday, April 19, 2007 9:31 AM
  Subject: RES: [delphi-br] Numero de usuários

  Acho q a melhor opção seria vc ter um servidor de autenticacao de copia.
  Toda vez que um usuario logar no seu sistema vc acessa esse servidor via
  TCP, por exemplo, e autentica a copia, mantendo nele o nro de copia
  rodando na rede interna, tratando devidamente o OnDisconnect para que não
  haja problemas de matar o processo no CAD. Acho que eh a opcao mais correta
  e facil de se fazer isso.

  []´s

  Sergio Uetanabaro

  _ 

  De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br
  [mailto:[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br
  os.com.br] Em
  nome de Alberto
  Enviada em: quinta-feira, 19 de abril de 2007 08:34
  Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br
  Assunto: [delphi-br] Numero de usuários

  Olá,

  Existe alguma maneira de saber quantos usuários estão logados no sistema em
  uma rede interna? Ou refazendo a pergunta: Preciso controlar o número de
  copias, qual a melhor opção? 
  Pensei no seguinte, o usuário pode instalar o sistema em várias máquinas,
  mas se a sua copia dá direito a dois usuários, para o terceiro entrar alguém
  precisa sair.
  Poderia até gravar uma flag no banco e comparar algo como n_copias X
  n_logados, mas existe a possibilidade de Ctrl+Alt+Del e daí o numero de
  logados vai para o espaço.

  obrigado.

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

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

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

  __
  Fale com seus amigos de graça com o novo Yahoo! Messenger 
  http://br.messenger http://br.messenger.yahoo.com/ .yahoo.com/ 

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

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

  __ Informação do NOD32 IMON 2207 (20070420) __

  Esta mensagem foi verificada pelo NOD32 sistema antivírus
  http://www.eset.com.br

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



   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.5.446 / Virus Database: 269.5.5/769 - Release Date: 19/04/2007 
17:56


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



Re: [delphi-br] Casos de estudos de empresas usando Delphi

2007-04-11 Por tôpico Paulo Sérgio de Souza
Boa tarde Leodinei,

Consulte o link:

http://delphi.wikia.com/wiki/Good_Quality_Applications_Built_With_Delphi

Sds,

Paulo Sérgio
Desenvolvedor
[EMAIL PROTECTED]
Belo Horizonte/MG


  - Original Message - 
  From: Leodinei Bielak 
  To: delphi-br 
  Sent: Wednesday, April 11, 2007 12:33 PM
  Subject: [delphi-br] Casos de estudos de empresas usando Delphi


  Boa tarde.
  Alguém poderia me indicar algum link que contenha casos de sucessos
  usando Delphi?
  Pode ser tanto em português como em inglês. Eu não estou encontrando
  nada nem mesmo no site da Borland/Code Gear.
  Obrigado.

  -- 
  Leodinei Bielak
  http://leodinei.blogspot.com/

  In theory, there is no difference between theory and practice.
  In practice, however..


   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.5.446 / Virus Database: 269.0.0/752 - Release Date: 08/04/2007 
20:34


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



Re: [delphi-br] Impressao na USB

2007-02-07 Por tôpico Paulo Sérgio de Souza
Bom dia Doretto,

Por Writeln não há como imprimir direto na porta USB. Uma alternativa seria 
gerar um arquivo texto, jogá-lo em um editor de relatório (Quick Report por 
exemplo) e mandar imprimir.

Espero ter ajudado.

Sds,

Paulo Sérgio
Desenvolvedor
MV Tecnologia Ltda - Belo Horizonte (matriz)
[EMAIL PROTECTED]
www.mvtec.com.br 

  - Original Message - 
  From: Doretto 
  To: Delphi 
  Sent: Wednesday, February 07, 2007 9:21 AM
  Subject: [delphi-br] Impressao na USB


  Bom dia !!!

  Eu tenho uma impressora em rede (PARALELA) e imprimo normalmente usando o 
Writeln(Arquivo,'teste').
  Coloco o nome da impressora e imprimo normalmente \\doretto\epson

  teria como eu imprimir na USB usando o mesmo comando WRITELN(arquivo,'teste') 
?

  Abraço

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



   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.411 / Virus Database: 268.17.29/673 - Release Date: 06/02/2007


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



Re: [delphi-br] Out OF Memory - O que fazer?

2007-01-27 Por tôpico Paulo Sérgio de Souza
Senhores,

À algum tempo atrás, quando trabalhava em uma máquina P2 600 54Ram - executável 
+/- 7 MB, descrobri que o erro estava relacionado à falta de mémoria mais a 
velocidade do processador, foi resolvido trocando o processador e aumentando a 
memória, mas atualmente trabalho em uma máquina AMD Athlon XP 2200+ com 1 GB de 
Ram - executável 23 MB ocorre aleatóriamente o mesmo erro (com o DM aberto ou 
não). Nota: Na equipe existem máquina com configurações superiores à minha e o 
mesmo erro ocorre de vez em quando.

Ainda estou tentando saber o motivo do erro.

Sds,

Paulo Sérgio
Desenvolvedor
MV Tecnologia Ltda - Belo Horizonte (Matriz)
[EMAIL PROTECTED]


From: Eduardo Silva dos Santos 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, January 26, 2007 12:39 AM
  Subject: Re: [delphi-br] Out OF Memory - O que fazer?


  Ja verificou o seu espaço em disco?

  Em 25/01/07, Eduardo Paci Galvão [EMAIL PROTECTED] escreveu:
  
   Olá,
  
   Amigos preciso de dicas sobre otimização do delphi. Sempre trabalhei
   com delphi mais só agora vi que não conheço a ferramenta com a qual
   trabalho. Estou trabalhando com um sistema relativamente grande (o
   executável tá com 20 MB) e simplesmente não consigo compilar o
   aplicativo dá out of memory. Isso é coisa do delphi mesmo?
  
   Pode parecer bobagem, mas tenho um projeto enorme, com .exe
   de 25 MB. Tb dava este erro. Agora, é só, ao abrir o projeto, eu
   abrir o data módulo antes, que funciona, estranho, não?
  
   Saudações,
   Eduardo Paci Galvão
   Bacharel em Engenharia Elétrica - UFMG
   Analista de Sistemas
   www.egalvao.com.br
  
   
  

  -- 
  Eduardo Silva dos Santos
  DRD Sistemas.
  (27) 3218-4201
  MSN: [EMAIL PROTECTED]
  Site: http://www.drdsistemas.com/

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



   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.410 / Virus Database: 268.17.11/652 - Release Date: 25/01/2007


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



Re: [delphi-br] Emissão de nota fiscal

2007-01-05 Por tôpico Paulo Sérgio de Souza
Bom dia pessoal,

Na impressão de nota fiscal, a lesgislação atual não se pode mais emitir uma 
nota para cada quantidade x de itens, a numeração que já vem impressa em 
vermelho é o número do formulário e não da Nota Fiscal. O certo e imprimir 
quantos formulários necessários até o total de quantidades de itens colocando o 
mesmo número de Nota Fiscal nos formulários. À época que desenvolvi a rotina de 
impressão de Notas Fiscais gerei pelos menos quatro rotinas para impressão 
sendo:

1: rotina para impressão do cabeçalho;
2: rotina para impressão dos itens;
3: rotina para impressão do rodapé (Totalizadores, transportadora, obs., etc);
4: rotina para reimpressão do cabeçalho e rodapé para as Notas Fiscais com mais 
de um formulário.
   Obs.: Antes de começar a imprimir, verifico qual a quantidade de itens 
contém a nota e qual a quantidade de itens podem ser impressos por formulário 
(setado por uma pré-configuração);

Ao imprimir a nota fiscal, para quando a nota possuir mais de um formulário, 
devo considerar que os dados do rodapé devem ser impressos somente no último 
formulário sendo que os formulários anteriores devem conter (*) asteriscos ou 
(X) em seus campos. Para saber quando é o último formulário calculava a cada 
passagem de um item o cálculo de :

while not qryItensNF.eof do
begin
  ImprimeItensNotas;

  QTDE TOTAL ITEM NOTA := QTDE TOTAL ITEM NOTA -  1;

  if QTDE TOTAL ITEM NOTA  QTDE TOTAL ITEM FORMULÁRIO then
  ImprimirRodapeCompleto := True;
  if (Verificar se é necessário dar um saldo de página) then
  begin
Reimprimir Rodape;
NewPage;
Reimprimir Cabecalho;
  end;
  qryItensNF.Next;
end;

if ImprimirRodapeCompleto then
  ImprimirRodapeCompleto;

Nota: Fiz toda esta rotina utilizando o Print.Canvas;

Espero ter ajudado.

Paulo Sérgio
Desenvolvedor
MV Tecnologia Ltda - Belo Horizonte (matriz)
[EMAIL PROTECTED]
www.mvtec.com.br 
Tel:(31) 3286-0106 - Fax: (31) 3286-1266

  - Original Message - 
  From: Eduardo Silva dos Santos 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, January 05, 2007 1:51 AM
  Subject: Re: [delphi-br] Emissão de nota fiscal


  Eu acho que essa questão da nota depende do tipo do formulario, o modulo 1
  se não engano ja vem com a numeração impressa em vermelho, dai nao daria pra
  imprimir duas notas com o mesmo número.

  alguém ja usa esse tipo de impressão?

  uma vez vi numa empresa e era assim, se tivesse muitos itens o sistema
  pulava para a outra folha, so nao lembro como ficava a numeração.

  2007/1/4, Andrei Luís [EMAIL PROTECTED]:
  
   Sim, Mário, esta é uma opção. Mas não seria mais fácil para o usuário
   digitar uma NF com qtos itens quiser e o sistema imprimir de acordo?
  
   Eu também estou envolvido com desenvolvimento de um sistema que vai
   imprimir NFs e estou caminhando na mesma direção o Régis.
  
   []
   Andrei
  
   Em 04/01/07, Mario Lucio[EMAIL PROTECTED]marioluciovs%40bol.com.br
   escreveu:
Eu tenho um sistema que imprimir Nota Fiscal, mas cada nota tem seu
   número.
o que eu faço coloquei na venda do produto uma função onde ele só pode
   fazer X itens(quantidade de itens que a nota pode emitir) se tiver mais
   itens ele tem que gerar outra nota fiscal.
   
   
Mario Lucio
   
- Original Message -
From: Alessandro DUARTE de Moraes
To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
Sent: Thursday, January 04, 2007 9:09 AM
Subject: Re: [delphi-br] Emissão de nota fiscal
   
   
Cara, vc pode criar uma variável para contar o número de produtos.
   Quando tiver o número máximo, chame a função [NEWPAGE] do próprio
   FastReport.
   
[]'s
   
- Original Message -
From: Régis Júlio Bender
To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
Sent: Wednesday, January 03, 2007 9:08 PM
Subject: [delphi-br] Emissão de nota fiscal
   
Boa noite,
   
estou com um problema na impressao de notas fiscais com umas quantidade
   de produtos superior a suportada.
Por exemplo, na nota fiscal cabem 12 itens, mas existem 20 para serem
   impressos. Ele deverá jogar em duas notas com o mesmo número.
Sei que existe uma propriedade chamada 'force new page' ou algo
   parecido, mas não sei aonde.
alguém pode me ajudar???
   
   
  

  -- 
  Eduardo Silva dos Santos
  DRD Sistemas.
  (27) 3218-4201
  MSN: [EMAIL PROTECTED]
  Site: http://www.drdsistemas.com/

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



   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.409 / Virus Database: 268.16.4/615 - Release Date: 03/01/2007


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



[delphi-br] Pedido de sugestoes para envio de atualizacoes aos clientes

2007-01-01 Por tôpico Paulo Sérgio Dias
Pessoal:

Peco licenca de escrever essa mensagem um tanto longa,
para descrever minha situacao.  Ao final, solicito algumas
dicas de voces.

Muito obrigado pela atencao de todos
Paulo

Tenho por volta de 30 clientes que utilizam meus sistemas,
em varias cidades do estado de Sao Paulo.

Quando tenho que enviar atualizaoes do executavel
(correcao de algum bug, mudanca na legistacao fiscal, etc.),
eu envio um programinha que roda varios scripts, para
atualizar o banco de dados, e envio cada executavel
em formato ZIP (Contas a Pagar/Receber, Faturamento,
Estoque, etc.)

Do jeito que esta´, o usuario que recebe (via e-mail)
esses arquivos, tem de saber varias coisas: nome do seu SERVIDOR,
pasta onde estao os executaveis, saber usar o WinZip, ter direito
de gravar na pasta onde estao os executaveis, saber copiar
os executaveis antigos (caso algo saia errado), etc.

Nos clientes que possuem um funcionario na area de Informatica,
nao ha´ problema - o processo e´ bem simples.  Porem, em clientes
pequenos, onde so´ ha´ pessoas que nao sao de Informatica,
gasto muito tempo ao telefone tendo que relembrar como se usa
o Windows Explorer, o WinZip, etc.

Pergunta:
---

Solicito a gentileza de comentarem como e´ que voces tratam esse
tipo de atualizacao.  Voces criaram algum programa que guarda
informacoes no registro do Windows, faz backup automatico
dos executaveis atuais, antes de sobrescreve-los, etc., etc. ?

Agradeco antecipadamente por todas as dicas que puderem me enviar.

Muito obrigado 


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



[delphi-br] Como gerar htmls a partir de um RPT ja' existente

2006-12-15 Por tôpico Paulo Sérgio Dias
Uso o Delphi 2006.

Tenho um modulo que salva relatorios em uma pasta,
em formato RPT (relatorios gerados pelo componente
RvSystem, da paleta RAVE).

Criei um outro modulo que tem de ler esses RPTs e
transforma-los em HTML.  Coloquei um componente
RvRenderHTML nesse modulo, para 
ler o arquivo RPT e gerar um .HTML.

Porem, o HTML resultante fica com letra em tamanho
diferente do relatorio original.  O original tem fonte
tamanho 10 e o HTML tem fonte 9, (alguma coisa).

Existe algum modo de configurar o tamanho das letras
a serem geradas no HTML, para que o layout do
arquivo HTML fique o mais proximo possivel do
arquivo RPT original ?

Grato pela atencao de todos
Paulo




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



Re: [delphi-br] Habilitar e desabilitar triggers no banco Firebird via Delphi

2006-12-14 Por tôpico Paulo Sérgio de Souza
Bom dia, Paulo Yahoo

Coloque uma query com o script:

alter trigger NOME_TRIGGER inactive;

e dê Commit;

Para re_habilitá-la:

alter trigger NOME_TRIGGER active;

Espero ter ajudado.

Sds,

Paulo Sérgio
Desenvolvedor
MV Tecnologia Ltda - Belo Horizonte (matriz)
[EMAIL PROTECTED]
www.mvtec.com.br 
Tel:(31) 3286-0106 - Fax: (31) 3286-1266


  - Original Message - 
  From: Paulo Yahoo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, December 14, 2006 8:44 AM
  Subject: [delphi-br] Habilitar e desabilitar triggers no banco Firebird via 
Delphi


  Bom dia

  Utilizo banco Firebird 1.53 e gostaria de saber dos amigos que utilizam 
  Delphi e Firebird, se existe alguma forma de habilitar e desabilitar uma 
  determinada trigger via Delphi.

  obrigado

  Paulo Lucas





  ___ 
  Você quer respostas para suas perguntas? Ou você sabe muito e quer 
compartilhar seu conhecimento? Experimente o Yahoo! Respostas !
  http://br.answers.yahoo.com/ 


   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.409 / Virus Database: 268.15.18/586 - Release Date: 13/12/2006


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



Re: [delphi-br] Jedi VCS [ problema no datamodule]

2006-12-13 Por tôpico Paulo Sérgio de Souza
Bom dia Gabriel,

O JEDI VCS pede para reiniciar o projeto para todos os DataModules, Forms e 
Units que são usados como master quando no Check in/Synchronaze destes para 
serem atualizados.

Espero ter ajudado.

Sds,

Paulo Sérgio
Desenvolvedor
Bhte./ MG


- Original Message - 
  From: Gabriel Herdt 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, December 13, 2006 8:20 AM
  Subject: [delphi-br] Jedi VCS [ problema no datamodule]


  no JEDI VCS, não
  consigo usar o DataModule corretamente. Tem vezes que
  atualiza(Check in/out), as vezes não. Não sei oque fazer. Tem algum
  procedimento especial em Forms tipo DataModule?

  sds Gabriel



   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.409 / Virus Database: 268.15.16/582 - Release Date: 11/12/2006


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



[delphi-br] Como enviar e-mail com arquivo atachado atraves do Outlook Express

2006-12-06 Por tôpico Paulo Sérgio Dias
Pessoal:

Alguem tem alguma rotina que, a partir de um programa Delphi 7
(ou D2006) chame o Outlook Express e monte um e-mail com um
arquivo atachado ?

Encontrei algumas rotinas na Internet, mas as que funcionam
nao permitem atachar arquivos, e as que permitem atachar arquivos
nao funcionam direito.

Obs.:  Tem de ser pelo Outlook Express ou pelo leitor de e-mail padrao
do usuario.  So' nao posso enviar diretamente (motivos especificos dos
meus usuarios).  Por isso nao estou usando componentes para envio
de e-mail.

Grato pela atencao de todos
Paulo



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



[delphi-br] Como ler o conteudo de uma Hyperlinkcolumn de um DataGrid

2006-11-28 Por tôpico Paulo Sérgio Dias
Pessoal:

(ja' perguntei em listas especificas de ASP.NET, mas nao consegui nada;
peco licenca para apelar a voces):

- Nao tenho muita pratica em programacao .NET.

- Tenho um sistema em ASP.NET, feito em Delphi 2006.Net

- Preciso percorrer as linhas de um DataGrid e ler o valor da primeira
coluna

- Fiz um laco tipo for i := 0 to (DataGrid1.items.Count -1)
 para ler cada linha (o Delphi nao possui o for each)

- No entanto, ao ler a propriedade DataGrid.Items[i].Cells[0].Text
(Cells[0] é a primeira coluna do DataGrid), o texto esta' vazio.

- Se eu leio Cells[1].Text ou Cells[2].Text, etc., que sao colunas
comuns (BoundColumn) consigo ler os dados.  O problema e' que
a coluna HyperlinkColumn (ou seja, Cells[0]) está com a propriedade
Text vazia.

- Sera' que o erro está no modo como eu criei a HyperlinkColumn ou populei o
DataGrid ?

Grato pela atencao de todos
Paulo


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



Re: [delphi-br] DBLookupComboBox

2006-11-24 Por tôpico Paulo Sérgio de Souza
Bom dia Tiago,

Para que o DBLookupComboBox mostre mais de 1 é necessário dar um FetchAll logo 
após o Open de sua query.

Espero ter ajudado.

Sds,

Paulo Sérgio
Desenvolvedor
Bhte./MG


  - Original Message - 
  From: Tiago de Assis Pimenta 
  To: Grupo Delphi 
  Sent: Thursday, November 23, 2006 5:51 PM
  Subject: [delphi-br] DBLookupComboBox


  Galera, sempre tive esse duvida e nunca consegui achar uma resposta para ela
  .

  Qual prop do DBLookupComboBox que a gente altera para quando se clicar na
  seta ela abrir com 5 linhas por ex.

  No meu caso aqui ela esta abrindo só com 1 linha, e eu quero que ele mostre
  todos usuários do meu sistema para eu poder escolher para me logar, só que
  ele abre de 1 em 1 , dai fica foda.

  Abraço 

  Tiago de Assis Pimenta

  MSN: mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]
  SKYPE: tiagopimenta_skype
  GTALK: mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]


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



   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.409 / Virus Database: 268.14.14/547 - Release Date: 22/11/2006


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



Re: [delphi-br] Erro SQL

2006-11-06 Por tôpico Paulo Sérgio de Souza
Bom dia Stainle,

Se o seu banco de dados for Firebird, substitua os substring(campo,x,x) por 
substring(campo from x order x).

Espero ter ajudado,

Paulo Sérgio
Desenvolvedor
BHte./MG
 
  - Original Message - 
  From: stainle2003 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, November 06, 2006 10:04 AM
  Subject: [delphi-br] Erro SQL


  usando o TQuery do Bde funciona; usando o TSQLDataSet do DBExpress
  dá o seguinte erro:

  SQL State : 42000,SQL Error Code: 170
  Line 1: Incorrect syntax near ','.

  não se arrumar este erro; o código está abaixo,
  grato
  Stainle

  select substring(mat.tcodigo, 1, 3) as linha, mat.tiimes, mat.tiano, 
  sum(mat.ttotal) as Matriz,
  (select  sum(f03.ttotal) from esif03 f03
  where (substring(mat.tcodigo, 1, 3) = substring(f03.tcodigo, 1, 3)) 
  and (mat.tiimes = f03.tiimes) and (mat.tiano = f03.tiano)
  and (f03.tiopera = 2) and (f03.tihisto = 'S')) as Brasilia,
  (select  sum(f04.ttotal) from esif04 f04
  where (substring(mat.tcodigo, 1, 3) = substring(f04.tcodigo, 1, 3)) 
  and (mat.tiimes = f04.tiimes) and (mat.tiano = f04.tiano)
  and (f04.tiopera = 2) and (f04.tihisto = 'S')) as Poa,
  (select  sum(f05.ttotal) from esif05 f05
  where (substring(mat.tcodigo, 1, 3) = substring(f05.tcodigo, 1, 3)) 
  and (mat.tiimes = f05.tiimes) and (mat.tiano = f05.tiano)
  and (f05.tiopera = 2) and (f05.tihisto = 'S')) as Belo,
  (select  sum(f06.ttotal) from esif06 f06
  where (substring(mat.tcodigo, 1, 3) = substring(f06.tcodigo, 1, 3)) 
  and (mat.tiimes = f06.tiimes) and (mat.tiano = f06.tiano)
  and (f06.tiopera = 2) and (f06.tihisto = 'S')) as Curitiba,
  (select  sum(f07.ttotal) from esif07 f07
  where (substring(mat.tcodigo, 1, 3) = substring(f07.tcodigo, 1, 3)) 
  and (mat.tiimes = f07.tiimes) and (mat.tiano = f07.tiano) 
  and (f07.tiopera = 2) and (f07.tihisto = 'S')) as SantaCata
  from esimat mat
  where (mat.tiimes = :pmes) and (mat.tiano = :pano) and (mat.tiopera = 
  2) and (mat.tihisto = 'S')
  group by mat.tiimes, mat.tiano, substring(tcodigo, 1, 3)
  order by linha



   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.409 / Virus Database: 268.13.28/518 - Release Date: 04/11/2006


[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] Erro SQL

2006-11-06 Por tôpico Paulo Sérgio de Souza
Me desculpe Stainle,

O correto (se o banco de dados for Firebird) é substring(campo from x for y). ok

Sds,

Paulo Sérgio
Desenvolvedor
B.Hte./MG

  - Original Message - 
  From: Paulo Sérgio de Souza 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, November 06, 2006 10:32 AM
  Subject: Re: [delphi-br] Erro SQL


  Bom dia Stainle,

  Se o seu banco de dados for Firebird, substitua os substring(campo,x,x) por 
substring(campo from x order x).

  Espero ter ajudado,

  Paulo Sérgio
  Desenvolvedor
  BHte./MG

- Original Message - 
From: stainle2003 
To: delphi-br@yahoogrupos.com.br 
Sent: Monday, November 06, 2006 10:04 AM
Subject: [delphi-br] Erro SQL


usando o TQuery do Bde funciona; usando o TSQLDataSet do DBExpress
dá o seguinte erro:

SQL State : 42000,SQL Error Code: 170
Line 1: Incorrect syntax near ','.

não se arrumar este erro; o código está abaixo,
grato
Stainle

select substring(mat.tcodigo, 1, 3) as linha, mat.tiimes, mat.tiano, 
sum(mat.ttotal) as Matriz,
(select  sum(f03.ttotal) from esif03 f03
where (substring(mat.tcodigo, 1, 3) = substring(f03.tcodigo, 1, 3)) 
and (mat.tiimes = f03.tiimes) and (mat.tiano = f03.tiano)
and (f03.tiopera = 2) and (f03.tihisto = 'S')) as Brasilia,
(select  sum(f04.ttotal) from esif04 f04
where (substring(mat.tcodigo, 1, 3) = substring(f04.tcodigo, 1, 3)) 
and (mat.tiimes = f04.tiimes) and (mat.tiano = f04.tiano)
and (f04.tiopera = 2) and (f04.tihisto = 'S')) as Poa,
(select  sum(f05.ttotal) from esif05 f05
where (substring(mat.tcodigo, 1, 3) = substring(f05.tcodigo, 1, 3)) 
and (mat.tiimes = f05.tiimes) and (mat.tiano = f05.tiano)
and (f05.tiopera = 2) and (f05.tihisto = 'S')) as Belo,
(select  sum(f06.ttotal) from esif06 f06
where (substring(mat.tcodigo, 1, 3) = substring(f06.tcodigo, 1, 3)) 
and (mat.tiimes = f06.tiimes) and (mat.tiano = f06.tiano)
and (f06.tiopera = 2) and (f06.tihisto = 'S')) as Curitiba,
(select  sum(f07.ttotal) from esif07 f07
where (substring(mat.tcodigo, 1, 3) = substring(f07.tcodigo, 1, 3)) 
and (mat.tiimes = f07.tiimes) and (mat.tiano = f07.tiano) 
and (f07.tiopera = 2) and (f07.tihisto = 'S')) as SantaCata
from esimat mat
where (mat.tiimes = :pmes) and (mat.tiano = :pano) and (mat.tiopera = 
2) and (mat.tihisto = 'S')
group by mat.tiimes, mat.tiano, substring(tcodigo, 1, 3)
order by linha



 


  --


No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.409 / Virus Database: 268.13.28/518 - Release Date: 04/11/2006


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

   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.409 / Virus Database: 268.13.28/518 - Release Date: 04/11/2006


[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] Sender TWinControl

2006-11-06 Por tôpico Paulo Sérgio de Souza
Boa tarde Cristiano,

Você pode fazer assim:

Var
  ScrollName: String;
  Indice: Integer
begin
  if (Sender is TPanelPraca) then
  begin
ScrollName := 'ScP_' + copy(TPanelPraca(sender).Name;
for Indice := 0 to Form.ComponentCount -1 do
  if  UpperCase(Form.Components[Indice].Name) = UpperCase(ScrollName) then
  begin
Form.Components[Indice].Heigth :=  100;
Break;
  end;
  end;
end;

Espero ter lhe ajudado.

Sds,

Paulo Sérgio
Desenvolvedor
B.Hte./MG
  - Original Message - 
  From: cristianopintado 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, November 06, 2006 12:39 PM
  Subject: [delphi-br] Sender TWinControl


  Gente, eu crio alguns componetes em tempo de execução, e dou alguns 
  nomes a eles. O que eu preciso é seleciona-los com o nome em formato 
  de texto. O que acontece é exatamente o seguinte:

  Dentro de um ScrollBox, Eu crio vários Scroll, cada um com um 
  componente TPanel (que uso como botão) e vários labels dentro dos 
  mesmos Scroll, o Panel serve para quando eu clicar ele selecionar o 
  Scrol a qual ele pertence (propriedade Parent apontada para o 
  scrol) ele teria de mudar a propriedade heigth deste scrol. Quando 
  Clico no Tpanel, pego o nome dele:

  Scrol : String;
  begin
  if (Sender is TPanelPraca) then
Scrol := 'ScP_' + copy(TPanelPraca(sender).Name, 4,Length; que 
  é o nome do Scroll. Dou um nome parecido ao Tpanel para saber como 
  pegar o nome, mas em String..

  O que eu preciso saber é se é possivel eu setar como ativo um exemplo:


  Scrol.heigth := 100; //Isso não funciona 

  Como eu poderia setar um componente sabendo só o nome dele?

  alguém sabe?

  Abraços..


   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.409 / Virus Database: 268.13.28/518 - Release Date: 04/11/2006


[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] Impressora Laserjet colorida hp não imprime...

2006-11-01 Por tôpico Paulo Sérgio Dias
Estou com um problema, tenho uma impressora laser colorida da hp instalada em 
uma máquina.
 Na maquina local o sistema imprime normalmente nas maquinas remotas o sistema 
 não imprime.

O que voce usa para imprimir ?
Algum componente, writeln, etc. ?


Paulo

[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

 



[delphi-br] Impressora para imprimir em papel de bobina - matricial ou termica

2006-10-31 Por tôpico Paulo Sérgio Dias
O responsavel por um clube esportivo, que e' meu cliente, perguntou-me que tipo 
de
impressora comprar, para emitir recibos de pagamento aos socios (papel em 
bobinas):

matricial ?
termica ?

Qual dos dois tipos da' mais manutencao ?
Sei que existe a termica que usa papel especial e a termica que usa uma fita 
(ribbon ?)
que gruda no papel.  Sabem dizer quais as vantagens/desvantagens de cada uma.

Muito obrigado pela atencao de todos

Paulo

[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] Delphi + Zeos + MySql

2006-10-31 Por tôpico Paulo Sérgio de Souza
Boa tarde,

José Edvando, a linha:

if Connected then Disconnect;

 está dentro de um try..Except silencioso.

Você não acha que se deve colocar uma mensagem dentro do except?

Sds,

Paulo Sérgio
B.Hte./MG

  - Original Message - 
  From: José Edvandro Máximo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, October 31, 2006 4:06 PM
  Subject: Re: [delphi-br] Delphi + Zeos + MySql


  COLOQUE NO ONCREATE DO FORM

  m_ini := TIniFile.Create(ChangeFileExt(Application.ExeName, '.ini'));

with m_ini do begin
  // db connection
  with ZConn do
  begin
try
  if Connected then Disconnect;
except
end;
Database := ReadString('DB', 'DATABASE', 'dbcmanager');
WriteString('DB', 'DATABASE', Database);
HostName := ReadString('DB', 'HOSTNAME', '');
WriteString('DB', 'HOSTNAME', HostName);
Port := ReadInteger('DB', 'PORT', 3306);
WriteInteger('DB', 'PORT', Port);
User := ReadString('DB', 'USER', 'root');
WriteString('DB', 'USER', User);
Password := ReadString('DB', 'PASSWORD', '');
WriteString('DB', 'PASSWORD', Password);
Protocol := ReadString('DB', 'PROTOCOL', 'mysql');
WriteString('DB', 'PROTOCOL', Protocol);
try
 Connect;
  if not Connected then
  begin
MessageDlg('Não foi possível conectar-se a base de dados!',
  mtError, [mbOK], 0);
Application.Terminate;
exit;
  end
except
  On E: Exception Do
  Begin
MessageDlg('Não foi possível conectar-se a base de dados!' +
  #13#10
  + E.Message,
  mtError, [mbOK], 0);
Application.Terminate;
exit;
  End;
end;
  end;





  2006/10/30, Andre Mesquita [EMAIL PROTECTED]:
  
   Galera,
  
   Alguém aí já teve alguma aplicação utilizando Delpli + Zeos + MySQL
   que
   acontecia perda constante de conexão com o banco de dados? Caso positivo,
   como foi solucionado?
  
   [ ]'s,
  
   Andre
  
   
  


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

   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.409 / Virus Database: 268.13.19/507 - Release Date: 31/10/2006


[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] ZeosLib

2006-10-26 Por tôpico Paulo Sérgio de Souza
Caros colegas,

Além do link informado pelo André, tem também o forum:

http://forum.zeoslib.net.ms/

Sds,

Paulo Sérgio de Souza
Desenvolvedor
Bhte./ MG


  - Original Message - 
  From: Andre Mesquita 
  To: delphi-br@yahoogrupos.com.br 
  Cc: [EMAIL PROTECTED] 
  Sent: Wednesday, October 25, 2006 5:56 PM
  Subject: [delphi-br] ZeosLib


  Prezados Colegas,

  Fiz contato com um dos desenvolvedores da ZeosLib e este me enviou um 
  site onde pode-se encontrar o Zeos atualizado.

  http://zeos.firmos.at/

  [ ]'s,

  Andre Mesquita



   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.408 / Virus Database: 268.13.11/496 - Release Date: 24/10/2006


[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] Conexão com MySql (A/C Andre)

2006-10-24 Por tôpico Paulo Sérgio de Souza
Boa tarde comuninade.

Douglas,

Conversando com um amigo, descobri que o projeto do zeos está realmente parado 
no side do sourceforge.net mas no link http://users.telenet.be/mdaems/ você 
encontra versões totalmente atualizadas.

Espero ter ajudado.

Sds

Paulo Sérgio
Desenvolvedor
Bhte./ MG

  - Original Message - 
  From: Douglas Uesato - Depto. de Informática 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, October 24, 2006 10:28 AM
  Subject: RES: [delphi-br] Conexão com MySql (A/C Andre)


  Andre,

De acordo com o site (
  http://sourceforge.net/project/showfiles.php?group_id=35994 ) a última
  atualização do projeto disponível para download é(13/10/2005), ou seja, já
  faz 1 ano que o projeto está parado, isso é muito tempo para um projeto
  OpenSource.

Devido a grande demora em atualizar um projeto OpenSource, a
  comunidade acaba descentralizando a atualização do projeto, foi o que
  aconteceu com você. Provavelmente você precisou usar a biblioteca para
  acessar o MySQL 5 e não pode porque não havia nenhum Update da ferramenta
  que possibilitava isso. Contudo, com sua experiência acabou por você mesmo
  fazer a devidas alterações de forma que atendesse a suas necessidades.
  Agora, você tem o código atualizado e o resto da comunidade não, o que ruim.

Ora, eu mesmo precisei usar o ZeosDBO com o MySQL 5 e não obtive
  êxito, foi o que me levou a usar o DBExpress com o driver da CoreLab e
  diga-se de passagem eu estou muito contente com os resultados.

Posso estar muito enganado a respeito de tudo isso que eu falei,
  inclusive peço desculpas se for o caso, mas projetos OpenSource devem estar
  em uma linha constante de evolução.


  Atenciosamente,
  Douglas Uesato




  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Andre Mesquita
  Enviada em: terça-feira, 24 de outubro de 2006 11:53
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Conexão com MySql

  Descontinuado?

  O índice de atividade no SourceForge não diz isso.

  Eu já até criei uma versão interna com suporte para MySQL 5 (usando a nova 
  DLL).

  [ ]'s



  - Original Message - 
  From: Douglas Uesato - Depto. de Informática [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Tuesday, October 24, 2006 8:34 AM
  Subject: RES: [delphi-br] Conexão com MySql


  Eu utilizo os componentes padrão do Delphi (DBExpress), já utilizei
  o ZeosDBO porém este projeto está descontinuado o que pode trazer problemas
  mais para frente.

  Atenciosamente,
  Douglas Uesato

  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Andre Mesquita
  Enviada em: terça-feira, 24 de outubro de 2006 10:55
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Conexão com MySql


  Aqui na empresa usamos o ZeosDbo sem Problemas.


  - Original Message - 
  From: Vinicius Latini [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br; Lista-delphi
  [EMAIL PROTECTED]
  Sent: Tuesday, October 24, 2006 1:57 AM
  Subject: [delphi-br] Conexão com MySql


  Estou tendo duvida de como fazer uma aplicação conectar a uma base de dados
  Mysql

  alguem ai já conseguiu ??
  valeu ...


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




  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Links do Yahoo! Grupos





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Links do Yahoo! Grupos






  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Links do Yahoo! Grupos





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Links do Yahoo! Grupos




   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.408 / Virus Database: 268.13.11/493 - Release Date: 23/10/2006


[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] Criar nova propriedade no treeview

2006-10-03 Por tôpico Paulo Sérgio de Souza
Boa Tarde Alexandre,

Para atribuir uma nova propriedade ao TreeView utilize ponteiros. Após o type 
de seu formulário coloque:

  TIdOpcao = record
Permissao: Boolean;
  end;
  TPonterio = ^TIdOpcao;

Crie uma variável privativa do tipo:

  Ponteiro: TPonterio;

 
Para atruir um valor ao ponteiro:

inc(Ponteiro);
Ponteiro^.Permissao := False;

  ou  
Inc(Ponteiro);
TPonteiro(TreeView.Items.Item[i].Data)^.Permissao := True;

Para ler o valor atribuido ao Ponteiro:

  Valor := TPonteiro(TreeView.Items.Item[i].Data)^.Permissao;

Obs.: Este de método consome uma boa quantidade de memória. Antes de 
fechar/destruir o formulário limpe a memória:

for i := 0 to TreeView.Items.count - 1 do
(TreeView.Items.Item[i].Data := nil;

Espero ter lhe ajudado.

Sds,

Paulo Sérgio
Desenvolvedor
Belo Horizonte/MG

- Original Message - 
  From: Alexandre M. S. Macedo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, October 03, 2006 1:39 AM
  Subject: [delphi-br] Criar nova propriedade no treeview


  Olá a Todos,

 Estou precisando que o treeview tenha mais uma propriedade em seu 
  nó. Exemplo: TreeView1.item[0].Novapropriedade

  Fico grato por qq ajuda.

  []´s
  Alexandre 








   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.407 / Virus Database: 268.12.12/461 - Release Date: 02/10/2006


[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

 





[delphi-br] Como obter o numero IP de uma maquina

2006-09-14 Por tôpico Paulo Sérgio Dias
Pessoal:

Como obter o numero IP de uma maquina, via codigo em Delphi ?

Grato pela atencao de todos

Paulo





[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] Como vocês fazem isso? Tratar esto que com Firebird.

2006-09-05 Por tôpico Paulo Sérgio de Souza
Bom dia, Fellipe.

Como já disse o Eduardo 'As alterações realizadas dentro da transação  só são 
vistas dentro da transação.', portanto se após a deleção do item você der um 
commitRetaining as informações irão para o banco, mas só serão vistas pela 
própria transação. Quando você fizer uma nova consulta os dados irão lhe 
aparecer atualizados, mas quando você cancelar as alterações dando um 
rollbackRetaining a transaçao desfaz tudo que ela fez voltando o banco de dados 
para as informações anteriores ao CommitRetainig.

Todas as alterações efetuadas no banco pela transação só serão efetivamente 
confirmadas após um Commit.

Espero ter lhe ajudado.

Sds,

Paulo Sérgio de Souza
Desenvolvedor - BHte./MG


- Original Message - 
  From: Fellipe Henrique 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 05, 2006 10:58 AM
  Subject: Re: [delphi-br] Como vocês fazem isso? Tratar estoque com Firebird.


  Eduardo, acho que você não entendeu...
  Tenho uma transacao que cuida do item do pedido, e nele eu vou lá e deleto o
  item... blz.. dei lá o Delete na tabela.. vou e incluo outro item, abro uma
  tela que me mostra os items com o devidos estoques... e nesta tela nao tem o
  estoque.. que eu acabei de deletar, pois nao foi pro banco..

  ou seja, o que eu fizer nesta transacao soh vai ser visto pelo programa
  depois da transacao.. ou seja, exclui lá o item... e numa outra tabela eu
  der um select trazendo a quantidade da tabela, esta quantidade nao sera a
  real, pois a quantidade do item que eu deletei nao estará nela... a nao ser
  q eu comite a transacao, aih o meu select irá ver a quantidade q está no
  estoque...

  ou seja, eu posso fazer tudo na transacao, mas o select que eu der pra
  buscar meu estoque nao será o atual, a nao ser que eu comite a transacao..

  entendeu?

  []s

  Em 05/09/06, Eduardo [EMAIL PROTECTED] escreveu:
  
   Se você esta dentro da transação qual é o problema 
  
   Você fará o update na tabela normalmente.
  
   Você só vai salvar ou cancelar a transação no final.
  
   As alterações realizadas dentro da transação  só são vistas dentro da
   transação.
  
   Se você fizer uma seleção por fora na hora desta transação nada vai
   aparecer, mas se dentro desta conexão você trabalha normalmente, no
   final ou você salva (COMMIT) ou cancela (ROLLBACK).
  
  
  
   Eduardo
  
   Fellipe Henrique escreveu:
Olá Eduardo, mas como eu teria de atualizar o estoque sem dar o
commit? Pois
se eu der o commit e o usuário cancelar a edição, não terá como eu
voltar!?
Entendeu o problema?
   
[]s
Fellipe H.
   
Em 05/09/06, Eduardo [EMAIL PROTECTED] escreveu:

 Você esqueceu de atualizar o estoque na exclusão do item.
 Se você iniciou a transação não terá problema algum, basta ao excluir
 recalcular o estoque. O mesmo deve ser feito quando você terminar o
 processo, já que a quantidade pode ser alterada.


 Eduardo


 Fellipe Henrique escreveu:

  Olá amigos, meu sistema utiliza IBX, com Firebird 1.5, com
transações em
  ReadCommited... Todo cadastro e movimento, ao abrir inicio a
transação..
  depois se o usuário quiser salvar ou cancelar, dou o Commit ou
Rollback,
  dependendo da situação.
 
  Pois bem, só que depois de quase tudo pronto me veio um problemão...
   o
  Estoque...
 
  Vamos supor que eu tenho uma venda de 100 unidades do produto X, já
  salva na
  minha tabela.. e o estoque atual é 50 unidades...
 
  vou alterar a venda, e excluo o item no DBGrid referente a estas 100
  unidades...
 
  Pois bem, ao incluir um novo registro (item) eu verifico no banco
se tem
  estoque e se tiver eu deixo por o item lá na venda..
 
  pois bem, voltando ao problema... removi o item com 100 unidades,
porem
  ainda nao foi pro banco de dados, pois ainda nao dei o commit
e se o
  usuario quiser novamente por os 100 de volta nao vai poder pois o
 estoque
  atual está com 50.
 
  O problema piora, se eu tiver que dar o commitretaing apos a
exclusao do
  item... pois comitei e tals, foi pro banco, problema resolvido.. e
   se
 ele
  cancelar a edicao da venda!? como cancelar aquele commit que eu dei,
   e
  voltar com os 100 pro pedido de venda!?
 
  Bem, é isso, espero ter explicado o mais claro possivel... espero
  ajuda dos
  amigos que mexem com isso... pois j[á pirei a cabeça e não achei uma
  solução.
 
 
  Desde já agradeço a todos...
 
  []s
 
  --
  _
  Fellipe Henrique
  [EMAIL PROTECTED]
 
  Borland Developer Studio 2006 Certified
 
  Venham até a borda, ele disse.
  Eles disseram: Nós temos medo.
  Venham até a borda, ele insistiu.
  Eles foram, Ele os empurrou...
  E eles voaram.
  (Guillaume Apollinaire

Re: [delphi-br] DBGrid!

2006-09-05 Por tôpico Paulo Sérgio de Souza
No evento AfterInsert da query que carrega o DBGrid coloque:

if CancelaInclusao then
begin
  query.Cancel;
  query.Edit;
end;

Crie a variável boleana CancelaInclusao no private de seu formulário e 
atribuia True à ela no Onshow.

Sds,

Paulo Sérgio de Souza
Desenvolvedor - BHte./MG

  - Original Message - 
  From: nunodetorres 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 05, 2006 1:13 PM
  Subject: [delphi-br] DBGrid!


  Olá!
  Gostaria de saber como faço para não passar de linha em uma DBGrid, ou 
  seja, eu carrego ela com dados e não pode inserir uma linha nova se 
  não aquelas que ja estão nela...

  Valeu!



   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.1.405 / Virus Database: 268.11.7/437 - Release Date: 04/09/2006


[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

 




[delphi-br] Mais uma duvida, sobre codigo de barras

2006-09-04 Por tôpico Paulo Sérgio Dias
Pessoal:

- Ao imprimir códigos de barras, existe um espaço mínimo para
o intervalo entre as barras ?  Por exemplo: entre a barra 1 e 2,
entre a 2 e 3, etc., deve ser deixado um espaço de pelo menos
1 mm (ou 2 mm, etc.) ?

Motivo da pergunta:  Em dois leitores que testei, quando as
barras estavam muito juntas, ele não conseguiu ler
os códigos.  Quando as barras ficaram um pouco mais espaçadas,
ele leu os códigos.

A dúvida que tenho refere-se
mais especificamente aos códigos EAN128A,
EAN128B, EAN128C e ao Code39 (que são os
códigos que eu testei).

Muito obrigado pela atencao de todos
Paulo

[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

 





[delphi-br] Qual codigo de barras permite alfanumericos e 36 caracteres

2006-08-23 Por tôpico Paulo Sérgio Dias

Pessoal:

Preciso encontrar um tipo de código de barras que permita 36 caracteres
alfanumericos (de 0 a 9 e de A a Z).  Tentei usar o EAN128C, que e´ usado
em algumas situacoes pelos correios.  Ele aceita os 36 caracteres de que
preciso, mas nao permite o uso de letras.  Alguem sabe informar que
tipo de codigo de barras posso usar ?

Obs.: Eu uso um componente freeware chamado AsBarCode, que aceita varios
tipos de codigos de barras.  Meu problema nao esta´ em como gerar o
desenho do codigo de barras, e sim descobrir um que atenda ao que
mencionei acima.

Grato pela atencao de todos
Paulo


[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] DBCOMBOBOX - DELPHI 7

2006-08-22 Por tôpico Paulo Sérgio de Souza
Jean,

Segue exemplo:

with Query do
begin
  Close;
  SQL.Clear;
  SQL.Add(' select *');
  SQL.Add(' from TABELA' );
  SQL.Add(' order by CAMPO' );
  Open;
  FetchAll; *
  Contador := RecordCount;
end;

* O FetchAll carrega em memória todos os dados enviados pelo select.É 
importante trazer no select somente os campos e filtros que deseja para não 
carregar a memória e consequentemente diminuir a perfomance de seu aplicativo.

Sds,

Paulo
Desenvolvedor
BHte./MG

  - Original Message - 
  From: Jean 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 5:48 PM
  Subject: Re: [delphi-br] DBCOMBOBOX - DELPHI 7


  Desculpe Paulo ... pode me chamar de bu ... mais eu não entendi... pode 
me dar um exemplo... não sei como fazer o fetchall.

 Original Message - 
From: Paulo Sérgio de Souza 
To: delphi-br@yahoogrupos.com.br 
Sent: Monday, August 21, 2006 4:56 PM
Subject: Re: [delphi-br] DBCOMBOBOX - DELPHI 7


Boa tarde Jean,

Para resolver este problema, você deve dar um FetchAll logo após o Open da 
Query que está alimentando o dbcombobox.

Sds,

Paulo
Desenvovedor
BHte./MG
  - Original Message - 
  From: Jean 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 4:34 PM
  Subject: [delphi-br] DBCOMBOBOX - DELPHI 7


  Ola pessoal

  Estou quase a nocaute por causa deste ...Box.

  Eu tenho uma seleção de empresas em meu sistema que determina em qual 
empresa o usuario ira trabalhar a principio ficaria em um PANEL logo apos 
abaixo do menu com a escolha da empresa.codigo em um COMBOBOX... o problema  é 
que eu relaciono o dbcombobox a tabela e ao mostrar o valor do campo ele 
aparece a empresa 1 e ao criar na seta para selecionar outra empresa não me 
mostra as outras empresas que estão cadastradas. Eu gostaria que isto 
acontece-se automaticamente sem eu ter que adicional nos ITENS 
  ufa acho que é só obrigado pela atenção
  (( Não é possivel que ele não faça isto... ))) - 


  - Original Message - 
From: Rodrigo de Moura 
To: delphi-br@yahoogrupos.com.br 
Sent: Monday, August 21, 2006 4:15 PM
Subject: [delphi-br] Erro em alteração de registro.


Boa tarde amigos,

Na alteração do registro quando vou dar o applyUpdates me dá o seguinte 
erro:
Record not found or changed by another user.
Minha aplicação não está em rede e todas as configurações do 
datasetprovider estão
corretas também.
Em minhas telas de cadastro trabalho com controle de botões (incluir, 
editar, salvar,
excluir, cancelar) pelo OnStateChange do DataSource. O interessante é 
que esse erro
ocorre somente quando faço qualquer alteração no registro logo após a 
inclusão do mesmo.
Explicando: após incluir o registro clicando no botão salvar, se por 
acaso quiser fazer
alguma alteração, clico no botão editar e faço a alteração necessária. 
Quando clico no
botão salvar ocorre o citado erro.
Mas se eu sair da tela de cadastro e voltar nela novamente e pela tela 
de procura retornar o
registro para a tela do cadastro e fizer qualquer alteração é salvo 
normalmente.
Utilizo Delphi 7, DBExpress com clientDataSet, Firebird 1.5 e Driver 
UIB.
Qualquer ajuda será bem vinda!!

Atenciosamente,

Rodrigo de Moura

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

 


  
--


Internal Virus Database is out-of-date.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.10.8/415 - Release Date: 09/08/06


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

   

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

 


  --


Internal Virus Database is out-of-date.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.10.8/415 - Release Date: 09/08/06


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

   

[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] DBCOMBOBOX - DELPHI 7

2006-08-21 Por tôpico Paulo Sérgio de Souza
Boa tarde Jean,

Para resolver este problema, você deve dar um FetchAll logo após o Open da 
Query que está alimentando o dbcombobox.

Sds,

Paulo
Desenvovedor
BHte./MG
  - Original Message - 
  From: Jean 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 21, 2006 4:34 PM
  Subject: [delphi-br] DBCOMBOBOX - DELPHI 7


  Ola pessoal

  Estou quase a nocaute por causa deste ...Box.

  Eu tenho uma seleção de empresas em meu sistema que determina em qual empresa 
o usuario ira trabalhar a principio ficaria em um PANEL logo apos abaixo do 
menu com a escolha da empresa.codigo em um COMBOBOX... o problema  é que eu 
relaciono o dbcombobox a tabela e ao mostrar o valor do campo ele aparece a 
empresa 1 e ao criar na seta para selecionar outra empresa não me mostra as 
outras empresas que estão cadastradas. Eu gostaria que isto acontece-se 
automaticamente sem eu ter que adicional nos ITENS 
  ufa acho que é só obrigado pela atenção
  (( Não é possivel que ele não faça isto... ))) - 


  - Original Message - 
From: Rodrigo de Moura 
To: delphi-br@yahoogrupos.com.br 
Sent: Monday, August 21, 2006 4:15 PM
Subject: [delphi-br] Erro em alteração de registro.


Boa tarde amigos,

Na alteração do registro quando vou dar o applyUpdates me dá o seguinte 
erro:
Record not found or changed by another user.
Minha aplicação não está em rede e todas as configurações do 
datasetprovider estão
corretas também.
Em minhas telas de cadastro trabalho com controle de botões (incluir, 
editar, salvar,
excluir, cancelar) pelo OnStateChange do DataSource. O interessante é que 
esse erro
ocorre somente quando faço qualquer alteração no registro logo após a 
inclusão do mesmo.
Explicando: após incluir o registro clicando no botão salvar, se por acaso 
quiser fazer
alguma alteração, clico no botão editar e faço a alteração necessária. 
Quando clico no
botão salvar ocorre o citado erro.
Mas se eu sair da tela de cadastro e voltar nela novamente e pela tela de 
procura retornar o
registro para a tela do cadastro e fizer qualquer alteração é salvo 
normalmente.
Utilizo Delphi 7, DBExpress com clientDataSet, Firebird 1.5 e Driver UIB.
Qualquer ajuda será bem vinda!!

Atenciosamente,

Rodrigo de Moura

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

 


  --


Internal Virus Database is out-of-date.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.10.8/415 - Release Date: 09/08/06


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

   

[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] DbGrid..

2006-08-18 Por tôpico Paulo Sérgio de Souza
Bom dia Doretto.

Você já verificou como está o order by da sua query? Possivelmente a ordenação 
está considerando o campo PRECO.

Sds.

Paulo
Desenvolvedor
B. Hte./MG
  - Original Message - 
  From: Doretto 
  To: Delphi 
  Sent: Thursday, August 17, 2006 9:53 AM
  Subject: [delphi-br] DbGrid..


  Bom Dia !!!

  Estou com um probleminha no Dbgrid usando Query..

  Tenho um Dbgrid de Produtos c/ Codigo, Descricao e Preco, toda vez que eu 
altero o preco de venda e atualizo o dbgrid ele muda de posição de tela.

  Ex:

  Wcod:=QprodCodigo.asInteger;
  Qprod.Close;
  Qprod.Open;
  Qprod.Locate('Codigo',Wcod,[]);

  No dbgrid ele permanece no registro porem a posicao dos registros na tela 
muda...

  Tem como resolver isto...

  Abraço


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

   

[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] DbGrid..

2006-08-18 Por tôpico Paulo Sérgio de Souza
Boa tarde.

Quanto ao reposicionamento, você pede para a query reposicionar no registro que 
foi alterado no código QPROD.Locate(...) e quanto ao demais registros imagino 
que a query deve possuir algum parâmetro de filtro que não está sendo passado 
antes do Open. Verifique se inicialmente você passa algum parâmetro à query 
para mostrar no dbgrid.

Sds,

Paulo 
Desenvolvedor
B.Hte./MG
  - Original Message - 
  From: Doretto 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, August 17, 2006 1:41 PM
  Subject: Re: [delphi-br] DbGrid..


  Boa Tarde !!!

  O problema nao é o registro e sim o posicionamento da tela que muda, se 
  tenho em tela 10 registros (Mostrando) de um total de 1000, quando dou um 
  close e um open na Querey os 10 registros que estavam anteriormente 
  mostrados nao sao os mesmos, mas o ele posiciona no registro que eu estou 
  alterando. Não sei se ficou claro...


  Abraço
  - Original Message - 
  From: Paulo Sérgio de Souza [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Friday, August 18, 2006 11:42 AM
  Subject: Re: [delphi-br] DbGrid..


  Bom dia Doretto.

  Você já verificou como está o order by da sua query? Possivelmente a 
  ordenação está considerando o campo PRECO.

  Sds.

  Paulo
  Desenvolvedor
  B. Hte./MG
- Original Message - 
From: Doretto
To: Delphi
Sent: Thursday, August 17, 2006 9:53 AM
Subject: [delphi-br] DbGrid..


Bom Dia !!!

Estou com um probleminha no Dbgrid usando Query..

Tenho um Dbgrid de Produtos c/ Codigo, Descricao e Preco, toda vez que eu 
  altero o preco de venda e atualizo o dbgrid ele muda de posição de tela.

Ex:

Wcod:=QprodCodigo.asInteger;
Qprod.Close;
Qprod.Open;
Qprod.Locate('Codigo',Wcod,[]);

No dbgrid ele permanece no registro porem a posicao dos registros na tela 
  muda...

Tem como resolver isto...

Abraço


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



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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



  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]
 
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] OFF TOPIC - Sistema de Laboratório.

2006-02-01 Por tôpico Paulo Sérgio de Souza
Caro Rodrigo,

Tenho um colega que tem experiência em sistema de análises clínicas. Se houver 
interesse de sua parte, entre em contato com ele através do email : [EMAIL 
PROTECTED]

Sds,

Paulo Sérgio
Bhte. / MG
  - Original Message - 
  From: Rodrigo de Moura 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, January 31, 2006 2:25 PM
  Subject: [delphi-br] OFF TOPIC - Sistema de Laboratório.


  Boa tarde Pessoal,

  Alguém da lista já fez, está fazendo ou tem alguma experiência em sistemas de 
laboratórios de
  análises clínicas?
  Se sim favor entrar em contato comigo em private.
  Muito obrigado.

  Atenciosamente,

  Rodrigo de Moura

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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  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]
 
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: [DELPHI-Total] Ninguém ta conseguindo me ajudar! !!

2005-10-13 Por tôpico Paulo Sérgio
Tente assim:

query.sql.add('Update usuarios set Ultimoacesso = :Ultimoacesso where login = 
'+editusuario.text+'');
query.ParamByName('Ultimoacesso').AsString := FormatDateTime('mm/dd/yyy',date);
query.ExecSql;

Falow,





  - Original Message - 
  From: HNS Informática 
  To: DelphiTotal ; Lista DelphiBr 
  Sent: Thursday, October 13, 2005 8:18 AM
  Subject: [DELPHI-Total] Ninguém ta conseguindo me ajudar!!!


  Pessoal, recebi varias dicas e nenhuma funcionou, eu simplesmente quero 
atualizar o campo data do meu mysql que ta definido como tipo date com a data 
atual do sistema quando o usuario acessa o sistema, porém não estou 
conseguindo, parece ser simples, mas não consigo, alguém pode me ajudar:?
  segue abaixo os codigos que ja tentei...

  query.sql.add('Update usuarios set Ultimoacesso = :Ultimoacesso where login = 
'+editusuario.text+'');
  query.ParamByName('Ultimoacesso').asdate := date;
  query.ExecSql;

  query.sql.add('Update usuarios set Ultimoacesso = :Ultimoacesso where login = 
'+editusuario.text+'');
  query.ParamByName('Ultimoacesso').value := date;
  query.ExecSql;

  query.sql.add('Update usuarios set Ultimoacesso = :Ultimoacesso);
  query.ParamByName('Ultimoacesso').value := date;
  query.ExecSql;




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



  ---
Divulgue o Grupo Dephi-Total
Um favor para todos!
  ---
   Responda sempre que souber, lembre-se:
   Um dia pode ser você
  ---
  Para cancelar sua assinatura, envie um e-mail para:
  [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-total/
  
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

* 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] Campo Agregado - Esta está Difícil

2005-10-06 Por tôpico Paulo Sérgio
Cristiano,

Tente Seu_Campo_total.asFloat := StrToFloat(Campo_Aggregado.Value) ou 
Seu_Campo_total.asFloat := StrToFloat(Campo_Aggregado.AsString).

Valeu.

Paulo Sérgio
Bthe. / MG
  - Original Message - 
  From: Cristiano Rodrigo Gomes 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, October 05, 2005 10:15 AM
  Subject: Re: [delphi-br] Campo Agregado - Esta está Difícil



  Então Danilo, não funcionou, ele não leva nada, a impressão que tenho é que 
  o campo estivesse como NULL, sei lá. O estranho é que no DBEdit do SUBTOTAL 
  q é o campo AGREGADO ele mostra o valor corretamente.

  Mas vealeu, Obrigado Danilo, se tiver mais alguma sugestão fico grato.

  Cristiano.


  From: Danilo Rogério [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  CC: [EMAIL PROTECTED]
  Subject: Re: [delphi-br] Campo Agregado - Esta está Difícil
  Date: Wed, 5 Oct 2005 10:03:32 -0300 (ART)
  
  o campo aggregado é reconhecido como variant
  
  tente o seguinte:
  
  Seu_Campo_total.asvariant := Campo_Aggregado.asvariant
  
  Espero ter ajudado,
  Danilo Rogério
  
  Cristiano Rodrigo Gomes [EMAIL PROTECTED] escreveu:
  Bom dia a todos, estou com problemas na utilização de campos agregados, bem
  vamos lá.
  
  Estou utilizando um componente chamado RXMEMORYDATA, que simula um DataSet,
  porém com os dados apenas em memória e eles estão interligados em um Data
  Module da Seguinte Forma:
  
  RXMEMORYDAT - DATASETPROVIDER - CLIENTDATASET - DATASOURCE
  
  No CLIENTDATASET criei um campo AGREGADO para relizar a soma dos campos, e
  este campo AGREGADO está ligado a um DBEDDIT, que exite a soma NORMALMENTE.
  
  Aí que vem o problema. A exibição deste campo está OK, porém não consigo
  pegar o conteúdo deste DBEDIT ligado ao CAMPO AGREGADO e levar para outro
  DBEDIT.
  
  tipo assim mesmo: DBEDITTOTAL.AsFloat := DBEDITSUBTOTAL.AsFloat
  
  O campo DBEDITSUBTOTAL é o campo agregado.
  
  Se alguém puder me ajudar. Uso Delphi 7 e Firebird.
  
  _
  MSN Busca: fácil, rápido, direto ao ponto.  http://search.msn.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:PlayStation 2 a partir de R$ 659! 
  Parcele!Celular Motorola com câmera a partir de R$ 449!Siemens SL65 com 
  câmera a partir de R$ 730! Câmeras Digitais a partir de apenas R$ 399! 
  Parcele!CD Players Pioneer a partir de R$ 369!MP3 Player iPod a partir de 
  R$ 799! Parcele!
  
  -
  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!.
  
  
  
  -
Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons 
  e muito mais. Instale agora!

  _
  MSN Messenger: converse com os seus amigos online. 
  http://messenger.msn.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: 
 
  PlayStation 2 a partir de R$ 659! Parcele! Celular Motorola com 
câmera a partir de R$ 449! 
  Siemens SL65 com câmera a partir de R$ 730!  Câmeras Digitais a 
partir de apenas R$ 399! Parcele! 
  CD Players Pioneer a partir de R$ 369! MP3 Player iPod a partir 
de R$ 799! Parcele! 
   


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

* 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

[delphi-br] off-topic: Windows Terminal Services

2005-09-29 Por tôpico Paulo Sérgio Dias

Pessoal:

Um cliente necessita que alguns funcionarios (6, aproximadamente)
de sua filial (fica em outra cidade) acessem meus sistemas, que
ficam na matriz.

Pensei em instalar o Terminal Services do Windows 2000/2003,
e entao a filial acessaria a matriz via Speedy.

Pergunta:
-

O cliente questionou quais sao os riscos de invasao por hackers,
ao manter um servidor de Terminal Services.  Gostaria de saber quem utiliza
esse recurso quais sao efetivamente esses riscos, e que medidas devem ser
tomadas para garantir que apenas os funcionarios autorizados
acessem o sistema (isto e', medidas no servidor Terminal Services,
no servidor principal Windows 2000/2003, instalacao de firewall, etc.)

Obs.: Se puderem indicar um firewall de baixo custo, agradeco imensamente.

Grato pela atencao de todos
Paulo



[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] O ClientDataSet compartilha os registros com o SQLDataSet ou nao

2005-09-28 Por tôpico Paulo Sérgio Dias
Pessoal:

Nos componentes DBExpress, eu posso usar um SQLDataSet sozinho
para trazer dados (para um relatorio, por exemplo) ou
posso usar um ClientDataSet associado a esse SQLDataSet (neste
caso, preciso de um Provider para ligar o ClientDataSet ao SQLDateSet)

Pergunta:

- Suponham que eu use um ClientDataSet/Provider/SQLDataSet
e que o SELECT que incluir no SQLDataSet traga 1000 registros
O ClientDataSet vai compartilhar esses 1000 registros trazidos
pelo SQLDataSet,  ou vai ter uma copia na memoria de mais
1000 registros.  Ou seja, na memoria da estacao, existirao
um unico conjunto de registros, ou dois conjutos de registros ?

Grato pela atencao
Paulo

[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] Como criar parametro de data em um SQLDataSet

2005-09-18 Por tôpico Paulo Sérgio Dias
Pessoal:

a) Utilizo Delphi 7 com IB 6 e DBExpress

b) Estou criando um comando SELECT em tempo de execucao,
contendo dois parametros para passar duas datas

c) Porem, depois de alimentar os parametros, quando eu
tento fazer um Open, aparece uma menagem do DBExpress:
unassigned code

Alguem sabe do que se trata ?  

Por gentileza, vejam o codigo abaixo:

SQLDataSetRelatorio.Command := 'SELECTCODIGO, DESCRICAO, DATAINICIAL, 
DATAFINAL ' +
'FROM  TBCURSOS ' +
'WHERE '  +
'DATINICIAL = :ParDataInicialRel '
'AND ' +
'DATFINALFINAL = :ParDataFinalRel ' +
'ORDER BY CODIGO'

SQLDataSetRelatorio.ParamByName('ParDataFinalRel').AsDateTime := 
FdtDataFinalRel;
SQLDataSetRelatorio.ParamByName('ParDataInicialRel').AsDateTime := 
FdtDataInicialRel;

SQLDataSetRelatorio.Open;  // O erro ocorre aqui

Obs.: As variáveis FdtDataFinalRel e FdtDataInicialRel são do tipo TDateTime

Para quebrar o galho, eu criei uma rotina que formata datas como '-MMM-DD'
(exemplo 2005-DEC-31')  e alimentei os parâmetros como 
como string (vejam abaixo).  Neste caso, funcionou !
Será que eu só posso passar parâmetros para campos data como strings ?


SQLDataSetRelatorio.ParamByName('ParDataFinalRel').AsString   := 
DataFormatoSQL(FdtDataFinalRel,'-MMM-DD');
SQLDataSetRelatorio.ParamByName('ParDataInicialRel').AsString := 
DataFormatoSQL(FdtDataInicialRel,'-MMM-DD');

Obs.:  a funcao DataFormatoSQL eu criei para poder passar uma data e formata-la 
como string
(exemplo:  2005-DEC-31,  2005-FEB-28, etc.)

Grato pela atencao de todos
Paulo

[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] DBExpress do D2005 nao acompanha o pacote Professional

2005-09-13 Por tôpico Paulo Sérgio Dias
Pessoal:

Gostaria de confirmar o seguinte, com alguem que utilize o Delphi 2005
Professional:

a) A versao professional nao vem acompanhada do DBExpress ?
Na pagina http://www.borland.com.br/delphi/, encontrei o PDF
matriz de caracteristicas, e nele o DBExpress aparece apenas
no Delphi 2005 Enterprise e Architect.  E' isso mesmo ?   (pensei que
o PDF pudesse estar errado)

b) Se isso e' verdade, entao meus sistemas criados em Delphi 7 com
DBExpress nao poderao sequer ser compilados no D2005 ?

Grato pela atencao de todos
Paulo




-- 
 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] Teclas de atalho nao funcionam no Delphi 7

2005-08-22 Por tôpico Paulo Sérgio Dias
Pessoal:

No meu Delphi 7, nao estao funcionando as teclas
CTRL+SHIFT+I   e CTRL+SHIFT+U.

Nao me lembro de ter mudado nenhuma
configuracao, depois que instalei o D7.
Alguem sabe como posso ativar estas teclas ?

Grato pela atencao de todos
Paulo


[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] Programa feito em Delphi deixa o teclado muito lento

2005-08-01 Por tôpico Paulo Sérgio Dias
Pessoal:

Gostaria de saber se alguem ja' enfrentou o seguinte
problema:

Tenho um programa escrito em Delphi 3, que
acessa o InterBase 6 via BDE 5.202

O programa funciona normalmente em todas
as maquinas do meu cliente (estacoes Windows 98 e
XP)

Porem, em uma maquina com Windows 98,
logo na tela onde o usuario digita seu nome e senha,
(tambem em qualquer outra tela do sistema), o teclado
demora muito a responder as teclas digitadas.
Ou seja, quando o usuario digita uma tecla, as luzinhas
do CAPS LOCK ou NUM LOCK piscam (`as vezes uma,
`as vezes outra), e somente deopois de 1 ou 2 segundos
e' que o caractere e' exibido na tela.

O problema so' acontece nesse
programa que escrevi em Delphi.   No Word ou qualquer
outro programa, o tempo de resposta do teclado e'
normal (e isso so'  ocorre em UMA maquina da rede).

Agradeco todas as ideias que puderem me enviar.

Paulo

[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] Delphi acessando banco de dados Progress

2005-07-25 Por tôpico Paulo Sérgio Dias
Pessoal:

Quais sao os meios, se e'  que existe algum, de um
programa Delphi acessar um banco de dados Progress ?

BDE ?   ODBC ?   DBExpress ?


Se alguem tem experiencia nesse assunto, solicito
entrar em contato, em private.

Muito obrigado pela atencao de todos
Paulo


[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

 




Re: [delphi-br] Off - Numero de Ip da rede

2005-06-30 Por tôpico Paulo Sérgio Dias
Eduardo:

 Com eu faço para descobrir o número de IP de uma máquina
 na minha rede.
 Não é pelo delphi, pelo windows ou DOS mesmo

No Windows 95 ou 98:

- Iniciar/Executar
- Digite:  WINIPCFG

No Windows 2000/2003/XP:

- Abra o prompt do DOS
- Digite:  IPCONFIG

Paulo


[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] Lista ou grupo de discussao sobre o Rave

2005-06-29 Por tôpico Paulo Sérgio Dias
Pessoal:

Sei que existe um grupo de discussao em portugues,
sobre o RAVE, mas perdi o endereco.

Alguem sabe informar ?

Grato pela atencao de todos
Paulo

[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

 




Re: [delphi-br] Programa e' cancelado quando usuario entra no site doBradesco/Pessoa Juridica

2005-06-21 Por tôpico Paulo Sérgio Dias
Muito obrigado pelas dicas !



  Faz o seguinte também... baixe novamente a atualização de segurança do 
  bradesco no teu cliente, reinicia máquina e verifica se continua fechar os 
  executáveis. Acredito que exista uma atualização da atualização no 
site do 
  bradesco

  Aqui fizemos isso e resolveu...



[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] Programa e' cancelado quando usuario entra no site do Bradesco/Pessoa Juridica

2005-06-20 Por tôpico Paulo Sérgio Dias
Pessoal:

Alguem ja' passou por algo semelhante ao que
descrevo abaixo  ?

Tenho um sistema feito em Delphi 3, com BDE 5.202,
que acessa o InterBase 6,  via TCP/IP.

Se meu programa esta' aberto e a usuaria entra no site
do Bradesco,  no momento exato em que ela clica no link
de acesso de Pessoa Juridica, acontece alguma coisa
que arranca o meu sistema da memoria (como se fosse
um CTRL+ALT+DEL), mas sem exibir mensagem alguma.

Se a usuaria tenta entrar no meu sistema DEPOIS que ela
entrou no site do Bradesco e clicou no link de Pessoa Juridica,
o meu programa tambem e' abortado (sem mensagem alguma),
tao logo aparece a tela principal.

Estou tentando falar com alguem do Bradesco, mas ainda nao consegui.

Obs.:  Se a usuaria entra em qualquer outro site, ou mesmo no site do
Bradesco, mas nao clica no link de Pessoa Juridica, o meu sistema
funciona normalmente.

Grato pela atencao de todos
Paulo


-- 
 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] MIDAS.DLL nao e' reconhecido em uma maquina Windows 98

2005-06-17 Por tôpico Paulo Sérgio Dias
Ja' consegui fazer funcionar.
No Delphi 3, a MIDAS.DLL no existe.
No seu lugar tive de copiar os arquivos  DBCLIENT.DLL e STDVCL32.DLL (para 
C:\WINDOWS\SYSTEM)
e idprov32.dll (para a pasta do BDE)

Paulo

- Original Message - 
  From: Paulo Srgio Dias 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, June 16, 2005 5:36 PM
  Subject: [delphi-br] MIDAS.DLL nao e' reconhecido em uma maquina Windows 98


  Pessoal:

  - Tenho um sistema feito em Delphi 3.
  - Em um form, coloquei um ClientDataSet,
  um Provider e os associei a uma Query.
  - Na minha maquina de desenvolvimento,
  esse modulo funciona bem, mas na maquina
  do meu cliente (com Windows 98) aparece uma mensagem
  informando biblioteca nao registrada.

  - Ja' gravei a MIDAS.DLL em C:\WINDOWS\SYSTEM
  da maquina do meu cliente, e digitei REGSVR32 MIDAS.DLL.
  Apareceu uma mensagem dizendo que a DLL foi registrada com
  sucesso.

  - Mesmo depois disso, ao entrar no form aquela mensagem
  continua aparecendo (biblioteca nao registrada).

  - Desregistrei a MIDAS.DLL, coloquei-a em C:\WINDOWS\SYSTEM32
  e registrei-a novamente, mas nao resolveu - a mensagem de erro
  continua...  

  Alguem sabe como devo proceder para instalar a tal MIDAS.DLL ?
  No Delphi 7, sei que existe a opcao de compilar a MIDAS dentro
  do  .EXE, mas nao sei se existe essa opcao no Delphi 3.

  Grato pela atencao de todos
  Paulo

  [As partes desta mensagem que no 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

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 Servio 
do Yahoo!. 



[As partes desta mensagem que no 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

 




RES: [delphi-br] Dúvidas no PageControl e TabSheet ...

2005-06-16 Por tôpico Paulo Sérgio
Nelson,
 
No onExit do ltimo edit de cada TabSheet  coloque :
 
   PageControl1.SelectNextPage(true);
   EditTal.SetFocus;
 
Espero t-lo ajudado.
 
Paulo Srgio
Bhte. /MG
 
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Nelson Antonio da Cruz Covolo
Enviada em: quinta-feira, 16 de junho de 2005 09:41
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Dvidas no PageControl e TabSheet ...
 
Ol Pessoal ...
Tenho um PageControl, com 4 TabSheets, e dentro de cada um desses 
TabSheets eu tenho vrios edits ...
O que eu gostaria de fazer que que quando eu chegar no ultimo edit 
do TabSheet e mude automaticamente para o proximo TabSheet, e 
posicione o primeiro edit desse tabsheet ativo... e assim por 
diante ... 
Seria tipo uma rolagem entre os TabSheets ...

o que esta acontecendo hoje,  que quando ele chega no ultimo edit, 
ele vai para um edit fora do meu PageControl ...

no evento OnKeyPress do meu form tenho o seguinte:
If (key = #13) Then
Begin
If Not (activecontrol Is twwdbgrid) and
not (activecontrol is TDBMemo) Then
Begin
key := #0 ;
Perform(Wm_NextDlgCtl, 0, 0) ;
End ;
End ;

Desde j eu agradeo a ateno de todos, e ficarei na expectativa de 
um breve retorno.

Atenciosamente,

Nelson Antonio






-- 
 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]
mailto:[EMAIL PROTECTED] 
  
* O uso que voc faz do Yahoo! Grupos est sujeito aos Termos do
http://br.yahoo.com/info/utos.html  Servio do Yahoo!. 


[As partes desta mensagem que no 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

 




RES: [delphi-br] Variant type conversion

2005-06-16 Por tôpico Paulo Sérgio
Rodrigo,
 
Vc tb pode tentar assim :
 
Total.Caption := FormatFloat('###,###,###0.00',
StrtoCurrdef(DTM.tb_avan_soma.FieldValues['soma'].AsString,0)-
StrtoCurrDef(DTM.tb_avanc_debito.FieldValues['debito'].AsString,0));
 
Abraos,
 
Paulo Srgio
Bhte / MG
 
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Eduardo
Enviada em: quinta-feira, 16 de junho de 2005 11:17
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Variant type conversion
 
O problema e q um dos dois valores esto nulos e no com 0.

Basta colocar 0 na tabela ou testar primeiro antes de tentar calcular.

function iif(Condicao: boolean; Verdadeiro, Falso: variant): variant;
begin

 if Condicao then
Result := Verdadeiro
 else
Result := Falso;

end;


iif(DTM.tb_avan_soma.FieldByname( 'Soma' ).AsString = '', 0, 
DTM.tb_avan_soma.FieldByname( 'Soma' ).Asfloat);


Eduardo
Ps.: espero ter ajudado.

- Original Message - 
From: eduardo.sic [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, June 16, 2005 10:22 AM
Subject: Re: [delphi-br] Variant type conversion


 que tal:

 Total.Caption := FormatFloat('###, ###,
 ###0.00',(DTM.tb_avan_soma.FieldByname( 'Soma' ).Asfloat - 
 DTM.tb_avanc_debito.FieldByname('debito').asFloat )  );





 =
De:Rodrigo Mota [EMAIL PROTECTED]
Para:delphi-br@yahoogrupos.com.br
Assunto:[delphi-br] Variant type conversion


Esta dando o erro EVariantError Invalid variant
type conversion

Percebi o erro quando o resultado de soma 
vazio ou dbito  vazio,
quando os dois no esto vazios o erro no
ocorre
Como procedo agora???

Total.Caption := FormatFloat('###, ###,
###0.00',(DTM.tb_avan_soma.FieldValues['soma'])
-
-(DTM.tb_avanc_debito.FieldValues['debito']));

Rodrigo



[As partes desta mensagem que no 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/messa
ges

Para falar com o moderador, envie um e-mail
para:
 [EMAIL PROTECTED] ou
[EMAIL PROTECTED]

Links do Yahoo! Grupos

http://br.groups.yahoo.com/group/delphi-br/


http://br.yahoo.com/info/utos.html





 



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






 


  
  

___ 
Yahoo! Acesso Grtis - Internet rpida e grtis. 
Instale o discador agora! http://br.acesso.yahoo.com/ 


-- 
 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]
mailto:[EMAIL PROTECTED] 
  
* O uso que voc faz do Yahoo! Grupos est sujeito aos Termos do
http://br.yahoo.com/info/utos.html  Servio do Yahoo!. 


[As partes desta mensagem que no 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] MIDAS.DLL nao e' reconhecido em uma maquina Windows 98

2005-06-16 Por tôpico Paulo Sérgio Dias
Pessoal:

- Tenho um sistema feito em Delphi 3.
- Em um form, coloquei um ClientDataSet,
um Provider e os associei a uma Query.
- Na minha maquina de desenvolvimento,
esse modulo funciona bem, mas na maquina
do meu cliente (com Windows 98) aparece uma mensagem
informando biblioteca nao registrada.

- Ja' gravei a MIDAS.DLL em C:\WINDOWS\SYSTEM
da maquina do meu cliente, e digitei REGSVR32 MIDAS.DLL.
Apareceu uma mensagem dizendo que a DLL foi registrada com
sucesso.

- Mesmo depois disso, ao entrar no form aquela mensagem
continua aparecendo (biblioteca nao registrada).

- Desregistrei a MIDAS.DLL, coloquei-a em C:\WINDOWS\SYSTEM32
e registrei-a novamente, mas nao resolveu - a mensagem de erro
continua...  

Alguem sabe como devo proceder para instalar a tal MIDAS.DLL ?
No Delphi 7, sei que existe a opcao de compilar a MIDAS dentro
do  .EXE, mas nao sei se existe essa opcao no Delphi 3.

Grato pela atencao de todos
Paulo

[As partes desta mensagem que no 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

 




RES: [delphi-br] try..except não funciona com DBExpress(?)

2005-06-03 Por tôpico Paulo Sérgio
Alisson,
 
No alguns erros são retornado pelo onReconcileError   do ClientDataSet.
Os erros que não são tratados dentro do Try...Except  trate-os dentro do
OnReconcileError do CDS.
 
Abraços,
 
Paulo Sérgio
Bthe - MG
 
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Alisson
Enviada em: quinta-feira, 2 de junho de 2005 19:27
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] try..except não funciona com DBExpress(?)
 
Boa noite pessoal!

Estou com um problema bem estranho e gostaria que alguém me ajudasse.

Eu tenho um ClientDataSet - TDataSetProvider - TSQLDataSet -
TSQLConnection. Tenho basicamente o seguinte código para atualizar o
mesmo:

...
conn.StartTransaction(TD);
try
   csdCliente.ApplyUpdates(0);
   conn.Commit(TD);
except
   conn.RollBack(TD);
end;
...

Eu incluo um registro no csdCliente com um valor que viole uma contraint
no banco, executo o código acima e, rodando pelo Deplhi, ele me dá o
erro do debug mas continua a execução do try... não cai no except. Já
coloque mensagens e ví está fazendo isso mesmo.
Se eu rodar por fora, clicando no .exe, nenhum erro é mostrado e, da
mesma forma, não executa o que tá no except. Muito estranho...
E cheguei a forçar uma divisão por zero no try, aí sim vai para o
except. Dá a impressão que não está tratando exceção do tipo
EDatabaseError.. não sei.

Se algém puder me ajudar...

Delphi 7, winxp.

Alisson


[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]
mailto:[EMAIL PROTECTED] 
  
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
http://br.yahoo.com/info/utos.html  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

* 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

 





RES: [delphi-br] Erro no compilador - Delphi 6

2005-06-02 Por tôpico Paulo Sérgio
Rodrigo,
 
Já tive problema idêntico e só resolvi troncando de
computador. Identifiquei que o problema está no tamanho do EXE +
Componentes/Resources utilizados + velocidade do processador do
computador + Memória RAM.
 
Abraços,
 
Paulo Sérgio
Bhte. - MG
 
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Rodrigo Tomazoni
Enviada em: terça-feira, 31 de maio de 2005 14:16
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Erro no compilador - Delphi 6
 
Colegas,

Está ocorrendo um erro esquisito aqui, veja se vcs podem me ajudar.
Quando compilo, isto só acontece algumas vezes, não sempre.
dá o seguinte erro:

[Error] RLINK32: Error reading file .??
[Fatal Error] Out of memory

depois disso abre um messagebox que diz out of memory while expanding
memory stream e dá erro em ntdll.dll.

O problema é que corrompe o .dfm e trava o delphi 

Creio que tem a ver com a memória virtual, mas tem jeito de resolver
isto. Alguém já sofreu com isto. O que pode ser o causador disto.

Agradeço qualquer ajuda
[]´s
Rodrigo Tomazoni
Simplestec Informática


-- 
 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]
mailto:[EMAIL PROTECTED] 
  
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
http://br.yahoo.com/info/utos.html  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

* 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

 




RES: [delphi-br] Problema com QRGroup no quick report

2005-05-27 Por tôpico Paulo Sérgio
Eduardo,
 
Tente colocar o seu código no OnShow do formulário.
 
Sds.
 
Paulo Sérgio
Bhte. / MG
 
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Eduardo Silva ®
Enviada em: quarta-feira, 25 de maio de 2005 15:13
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Problema com QRGroup no quick report
 
Esta na mesma ordem simjá tentei de tudo e não consigo resolver este
problema
  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED]
nome de Paulo Sérgio
  Enviada em: quarta-feira, 25 de maio de 2005 14:18
  Para: delphi-br@yahoogrupos.com.br
  Assunto: RES: [delphi-br] Problema com QRGroup no quick report


  Eduardo,

  Verifique se a sua query está ordenada pelo mesmo campo em que você
  colocou no expression do QrGroup.

  Sds,

  Paulo Sérgio
  Bthe. / MG

  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  Em nome de Eduardo Silva ®
  Enviada em: quarta-feira, 25 de maio de 2005 12:03
  Para: Grupo Delphi-br
  Assunto: [delphi-br] Problema com QRGroup no quick report

  Galera, to tentando colocar o parâmetro Expression do QRGroup em tempo
  de
  execução, mas não to conseguindo.

  Eu atribuo o valor ao Expression (abaixo), mas ele não faz a quebra.
Se
  eu
  coloco ele em tempo de projeto funciona, mas ai eu não consigo um tipo
  de
  quebra, que é uando eu chamo a partir de um relatório, se eu chamar
pelo
  outro relatório não vai funcionar.
  Eu preciso colocar o expression de forma que ou ele usa o valor de um
  form
  ou de outro.

  Me deem uma luz gente...por favor.

  procedure TfrmSIAE0104imp.FormCreate(Sender: TObject);
  begin
 if GERA_RELATORIO = 'PESQUISA' then
 begin
qrSIAE0104.DataSet:= frmSIAE0104pq.qrySIAE0104;
qrGRUPO.Expression:=
  frmSIAE0104pq.qrySIAE0104.FieldByName('NM_CATEGORIA').AsString;
qrlblNM_ENDERECO.DataSet  := frmSIAE0104pq.qrySIAE0104;
qrlblNM_DESCRICAO.DataSet := frmSIAE0104pq.qrySIAE0104;
 end
 else
 begin
qrSIAE0104.DataSet:= qrySIAE0104;
qrGRUPO.Expression:=
  qrySIAE0104.FieldByName('NM_CATEGORIA').AsString;
qrlblNM_ENDERECO.DataSet  := qrySIAE0104;
qrlblNM_DESCRICAO.DataSet := qrySIAE0104;
 end;
  end;

  ~\\|//~
  -(o o)-
  o--oOOOo--(_)--oOOOo-o
  ||
  |   Eduardo de Almeida Silva |
  |   Kobra Sistemas   |
  |  [EMAIL PROTECTED]  -   (14)3263-0326   |
  ||
  |.oooO   Oooo.   |
  o(   )---(   )---o
\ ( ) /
 \_)   (_/



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

  * O uso que você faz do Yahoo! Grupos está sujeito aos Termos
do
  http://br.yahoo.com/info/utos.html  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

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
* 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]
mailto:[EMAIL PROTECTED] 
  
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
http://br.yahoo.com/info/utos.html  Serviço do Yahoo!. 


[As partes desta mensagem que não

RES: [delphi-br] Erro depois de imprimir QuickRep

2005-05-25 Por tôpico Paulo Sérgio
Eduardo,
 
Verifique se você deu um = FreeandNil(Relatorio),
 
Sds,
 
Paulo Sérgio
Bthe/MG
 
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Eduardo Silva ®
Enviada em: quarta-feira, 25 de maio de 2005 11:23
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Erro depois de imprimir QuickRep
 
Pode ser alguma coisa que vc cria durante a exibição desse relatório que
não
é destruída quando ele é finalizado (fechado).
  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED]
nome de Thiago
  Enviada em: quarta-feira, 25 de maio de 2005 09:48
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Erro depois de imprimir QuickRep


  Olá, estou com um problemas muito estranho e não sei resolver

  estou trabalhando no meu programa ai do um preview do quickrep
  e mando imprimir não aparece erro algum, saiu do quickrep e continuo
  usando meu programa, mas quando eu fecho o programa
  da um erro assim:

  Acess Violation at Address 00691FAE in MODULE PROGRAM.EXE READ
  OF ADDRESS F

  e é somente em um relatório do programa, nos outros eu imprimo
  saio do programa e não da erro nenhum.

  alguém sabe como identificar esses ADDRESS para saber a classe ou
  onde esta dando o problema?

  Thiago

  [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

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
* 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]
mailto:[EMAIL PROTECTED] 
  
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
http://br.yahoo.com/info/utos.html  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

* 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

 




RES: [delphi-br] teste para um edit

2005-05-25 Por tôpico Paulo Sérgio
Paulo Fernandes,
 
Antes de efetuar a validação tente :
 
If Length(EditCpf.text)  11 then
  ShowMessage(‘CPF inválido’)
Else
  ValidaCpf(EditCpf.Text);
 
If Length(EditCnpf.text)  14 then
  ShowMessage(‘CNPJ inválido’)
Else
  ValidaCpf(EditCNPJ.Text);
 
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de pcfernandes1971
Enviada em: quarta-feira, 25 de maio de 2005 11:32
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] teste para um edit
 
Estou testando o CNPJ e CPF separados, o CNPJ tem 14 digitos e o CPF 
tem 11 digitos. No meu form coloquei um RadioGroup com as opções CNPJ 
e CPF quando marco CNPJ habilita um edit para digitar os CNPJ e caso 
contrário um para CPF, são edits diferentes. Em cada edit já informei 
o maxlenth para cada um , mas se eu marcar o CNPJ e for digitar CPF 
da um erro: Project nome_do_projeto.exe raised exception class 
Econvert Error With Message, mas esse erro se da por causa do teste 
se o CNPJ é valido ou não. 
Pessoal como eu faço para testar se um edit receber o menor q 14 
digitos? 

PAULO FERNANDES
PORTO ALEGRE/RS





-- 
 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]
mailto:[EMAIL PROTECTED] 
  
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
http://br.yahoo.com/info/utos.html  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

* 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

 




RES: [delphi-br] Problema com QRGroup no quick report

2005-05-25 Por tôpico Paulo Sérgio
Eduardo,
 
Verifique se a sua query está ordenada pelo mesmo campo em que você
colocou no expression do QrGroup.
 
Sds,
 
Paulo Sérgio
Bthe. / MG
 
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Eduardo Silva ®
Enviada em: quarta-feira, 25 de maio de 2005 12:03
Para: Grupo Delphi-br
Assunto: [delphi-br] Problema com QRGroup no quick report
 
Galera, to tentando colocar o parâmetro Expression do QRGroup em tempo
de
execução, mas não to conseguindo.

Eu atribuo o valor ao Expression (abaixo), mas ele não faz a quebra. Se
eu
coloco ele em tempo de projeto funciona, mas ai eu não consigo um tipo
de
quebra, que é uando eu chamo a partir de um relatório, se eu chamar pelo
outro relatório não vai funcionar.
Eu preciso colocar o expression de forma que ou ele usa o valor de um
form
ou de outro.

Me deem uma luz gente...por favor.

procedure TfrmSIAE0104imp.FormCreate(Sender: TObject);
begin
   if GERA_RELATORIO = 'PESQUISA' then
   begin
  qrSIAE0104.DataSet:= frmSIAE0104pq.qrySIAE0104;
  qrGRUPO.Expression:=
frmSIAE0104pq.qrySIAE0104.FieldByName('NM_CATEGORIA').AsString;
  qrlblNM_ENDERECO.DataSet  := frmSIAE0104pq.qrySIAE0104;
  qrlblNM_DESCRICAO.DataSet := frmSIAE0104pq.qrySIAE0104;
   end
   else
   begin
  qrSIAE0104.DataSet:= qrySIAE0104;
  qrGRUPO.Expression:=
qrySIAE0104.FieldByName('NM_CATEGORIA').AsString;
  qrlblNM_ENDERECO.DataSet  := qrySIAE0104;
  qrlblNM_DESCRICAO.DataSet := qrySIAE0104;
   end;
end;

~\\|//~
-(o o)-
o--oOOOo--(_)--oOOOo-o
||
|   Eduardo de Almeida Silva |
|   Kobra Sistemas   |
|  [EMAIL PROTECTED]  -   (14)3263-0326   |
||
|.oooO   Oooo.   |
o(   )---(   )---o
  \ ( ) /
   \_)   (_/



-- 
 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]
mailto:[EMAIL PROTECTED] 
  
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
http://br.yahoo.com/info/utos.html  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

* 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] Livros sobre Delphi 2005 - Alguem conhece estes

2005-05-12 Por tôpico Paulo Sérgio Dias
Pessoal:

Caso alguem ja' tenha examinado algum dos livros abaixo,
solicito a gentileza de comentar.  Gostaria de algum livro
que fosse ALEM do basico do Delphi 2005.  Mais especificamente,
gostaria de aprender as melhores tecnicas de programacao com
o ADO.Net.

http://www.editoraerica.com.br/buscafinal.asp?cod=062Xautor=William%20Pereira%20Alves
http://www.editoraerica.com.br/buscafinal.asp?cod=0603autor=Pedro%20Luiz%20Côrtes

Grato pela atencao de todos
Paulo

[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

 




Re: [delphi-br] Revista antiga com o Delphi 3

2005-04-22 Por tôpico Paulo Sérgio Dias

 mas o Delphi 3 naum eh Free ?

E' que eu ouvi dizer que cada maquina
onde o Delphi 3 for instalado, tem de
ter uma respectiva compra de um 
exemplar da revista.

Ou isso e' desnecessario ?

Paulo

[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] Revista antiga com o Delphi 3

2005-04-21 Por tôpico Paulo Sérgio Dias

Pessoal:

Ha' tempos (anos) saiu uma revista com o CD do Delphi 3 Client/Server.
Acho que o nome da revista e' www.com.br, mas nao tenho certeza.

Preciso comprar algumas dessas revistas, pois onde
trabalho ainda necessitamos do Delphi 3.  Se alguem souber
do site da editora, ou tiver essas revistas para vender (enviando
por SEDEX), favor entrar em contato.  

Obs.: Meu problema nao e' obter o CD, pois eu ja' tenho um CD
original da revista.  Preciso da revista em papel, para ter direito
de usar em mais maquinas.

Grato pela atencao de todos
Paulo


[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

 





Re: [delphi-br] Revista antiga com o Delphi 3

2005-04-21 Por tôpico Paulo Sérgio Dias

Consegui encontrar o site:

http://www.europanet.com.br/euro2003/

Obrigado.
Paulo

[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

 





RES: [delphi-br] interbase em rede com roteador

2005-04-18 Por tôpico Paulo Sérgio


Tiago,
 
Em vez de utilizar o endereço IP tente colocando como
endereço IP o nome da máquina de servidor do BD.
 
 
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Thiago
Enviada em: sexta-feira, 15 de abril de 2005 12:41
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] interbase em rede com roteador
 

como usar o interbase em rede, sendo 
que o ip do servidor é automático?

vlw

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


PUBLICIDADE
 
http://br.rd.yahoo.com/SIG=12a4fn8o5/M=264379.5078783.6203979.1588051/D
=brclubs/S=2137111264:HM/EXP=1113618603/A=2332652/R=0/id=noscript/SIG=11
9058f8i/*http:/br.download.yahoo.com/messenger/ 
 
  _  

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]
mailto:[EMAIL PROTECTED] 
  
* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
http://br.yahoo.com/info/utos.html  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

* 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

 





RES: [delphi-br] Duvida, contador.

2005-04-18 Por tôpico Paulo Sérgio


Taty,
 
Se você usa um generator no banco de dados, o problema está
nele. Set o generator para o número do último registro da tabela.
 
Abraços,
 
Paulo.
 
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de T a t y S a n t a n a
Enviada em: sábado, 9 de abril de 2005 10:16
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Duvida, contador.
 
Olá mário bom dia, abaixo está minha rotina. To utilizando i
INTERBASE. Construí todo o banco utilizando o IbExpert. O problema não
pode ser na rotina, pq na máquina de amigos meus e na faculdade
funciona. Só aqui em casa não funciona.

Um abraço

Taty

A rotina é:

public
{ Public declarations }
function MaxCodigo(strTabela,StrCampo:string):integer;
  end;

var
  DM: TDM;

implementation

{$R *.dfm}

function TDM.MaxCodigo(strTabela,strCampo:String):integer;
var
  iCodigo:integer;

begin
  iCodigo:=0;
  With sqlQuery, SQL do

  begin
Close;
Clear;
Add('SELECT max(');
Add(strCampo);
Add(')');
Add('as CODIGOATUAL FROM');
Add(strTabela);
ExecQuery;
  try
iCodigo := StrToInt(FieldByName('CODIGOATUAL').AsString);
except
iCodigo := 0;
  end;

if( iCodigo = 0) then
  result:=1
  else
result:=iCodigo+1;
   end;
end;

procedure TDM.TClienteNewRecord(DataSet: TDataSet);
begin
 
TCliente.FieldByName('COD_CLIENTE').AsInteger:=Maxcodigo('CLIENTE','COD_
CLIENTE');( Chamada da tabela)

end;

  - Original Message - 
  From: Mario Scavoni 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Saturday, April 16, 2005 12:21 AM
  Subject: Re: [delphi-br] Duvida, contador.


  Taty,
  qual o banco q vc usa?
  poste, se possível, a tua rotina...

  [ ]´s
  Mario Scavoni

  - Original Message - 
  From: T a t y S a n t a n a [EMAIL PROTECTED]
  To: Grupo de Delphi delphi-br@yahoogrupos.com.br
  Sent: Friday, April 08, 2005 10:59 PM
  Subject: [delphi-br] Duvida, contador.



  Olá, boa noite a todos. Já não sei mais o que fazer com um erro que me
  apareceu. Desenvolvi uma pequena rotina pra um contador. Pra utilizar
em
  campo tipo código a ser gerado automaticamente. O que acontece é que
quando
  eu já tenho uma tabela no meu banco, o contador funciona blz, mais se
excluo
  todos os dados e quer inserir o primeiro registro aí vem o erro. E não
sei
  mais o que fazer pq na máquina de alguns amigos meu sistema funciona
blz até
  pra inserção do primeiro registro já aqui na minha máquina dá o tal
erro.
  Será que isso pode ser do delphi 6 ? Ou da minha máquina. Abaixo vou
anexar
  a telinha de erro. Se alguém puder me ajudar eu agradeço. Dependo
desse
  sistema pra me formar.

  Antecipadamente grata

  Tatiane Santana

  Bom novamente não foi. A figura não apareceu na mensagem. Abaixo está
a
  mensagem por escrito.

  Project Lavanderia.exe raised exception class EconvertError with
message
  is not a valid integer value'. Process stopped. Used Step or Run to
  continue.










  [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













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






Yahoo! Grupos, um serviço oferecido por:


 
http://br.rd.yahoo.com/SIG=12a37bt4g/M=264379.5078783.6203979.1588051/D
=brclubs/S=2137111264:HM/EXP=1113664635/A=2191897/R=0/SIG=10vqa2grn/*htt
p:/br.diversao.yahoo.com/ 


 
http://br.rd.yahoo.com/SIG=12a37bt4g/M=264379.5078783.6203979.1588051/D
=brclubs/S=2137111264:HM/EXP=1113664635/A=2191897/R=1/SIG=10vqa2grn/*htt
p:/br.diversao.yahoo.com/ 
 São PauloRio de 

[delphi-br] Problema aleatorio em conexao com o IB

2005-04-15 Por tôpico Paulo Sérgio Dias

Pessoal:

Um colega me enviou o seguinte problema
(ver final desta mensagem), mas eu nuna vi
esse tipo de erro.  Alguem tem alguma dica
sobre o que posso sugerir a ele ?

Obs.: Ele usa o IB 6.0, via BDE 5.202.

Grato pela atencao de todos.
Paulo

--
Tem um servidor Windows 2000 com o Interbase instalado ...
e várias estações com um client delphi acessando o
banco de dados ... na maioria das vezes quando
acesso o sistema, está tudo certo ...

Mas às vezes o sistema não encontra o servidor dando a msg
Cannot locate ... ... aí tenho que ficar tentando até
conseguir, ou às vezes até dar boot na máquina para conseguir ...

--




-- 
 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: como seria esta clausula em um contrato de trabalho

2005-03-30 Por tôpico Paulo Sérgio Dias


Pessoal:

Trabalho em uma empresa onde de vez em quando
recebemos bancos de dados (InterBase) de clientes que
utilizam nossos sistemas, para realizar algum
tipo de manutencao (corrupcao no BD, por exemplo).

Gostariamos de incluir uma clausula no contrato de
nossos funcionarios, deixando explicitamente claro que
eles nao podem utilizar os dados do BD de um cliente
para nenhuma finalidade (vazamento de informacoes) e
que pode ser processado caso isso venha a ocorrer.
Alguem ja' necessitou incluir algo parecido, em
contrato de trabalho de funcionarios ?   Podem
me enviar um exemplo de como poderia ser o texto
dessa clausula ?

Grato pela atencao de todos
Paulo



[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] O que sao os arquivos DDP do Delphi 7

2005-03-29 Por tôpico Paulo Sérgio Dias

Comecei a usar o Delphi 7 ha' pouco tempo,
e gostaria de saber o que sao os arquivos com extensao
.DDP que ele cria.

Grato pela atencao de todos
Paulo

[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] BDE acessando o MSDE2000

2005-03-23 Por tôpico Paulo Sérgio Dias

Pessoal:

Estou acostumado a acessar o SQL-Server 2000
atraves do BDE.

Instalaei o MSDE2000 em uma maquina Windows 98,
mas ao tentar me conectar nele atraves do BDE (5.202)
depois de cerca de um minuto tentando o BDE informa
que nao conseguiu encontrar o servidor.

Obs.:  Tentei fazer a conexao no BDEAdministrator, na propria
maquina onde o MSDE2000 esta' instalado.   Se eu abro
o Enterprise Manager do SQL-Server 2000, consigo
gerenciar o MSDE2000 normalmente.

Depois de instalar o MSDE2000, e' necessario tomar alguma
providencia, para que eu possa me conectar nele via BDE ?

Grato pela atenao de todos
Paulo

[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

 





Re: [delphi-br] DEPLOY DE APLICAÇÃO EM ASP.NET D2005

2005-03-21 Por tôpico Paulo Sérgio Dias

Beneval:

Alguém sabe onde encontrar informações sobre o que é preciso fazer no servidor 
para instalar
uma aplicação ASP.NET feita em D2005 em um servidor WEB ??? Que Assemblys 
preciso
instalar/registrar ??? 


a) Tente postar sua pergunta na lista de Delphi com Internet:
[EMAIL PROTECTED]
A lista ainda e' pequena, mas la' o pessoal esta' mais habituado com
o Delphi para .NET

b) Apenas uma ideia inicial (embora pareca que voce ja' tentou algo parecido):
Passei por algo semelhante e fiz o seguinte:  Na minha propria maquina,
criei uma outra pasta para o site, copiei tudo o que eu achava que
deveria copiar (.aspx do raiz do site e a pasta bin), configurei uma pasta 
virtual
no IIS e tentei rodar o sistema.  Mesmo na minha maquina, apareceram
mensagens de erro de erro dizendo que faltavam DLLs.  Entao, procurei os
arquivos no meu HD e copiei para a pasta bin do meu novo site, ate' conseguir
rodar o sistema.

c) Outra coisa que eu olharia, na sua maquina, e' o que aparece quando voce 
digita
PATH no prompt de comando.  Verifique se ha' algum caminho em que parecam
existir os arquivos que estao faltando.   Entao, no servidor, altere o path do 
sistema
(acho que e'  em Meu Computador/Avancado/Variaveis de Ambiente

Boa sorte !
Paulo


[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] Saiu o Update 2 do Delphi 2005

2005-03-12 Por tôpico Paulo Sérgio Dias

Pessoal:

Para aqueles que ja' estavam desesperados com os bugs do D2005:
Finalmente saiu o update 2.

http://www.borland.com/products/downloads/registered/download_delphi.html#


Agora, todos os nossos problemas acabaram !!!  (sera' ?)   :) :) :)

Paulo

[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] Como copiar uma pagina aspx, com seu pas e demais arquivos

2005-03-11 Por tôpico Paulo Sérgio Dias

Pessoal:

No Delphi tradicional, quando quero criar um modulo
a partir de outro (nao por heranca, mas copiando os
arquivos mesmo) eu faco assim:

- Fecho todos o projeto
- Abro o .PAS  desejado (e o .DFM e' aberto automaticamente)
- Mudo o nome do Form (FormCadastro para Formxyz, por exemplo)
- Salvar Como (e mudo o nome do arquivo)

Depois disso posso abrir um projeto qualquer e incluir o arquivo copiado
normalmente.

Pergunta:

Posso fazer isso tambem no Delphi .NET com ASP.NET ?Que arquivos tenho
que renomear ?   Tentei abrir o aspx e efetuar um Salvar Como, mas apenas
o .aspx e o .pas foram renomeados.  Os demais arquivos nao sao necessarios ?
Por exemplo, se eu quiser copiar um modulo chamado gene056, quais
dos arquivos abaixo tenho que copiar/mudar o nome ?

gene056.aspx
gene056.pas
gene056.resx
gene056.dcuil
gene056.resources
gene056.TWebFormSolicitacaoMaterial.resources

Paulo

[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] Como deixar o Delphi 2005 mais leve

2005-03-05 Por tôpico Paulo Sérgio Dias

Pessoal:

Em uma dica da revista ClubeDelphi (do mes passado ou retrasado, eu acho),
existe a seguinte dica para deixar o Delphi 2005 mais leve no carregamento:

1) Criar um atalho com o parametro -rQualquerCoisa.  Exemplo:

D:\Arquivos de programas\Borland\BDS\3.0\Bin\bds.exe  -rDelphiEnxuto


2) AbrIr e fechar o Delphi por esse atalho

3) Executar o REGEDIT e localizar, nas pastas da Borland, uma pasta
chamada DelphiEnxuto

4) Apagar todas sa chaves que não são utilizadas (ex.:  C#, Refactoring, etc.)


Pois bem, segui a dica acima e realmente o Delphi ficou mais leve.
Porem, gostaria de deixar meu Delphi 2005 ainda mais leve e gostaria
de saber:

a) Para quem usa o D2005 apenas para programar ASP.NET (sem VCL,
sem acesso ao InterBase, etc.), quais as chaves que voces recomendam
apagar ?   Ha' muitas chaves na pasta referida acima, e eu tenho receio
de apagar alguma indevidamente e o D2005 parar de funcionar

b) Quando o D2005 carrega no meu micro, a ultima coisa que ele
carrega e' um tal de ComponentOne.   Para que serve esse pacote,
e como desativa-lo ou desinstala-lo ?

c) Em Adicionar/Remover Programas, ha' um item que eu desconfio
que foi instalado pelo D2005:

Wise OWL Demeanor for .NET Personal Edition

Esse software realmente e' instalado pelo D2005 ?  Para que ele serve ?
Posso remove-lo, caso nao planeje fazer nada com ele, a medio prazo ?

d) Se conhecerem algum outro modo de melhorar o desempenho do D2005
(seja no carregamento, seja durante o uso), sem eu ter de melhorar a
configuracao de meu micro, gentileza enviar.  Obs.: Atualmente, tenho um
Pentium 4 1.6 GHz, com 512 Mb de RAM.   O uso do Delphi 2005, nessa
maquina e' razoavel.

Grato pela atencao de todos
Paulo


[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] Voces tem problema com Copiar e Colar no D2005

2005-03-05 Por tôpico Paulo Sérgio Dias

Pessoal:

Quando entro no D2005 e abro algumas paginas
do sistema (ASP.NET) que estou desenvolvendo
(para aprendizado),  o CTRL+C  e CTRL+V 
para copiar e colar componentes (na mesma
pagina ou de uma pagina para outra) funcionam
perfeitamente.

Porem, percebi que, depois de passado algum tempo de
uso do D2005, o CTRL+C e CTRL+V param de funcionar.
Nem mesmo cliando em Editar/Copiar e Editar/Colar
consigo executar essas operacoes.

Sou obrigado a fechar o Delphi 2005 e entrar novamente,
para que o copiar/colar voltem ao normal.

Esse realmente e' um bug conhecido, ou eu e' que
posso estar fazendo algo errado ?

Obs.: Tenho o Delphi 2005 com Update 1.
Ja' saiu algum update depois do 1 ?

Grato pela atencao de todos
Paulo

[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

 





Re: [delphi-br] PROBLEMAS COM DELPHI 2005 + DATA PROVIDER PARA FIREBIRD

2005-03-05 Por tôpico Paulo Sérgio Dias

Beneval:

Aqui vai um mero palpite, mas como a comunidade Delphi .NET (8 e 2005)
ainda e' praticamente inexistente, talvez voce nao encontre nenhuma
outra ajuda (e' uma pena, mas ainda estamos muito isolados):


a) De vez em quando, o Delphi 2005 comeca a apresentar erros estranhos,
e eu sou obrigado a fecha-lo e entrar novamente, para as coisas
voltarem ao normal.  Ja' tentou fazer isso ?  O erro persiste ?

b) Diversas vezes, tambem ocorre do D2005 perder os eventos que eu coloquei
nos botoes,  ou perder o evento associado ao Page_Load, e eu sou obrigado
e refazer tudo novamente na mao.

c) Caso voce tenha certeza que o erro surgiu sem que voce tenha introduzido
algo de novo no seu codigo, experimente rodar o programa passo a passo,
para confirmar se ele esta' passando por todas as rotinas esperadas.

Foi assim que eu descobri que o meu D2005 havia desligado a referencia
ao Page_Load, e entao ele nao mais executava alguns codigos importantes,
onde eu criava alguns componentes de acesso aos dados, por exemplo.

Boa sorte !

Paulo

[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] Opcoes do Delphi ao ASP e ASP.NET

2005-02-28 Por tôpico Paulo Sérgio Dias

Pessoal:

Tenho um sistema enorme (compras, estoque, contas a pagar, contas a receber,
faturamento, contabilidade, etc.) feito em Delphi 3 com BDE,  que aos poucos 
pretendo
migrar para o Delphi 7 com DBExpress.

Alguns clientes t^em solicitado a criacao de alguns modulos que rodem via Web
(browser), e eu comecei a estudar o Delphi 2005 .NET.

So' que estou achando o D2005 muito pesado, com muitos bugs chatos,
e a programacao para o browser e' muito mais dificil de controlar que
as aplicacoes tradicionais (Win32).   Para poder deixar o usuario sair
de uma tela de cadastro, consultar algo e retornar, e' extremamente trabalhoso
e confuso guardar o estado da pagina anterior.

Conheco um pouco de ASP tradicional, mas tambem o acho muito improdutivo.

Sei que o motivo de minhas dificuldades podem estar na minha falta de 
experiencia
em aplicacoes Web, mas estou buscando alternativas.


Perguntas:

a) Que recursos o Delphi (3 a 7) possui, para permitir que eu desenvolva
sistemas que facam uso da infra-estrutura da Internet (Speedy, cabo, radio,
ou mesmo linha telefonica) ?Por exemplo, ja' tentei criar uma
tela de consulta usando BDE, conectando a filial a sua matriz, em outra
cidade, e fazendo uso da linha do Speedy.   Mas com o BDE, o tempo de resposta
no Speedy e' muito ruim (nas redes internas de meus clientes, o acesso e' 
normal).

b) Ja' ouvi falar de DataSnap e de um tal de  remoting  do Delphi.   Esses 
recursos
permitem escrever sistemas com bom tempo de resposta via Speedy ou LP, por 
exemplo ?
Onde posso obter maiores informacoes ?  Se alguem utiliza esses recursos, 
ficarei muito
agradecido se me enviar algumas dicas.

Grato pela atencao de todos
Paulo

[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] Integer ou Int32 (Delphi.NET)

2005-02-20 Por tôpico Paulo Sérgio Dias

Pessoal:

No Delphi (3 a 7) , quando eu necessitava de
uma variavel do tipo inteiro ,  sempre usava Integer.

No Delphi.NET, ha' alguma vantagem em usar Int32, em vez de Integer ?

Paulo


[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] Impressora termica Datamax M4206

2005-02-16 Por tôpico Paulo Sérgio Dias

Pessoal:

Trabalho em uma empresa desenvolvedora de software.
Um de nossos clientes adquriu uma impressora DATAMAX M4206, e desenvolvemos uma 
rotina
para impressão de etiquetas.  Porem, a impressao esta' muito fraca.
Como a impressora e' nova, achamos que o problema nao se deve a falta
de algum suprimento.  A impressao que enviamos `a impressora e' via Windows,
ou seja usando o proprio driver instalado no Windows dos usuarios - nao estamos
enviando dados diretamente `a impressora.

Alguma dica ?

Paulo Sérgio Dias
Informatec Sistemas
Suporte Técnico

[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] Delphi com problemas de conexao ao SQL-Server

2005-02-11 Por tôpico Paulo Sérgio Dias

Pessoal:

Resumo do problema:
-

Ha' algum detalhe que eu tenha que abrir no Windows XP com SP2,
para que meu sistema possa encontrar normalmente o servidor
SQL-Server 7 ?   

Detalhes:

a) Em um cliente, tenho um sistema desenvolvido em 
Delphi, acessando o SQL-Server 7 atraves do BDE 5.202

b) Em todas as maquinas da rede, o acesso e' normal,
mas em uma maquina XP com SP2, ao tentar me conectar
ao servidor SQL-Server, aparece a seguinte mensagem:

Unable to connect: SQL Server is unavailable or does not exist.
Unable to connect: SQL Server does not exist or network acces

Já tentei também pelo número IP da máquina onde o SQL-Server está instalado,
mas não funcionou.

Obs.:  Em uma máquina XP SEM O SP2, a conexão é normal.

Agradeço todas as dicas que puderem me enviar.

Grato
Paulo


[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] OFF-TOPIC: Fortran 90

2005-01-17 Por tôpico Paulo Sérgio Dias

Pessoal:

Um ex-professor entrou em contato comigo,
perguntando se eu tinha conhecimentos
em FORTRAN-90, para fazer algumas
alteracoes em rotinas que ele encontrou
em um site.   Estudei FORTRAN ha' uns
10 anos, mas nunca mais mexi nisso.
Nao me sinto em condicoes de aceitar tal tarefa...

Se alguem conhece essa linguagem,
ou se puder indicar alguem, solicito
a gentileza de enviar um e-mail
em private ([EMAIL PROTECTED]),
para eu repassar a esse meu ex-professor
(nao tenho ideia de quanto vale tal servico)

Muito obrigado pela atencao de todos
Paulo

[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] Como gerenciar a programacao em equipe

2005-01-11 Por tôpico Paulo Sérgio Dias

Solicito a todos que trabalham em conjunto com
uma equipe de programadores que me enviem
dicas a respeito de como voces gerenciam
a manutencao de cada modulo (.PAS), para evitar
confusao em cada alteracao.

Trabalho em uma empresa que possui 8 programadores,
que dao manutencao em varios programas (COMPRAS.EXE,
ESTOQUE.EXE, FATURAMENTO.EXE, etc.).  Esses sistemas,
apesar de serem executaveis diferentes, fazem parte de um
mesmo pacote que nos vendemos (o cliente que necessita
apenas de um ou mais modulos pode compra-los separadamente
ou em conjunto).   Inclusive, diversos modulos (.PAS) sao usados em mais
de um dos executaveis (cadastro de unidades da federacao, cadastro
de unidades de medida, cadastro de produtos, etc.)

Ate' o momento, fazemos assim:  Quando alguem vai fazer manutencao
em uma parte de um dos sistemas, copie todo o sistema para
a sua propria maquina.  Quando termina, ele atualiza apenas os modulos
alterados em nosso SERVIDOR, que e' onde ficam as versoes que nos
chamamos de oficiais, que serao compiladas e enviadas aos clientes.

Utilizamos uma planilha Excel para registrar os nomes dos modulos que
estao sendo alterados ou criados e por qual programador.  Ou seja,
o controle de desenvolvimento/manutencao hoje e' feito manualmente, e
funciona razoavelmente bem.  Mas de vez em quando, por falhas humanas,
acabamos sobrescrevendo as alteracoes que outro programador fez,
ou liberando ao cliente uma versao com algum erro porque alguem
falhou em fazer algum teste de funcionamento, etc.

Ficarei muito agradecido se me enviarem (em private, se nao for de interesse
da lista) o modo como voces gerenciam uma equipe de programadores...
Por exemplo, todos podem atualizar seus modulos diretamente na
pasta oficial, ou apenas uma pessoa faz isso ?  Utilizam algum software
de controle de versoes ?  Qual ?   

Muito obrigado pela atencao de todos
Paulo

[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] Bug de alinhamento no D2005

2005-01-09 Por tôpico Paulo Sérgio Dias

Pessoal:

Em uma outra lista, um colega comentou que
nao esta' conseguindo fazer o alinhamento de
componentes no D2005 (em Windows Form).

Por exemplo, colocando tres TButtons em
um form, cada um em uma posicao bem diferente
dos demais, tentem fazer diversos tipos de alinhamento
(pelo lado esquerdo ou pelo topo de um dos botoes).

O alinhamento parece que e'  aleatorio (a cada hora
funciona de um jeito). Na primeira vez que testei, primeiro
selecionei o Button2 e depois o Button1 e o Button3.
Fiz o alinhamento (botao direito/Position/Align/Vertical/Tops) 
e o alinhamento foi feito pelo botao 3.  Depois, inclui' mais
dois TButtons e entao o alinhamento passou a ser pelo Button5.

Alguem tem alguma dica a respeito disso ?  Parece que nem
com o Update1 o alinhamento nao funciona.

Grato pela atencao
Paulo

[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] Como esconder o codigo HTML

2005-01-09 Por tôpico Paulo Sérgio Dias

Pessoal:
(postei esta mensagem a cerca de um mes, mas tive problemas
com meu e-mail e nao sei se perdi alguma resposta)

No Delphi 2005, quando entro no modo Design de uma pagina,
aparece logo abaixo uma outra janela exibindo o codigo HTML,
ocupando muito espaco do meu monitor.

Acho que eu, sem perceber, devo ter ativado a exibicao do codigo HTML,
Como faco para esconder a janela do codigo HTML ?

Grato pela atencao de todos
Paulo


[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] Por que DataGrid nao exibe dados

2005-01-09 Por tôpico Paulo Sérgio Dias

Pessoal:

Seguindo um tutorial do site do Clube Delphi,
tentei apresentar dados de uma tabela
usando o BDP (Borland Data Provider) e um DataGrid.

Porem, ao rodar o programa os dados nao aparecem
no DataGrid (o DataGrid fica totalmente invisivel).

Ja' apaguei e recriei os componentes, achando que
eu havia mudado por engano alguma propriedade,
mas nao adiantou.

Solicito a gentileza de examinarem o codigo
abaixo e me dizer o que pode estar errado.


Obs.:  O exemplo do site do Clube Delphi
e' para WinForms, mas eu estou tentando criar um WebForm.

Fiz o seguinte:

- Arrastei uma tabela (InterBase) para o form
- Foram criados um BDPDataAdapter e um
  BDPConnection
- Entrei nas configuracoes do DBPDataAdapter,
selecionei uma tabela e fiz um PREVIEW - os dados
apareceram no PREVIEW
- Ainda nas configuracoes do BDPDataAdapter,
cliquei na tab DataSet e selecionei NewDataSet

- No clique de um botao, coloquei o seguinte codigo
(baseado no site do Clube Delphi - mudie apenas
o nome da tabela, que e' uma tabela de Unidades da Federacao,
do BD InterBase que estou usando para meus testes):


procedure TWebForm1.ButtonAbrir_Click(sender: System.Object; e:
System.EventArgs);
begin
   BDPConnection1.Open;
   BdpDataAdapter1.Active := False;

   if TextBoxStart.Text  '' then
BdpDataAdapter1.StartRecord := Convert.ToInt32(TextBoxStart.Text);

   if TextBoxMax.Text  '' then
BdpDataAdapter1.MaxRecords := Convert.ToInt32(TextBoxMax.Text);

  BdpDataAdapter1.Active := True;

  DataGrid1.DataSource := DataSet1.Tables[0];

  BdpDataAdapter1.TableMappings.Clear;

  BdpDataAdapter1.TableMappings.Add('Table','TBGENE002');
end;



[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] Que componente do BDP devo usar para fazer este SELECT

2005-01-08 Por tôpico Paulo Sérgio Dias

Pessoal:

Estou aprendendo agora o Delphi 2005 com ASP.NET.
Criei um apagina .aspx e quero fazer algo bem simples.
Criei um trecho de codigo do modo como estou acostumado
a fazer no Delphi tradicional,  e solicito a ajuda de voces
para fazer isso em .NET

O usuario digita um codigo de produto em um TextBox
e clica em um botao

No evento click do botao, quero fazer um select
na tabela de produtos.  Se o produto existe, quero
exibir seus dados em um TextBox.  Se nao existe,
quero exibir uma mensagem na tela.

Se fosse no Delphi atraves de componentes BDE, eu faria
assim:

Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('SELECT * CODPRODUTO');
Query1.SQL.Add('FROM TBPRODUTOS');
Query1.SQL.Add('WHERE CODIGO = ' + QuotedStr(TextBoxCodProduto.Text);
Query1.Open;

// abaixo, vou usar o TextBox do .NET para exibir os dados:
if Query1.IsEmpty then
   Label1.Text := 'Este produto nao esta cadastrado' 
else
   begin
  TextBoxDescricao.Text := Query1.FieldByName('DESCRICAO').AsString;
  TextBoxPreco.Text := Query1.FieldByName('PRECO).AsString;
   end;

Perguntas:

a) Que componentes  do BDP devo usar para fazer o SELECT acima, trazendo os
dados ?   Descobri que posso fazer isso usando um BDPDataReader.
Mas achei estranho, pois ele nao tem a popriedade IsEmpty ou Eof
para eu testar se retornou dados ou nao.

b) Acima, eu carreguei manualmente os dados em um TextBox.
Ha' um modo de usar o TextBox como se fosse um DBEdit da VCL,
ou seja, ao abria a Query, o TextBox ja' mostraria os dados ?


Grato pela atencao de todos, e desculpem se as duvidas
sao muito primarias.

Paulo

[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] Problemas com o TeeChart

2005-01-06 Por tôpico Paulo Sérgio Dias

Pessoal:

No meu Delphi 7, instalei o TeeChart Pro 7.02
(nao desinstalei o TeeChart que vinha originalmente
no D7, pois nao vi instrucoes para isso no instalador
do TeeChart Pro 7.02

Ao entrar no Delphi 7, comecaram a aparecer inumeras
mensagens de erro, mencionando diversos arquivos .BPL.

Na base da tentativa e erro, acabei desinstalando
o TeeChart Pro 7.02 (Pelo painel de Controle do Windows)

Porem, agora o componente TeeChart sumiu da aba Additional
e o TDBChart sumiu da paleta DataControls/DataAccess
(nao me lembro bem qual era a paleta original).

Alem disso, o package Borland Decision Cube
tambem nao esta' sendo carregado.  Se eu entro
em Component Install Package e marco esse package,
aparece a seguinte mensagem:

Cannot load package 'tee70'.  It contains unit 'TeeAbout',
wich is also contained in package 'Tee77'.

Ou seja, parece que ha' algum resquicio do TeeChart 7 Pro...

a) Alguem tem alguma dica sobre como fazer o TeeChart original
retornar ?   Ja' fui ao Painel de Controle/Adicionar Remover Programas/
Borland Delphi 7/Alterar/Reparar, mas nao consegui nenhum resultado

b) Depois de reparar o TeeChart original, alguem sabe como devo proceder
para instalar o TeeChart Pro 7 sem causar mais nenhum estrago ?

Grato pela atencao de todos
Paulo

[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

 





Re: [delphi-br] Problemas com o TeeChart

2005-01-05 Por tôpico Paulo Sérgio Dias

Ja' descobri a solucao:  

Eu tinha os componentes FortesReport e FreeReport, que
estavam fazendo referencia `a versao anterior do TeeChart.

Removi o FortesReport e o FreeReport e o TeeChart 7.02
agora esta' normal.

Paulo


[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] Como obter uma lista de todas as tabelas de um BD

2004-12-29 Por tôpico Paulo Sérgio Dias

Pessoal:

- Acesso dados do SQL-Server e do InterBase atraves do DBExpress

- Estou usando o codigo abaixo para obter uma lista
dos nomes de todas as tabelas de um banco de dados

- O codigo abaixo funciona quando acesso um BD do InterBase, mas nao
funciona
quando acesso um BD do SQL-Server (o ClientDataSet1 fica vazio)

- Alguem sabe por que nao funciona com o SQL-Server ?

Obs.:  Se nao me engano, meses atras ja' atualizei meu
driver do DBExpress para o SQL-Server...  Mas se alguem souber
onde ha' algum outro que funcione, agradeco se me enviar a dica


   SQLDataSet1.SetSchemaInfo (stTables, '', '');
   ClientDataSet1.Close;
   ClientDataSet1.Open;
   ClientDataSet1.First;

   while not ClientDataSet1.Eof do
  begin

ListBoxTabelas.Items.Add(ClientDataSet1.FieldByName('TABLE_NAME').AsString);
 ClientDataSet1.Next;
  end;

Obrigado pela atencao de todos

Paulo



-- 
 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] Perguntas muito basicas/tutorial sobre o BDP

2004-12-02 Por tôpico Paulo Sérgio Dias

Pessoal:

- Estou sentindo, neste grupo e em outros dois de que participo,
que talvez eu esteja fazendo perguntas muito basicas sobre Delphi for .NET
e acesso a banco de dados (ADO.NET)

- Assim, para nao insistir muito em conceitos basicos, gostaria de
saber se alguem pode orientar nestas tres derradeiras questoes:

a) Alguem utiliza os componentes Borland Data Provider (BDP), para
criar aplicacoes de bancos de dados ASP.NET com o Delphi 8 ou Delphi 2005 ?

b) Se nao usa, qual o motivo de nao usar, e o que utiliza no lugar, para
acessar SQL-Server ou InterBase ?

c) Se usa, onde foi que aprendeu a usar (tutoriais, links na Internet, livros, 
etc.) ?

Muito obrigado pela atencao
Paulo

[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

 





Re: [delphi-br] Pergunta tola sobre - Delphi 2005 ASP

2004-11-30 Por tôpico Paulo Sérgio Dias

Weber:

Funciona em qualquer plataforma os projetos em ASP.. feitos em delphi 
2005 ?? Rwindows e Linux ??

Sou iniciante em Delphi for .NET, mas ate' onde eu saiba,
existe um software chamado Mono para Linux, que
permite rodar aplicacoes ASP.NET.   Como e' um projeto
de codigo aberto, que conta com colaboradores, nao
sei se ja' esta' totalmente compativel com o FrameWork.NET
da Microsoft.

Paulo


-- 
 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] No ASP.NET (Delphi 2005), como passar dois parametros para uma outra pagina

2004-11-29 Por tôpico Paulo Sérgio Dias

Pessoal:

Programo em Delphi ha' muitos anos,
mas em ASP.NET (Delphi 2005) estou
comecando agora.

Desculpem pela pergunta primaria:

Em uma pagina01.aspx  eu tenho
dois TextBox:  TextBoxUsuario e TextBoxSenha

Quando o usuario digitar o seu nome/senha,
e clicar no botao Ok, quero chamar
a pagina02.aspx,  passando para essa pagina
o conteudo informado nos dois TextBox da pagina01.aspx.

Qual o modo mais correto ou eficiente de se fazer
isso ?

Se alguem conhece algum tutorial basico de ASP.NET
onde eu possa aprender essas coisas simples (voltado
a bancos de dados), gentileza informar.

Obrigado pela atencao.
Paulo


-- 
 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] Como fazer um SELECT como este, no D2005

2004-11-29 Por tôpico Paulo Sérgio Dias

Pessoal:

Programo em Delphi ha' muitos anos,
mas em ASP.NET (Delphi 2005) estou
comecando agora.

Desculpem pela pergunta primaria:

Em uma pagina01.aspx  eu tenho
dois TextBox:  TextBoxUsuario e TextBoxSenha

Quando o usuario digitar o seu nome/senha,
e clicar no botao Ok, quero chamar
a pagina02.aspx,  passando para essa pagina
o conteudo informado nos dois TextBox da pagina01.aspx.

Qual o modo mais correto ou eficiente de se fazer
isso ?

Se alguem conhece algum tutorial basico de ASP.NET
onde eu possa aprender essas coisas simples (voltado
a bancos de dados), gentileza informar.

Obrigado pela atencao.
Paulo

[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

 





Re: [delphi-br] Como fazer um SELECT como este, no D2005

2004-11-29 Por tôpico Paulo Sérgio Dias

Walter:

 Uê, a lista aqui é de Delphi não???


Talvez eu nao tenha me explicado direito:

Estou aprendendo Delphi .NET (estou
usando o Delphi 2005), para construir aplicacoes
em ASP.NET.  Minha pergunta se refere
a como passar dados de uma pagina
para outra em ASP.NET,  com 
o Delphi 2005 ,  usando WebForms. Em Delphi tradicional,
eu ja' estou acostumado a passar dados
de um form para outro.  Mas entre WebForms
(ou deveria dizer paginas .aspx ?),
a programacao e' diferente...   (em ASP antigo,
pelo pouco que aprendi, teria que passar dados
via variaveis Session ou atraves da barra de enderecos,
com aqueles simbolos ?).  No Delphi .NET

Grato pela atencao, e desculpem-me se estou fazendo
confusao entre os conceitos.
Paulo


[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] teste

2004-11-25 Por tôpico Paulo Sérgio Dias

teste

[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] Onde sera' esse evento, em Sao Paulo

2004-11-12 Por tôpico Paulo Sérgio Dias

Pessoal:

No site abaixo, inscrevi-me para o evento de
apresentacao do Delphi 2005, em Sao Paulo,
dia 17/11/2004, mas nao consegui encontrar
o local em que o evento ocorrera'.  Alguem
sabe informar mais detalhes ?

http://info.borland.com.br/delphi/

Grato pela atencao de todos
Paulo

[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] Como enviar estes comandos via writeln

2004-11-08 Por tôpico Paulo Sérgio Dias

Pessoal:

Necessito imprimir uma nota fiscal via writeln,
com entrelinhamento de 8 linhas por polegada,
em papel de aproximadamente 12 polegadas.

A)  Ja' consegui enviar para a impressora (uma matricial Epson)
o comando de 8 linhas por polegada, do seguinte modo:

write(Impressora, #27 + #48);

No manual da impressora, esse comando
aparece assim:  ESC 0  (o ultimo caractere e' o numero zero)


B) Porem, necessito informar `a impressora que o papel do
formulario tem 12 polegadas de comprimento.
O comando para isso e' o seguinte:

   ASCII - ESC C 0 n 
   Dec. - 67 
   Hex. - 43 
   Description - Set Page Length in Inches n = number of inches (1-22) 


Tentei fazer assim:

write(Impressora, #27 +  #67+ #48 + '12');

O comando ate' funciona, pois o salto de pagina esta' Ok.
Mas esta' aparecendo o numero 12 impresso (passei o valor
12 porque estou usando papel de 12 polegadas de comprimento).

Afinal, como e' que eu passo o parametro n, que segundo o manual
e' o comprimento da pagina em polegadas ?


C) Tentei usar o comando para configurar o comprimento da pagina
em numero de linhas (96 linhas).  Vejam:

   ASCII - ESC C n 
   Dec. - 67 
   Hex. - 43 
   Description - Set Page Length in Lines  n = number of lines (1-127)

Tentei o comando assim:

write(Impressora, #27 + #67 + '96');

Mas desse jeito, a nao ser que eu esteja enganado, nao funcionou !

Enfim, como e' que se passa o parametro n para a impressora ?

Muito obrigado pela atencao de todos
Paulo

[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] Delphi 8.Net: Que versao do Framework devo usar

2004-10-22 Por tôpico Paulo Sérgio Dias

Pessoal:

a) Estou aprendendo Delphi 8.Net
b) De uns tempos para ca', ao tentar rodar
algum programa (ASP.NET), comecou
a aparecer a seguinte mensagem:

Unable to atach to ASP.NET worker process (typically aspnet_wp.exe or w3wp.exe).

c) Suponho que isso tenha algo a ver com as versoes do Framework que
tenho no meu computador, que são as seguintes:

 v1.0.3705
 v1.1.4322
 v2.0.40607


Perguntas:

1) O Delphi 8 funciona com que versão do Framework ?
2) Certa vez, quando aparecia a mensagem de erro acima,
falaram-me que eu deveria entrar na pasta \winnt\microsoft.Net\framework\versao do 
framework
e digitar:   aspnet_regiis -i

Mas já tentei com as três versões acima e a mensagem de erro continua.

Alguma dica ?

Grato pela atencao de todos

Paulo



[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] off-topic: BDE e Oracle

2004-10-19 Por tôpico Paulo Sérgio Dias

Pessoal:

a) Até que versão do Oracle o  BDE 5.202 funciona ?
b) Qual a versão mais atual do Oracle ?  Para poucos
usuários, se não me engano existe uma versão
mais simplificada do Oracle (Workgroup, se não
me engano).  É isto mesmo ?   Na empresa onde
estou tentando vender meus sistemas, apesar de
serem apenas 4 usuários, eles exigem o Oracle,
por ser determinação da matriz americana.

Grato pela atenção de todos
Paulo


[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] Descompilador

2004-10-18 Por tôpico Paulo Sérgio Dias

Pessoal:

Podem me indicar um link para um bom descompilador de
programas Delphi ?

Grato pela atencao.

[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

 





Re: [delphi-br] Microsoft SQL Server 2000

2004-10-14 Por tôpico Paulo Sérgio Dias

Gercil:

 Me falaram que eu tenho que instalar o SQL Server
 2000 Personal Edition é isso mesmo ?
 Se não for, qual versão devo instalar?

No Windows 98, sempre que necessito instalar o SQL-Server,
utilizo a versão Personal.   No XP eu nunca instalei, mas pelo
que você descrever, parece que apenas a Personal vai funcionar.

Obs.:  Em outra lista de discussao, sobre SQL-Server, li que
a versao Developer tambem pode ser instalada no XP.  Como
eu nunca instalei o SQL-Server no XP, nao posso garantir
essa informacao.

Paulo



[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] Mensagem de erro do DBExpress

2004-10-12 Por tôpico Paulo Sérgio Dias

Pessoal:

Estou aprendendo agora a usar o DBExpress.
O que significa a mensagem abaixo ?

DBX Error: No mapping for Error Code Found.

Ela aparece sempre que ha algum erro no meu codigo
SQL, mas nao me da' nenhuma dica de qual e' o problema.
Entao, depois que eu mesmo identifico o problema e o
corrijo, tudo vai bem.  Ha' um modo do DBExpress fornecer
dicas mais uteis sobre o que ha' de problema no comando
SQL (no BDE, as mensagens sao muito melhores).

Grato
Paulo


[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] DBGrid vertical

2004-10-05 Por tôpico Paulo Sérgio Dias

Pessoal:

Alguem conhece uma DBGrid que permita
exibir os campos de uma tabela no sentido vertical (em
linhas), em vez de no sentido horizontal (em colunas) ?

Deixei uma imagem de exemplo no link abaixo:

http://planeta.terra.com.br/educacao/psd/gridvertical.jpg

Esse exemplo eu montei através de uma StringGrid.
Mas necessito que a grid seja ligada diretamente 
a uma tabela de dados (ou seja, uma DBGrid).

Obs.:  De preferencia freeware,  mas se houver algum
shareware, tambem pode ser.


Muito obrigado pela atencao de todos
Paulo


[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

 





Re: [delphi-br] OFF Delphi 3 ou 4?

2004-10-01 Por tôpico Paulo Sérgio Dias
Filipe:

Bom Dia lista. Para fins de estudo, vou instalar o Delphi no pentium 100 de minha 
casa. Gostaria de instalar o D4(486, 66Mhs min), mas um colega me disse q deveria 
então instalar o 3, pq o 4 é todo cheinho de bus. Isto é verdade? 
O 3 tem muitas limitações em relação ao 4, isto é, a diferença é muito grande??? 

- Justamente devido à configuração inferior de
minhas máquinas, eu uso o Delphi 3 há anos, e
tem me servido muito bem.  Se for optar por ele,
é necessário, depois da instalação, aplicar
um update para o Delphi 3.02 (tenho o arquivo
aqui;  solicite em private, se quiser que eu envie).

- Quanto ao Delphi 4, nunca o utilizei, e por isso
não posso opinar.

Paulo



[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] OF-TOPIC: Qual o endereco dessa lista de InterBase

2004-09-29 Por tôpico Paulo Sérgio Dias

Pessoal:

Ha' algum tempo, eu participava de uma lista de discussao
sobre IB e Firebird, que era mantida pelo Carlos Cantu.
Perdi o endereco dessa lista, e gostaria de saber se alguem
pode me enviar.

Muito obrigado
Paulo


[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

 





  1   2   >