[delphi-br] Impressao Direta

2007-10-23 Por tôpico Antonio Pires
Fazia impressao direta da seguinte maneira :

 

var

  Ctrl : ShortInt;

  Device : array[0..255] of char;

  Driver : array[0..255] of char;

  Porta  : array[0..255] of char;

  hDMode : THandle;

  Arquivo : TextFile;

begin

  PrinterDialog.Execute;

  Printer.GetPrinter( Device , Driver , Porta , hDMode );

  AssignFile(Arquivo,Porta);

  Rewrite(Arquivo);

  for Ctrl := 0 to Memo1.Lines.Count-1 do

WriteLn( Arquivo , Memo1.Lines[Ctrl] );

  CloseFile(Arquivo);

end;

 

com Impressora LPT?  funciona tudo certo.

Agora em um Porta USB, ele cria um arquivo texto com o nome da Porta.

 

Como posso resolver isto 

 

Antonio Pires

 

 



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



[delphi-br] Iniciante

2007-05-28 Por tôpico Antonio Pires
bom dia,


estou migrando meus sistemas em clipper para delphi,

gostaria de algumas dicas:

1) Qual o banco de dados usar ?

2) Devo escrever os sistemas na unha ou usar Gerador de Sistemas ? Qual é o
bom ??

3) Componente de acesso ao banco de dados ??


aguardo algumas dicas ??



No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.5.472 / Virus Database: 269.8.0/821 - Release Date: 27/05/2007
15:05



[delphi-br] teste2

2007-04-24 Por tôpico Antonio Pires
teste2
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.5.463 / Virus Database: 269.5.10/774 - Release Date: 23/04/2007
17:26



[delphi-br] Meio off - Aplicacao via Internet

2007-04-24 Por tôpico Antonio Pires
tenho que desenvolver uma aplicação em Delphi+DbExpress+Firebird 2.0,

na seguinte situacao:

O Servidor em uma cidade e as estações em 10 cidades diferentes, o acesso

tem que ser on-line, minha duvida é qual a melhor forma de interliga-las

1) COM+
2) SOAP

alguem pode dar alguma dica ???



No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.5.463 / Virus Database: 269.5.10/774 - Release Date: 23/04/2007
17:26



[delphi-br] Ordenação não funciona ??

2007-01-06 Por tôpico Antonio Pires

 tenho uma select para retornar os produtos mais comprados,
a select é feita em uma view:

 SELECT CODIPROD, NOMEPROD, SUM(QTDAPROD) AS QTDA,
SUM(TOTAPROD) AS TOTAL FROM MAISCOMPRADOS
GROUP BY CODIPROD, NOMEPROD
ORDER BY 3 DESC

quando teste no ibexpert funcionou corretamente, retornando
do produto mais comprada para o menos comprado.

mas quando coloco no delphi, ela retorna do menos comprado para o
mais comprado, é como se a opcao DESC não estivesse sendo reconhecida.

testei no delphi 2005 e funcionou corretamente, mas preciso dela funcionando
no delphi 7.

utilizo o seguinte:
DELPHI 7 sem nenhum update

COMPONENTES DE ACESSO:
SqlConnection
SQLQuery
DataSetProvider
ClientDataSet

Banco de Dados:
FIREBIRD 1.5.2


espero que possam me ajudar


Antonio Pires



--
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.5.432 / Virus Database: 268.16.6/617 - Release Date: 05/01/2007
11:11



RES: [delphi-br] MySQL Com DBExpress

2006-12-30 Por tôpico Antonio Pires
tambem tive este problema com DbExpress.

Consegui resolver com Cast:

select camponumeric9,2 from tabela, ele reconhece como TFMTBCDField

select cast(camponumeric9,2 as float ) from tabela, ele reconhece como
TFloatField,



  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Plinio Cesar Pavin
  Enviada em: sábado, 30 de dezembro de 2006 11:04
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] MySQL Com DBExpress


  Sim, a CoreLab também tem esse driver. Mas pelas informações que tive, o
problema que enfrentei é com relação ao próprio DBExpress, pois tive
informações de problemas semelhantes, com outros bancos de dados (Firebird,
Oracle, SQL Server) usando DBExpress.

  O principal problema é com relação ao mapeamento dos campos numéricos
(Decimal), que dependendo da precisão, são mapeados como TBCDField ou
TFMTBCDField, gerando problemas em todos os lugares da aplicação onde eram
feitos cálculos.

  No meu caso específico, aconteceu o seguinte:

  Usando o driver antigo da MicroOlap com mySQL 4: Funcionava tudo
normalmente, e os campos DECIMAL eram mapeados para TFloatField. A aplicação
foi toda desenvolvida com esse componente.

  Após migrar o BD para MySQL 5: Simplesmente o driver DBExpress da
MicroOlap não enxergava mais os campos DECIMAL.

  Atualizamos então o driver da MicroOlap para a versão mais recente: Todos
os campos DECIMAL passar a ser mapeados como TBCDField ou TFMTBCDField.

  Substituindo o DBExpress por MYDAC, os campos voltaram a ser mapeados como
TFloatField, e aplicação funcionou normalmente...

  Assim, resolvemos abandonar de vez o DBExpress.

  Plinio Cesar Pavin

  - Original Message -
  From: Alexandre
  To: delphi-br@yahoogrupos.com.br
  Sent: Saturday, December 30, 2006 12:05 PM
  Subject: RES: [delphi-br] MySQL Com DBExpress

  Estimados,

  Bom dia. Só uma dúvida: A CrLab também tem um driver dbexpress pra MySQL,
  não tem? Não sei porque o driver da MicroOlap não funciona a contento, mas
  já verificaste o driver dbexpress da CrLab ?

  Saudações.

  ---
  []'s

  Alexandre

  Frase da semana: No mundo dos negócios todos são pagos com duas moedas:
  Dinheiro e Experiência. Agarre a experiência primeiro, o dinheiro virá
  depois. (Harold Geneen)

  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Plinio Cesar Pavin
  Enviada em: sexta-feira, 29 de dezembro de 2006 14:36
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] MySQL Com DBExpress

  Luiz, acabamos comprando os dois: o driver dbexpress da MicroOlap e o
MyDAC
  !

  Jogamos dinheiro fora com o driver da MicroOlap: Simplesmente todos os
  campos decimal(x,y) do mySQL, que antes eram mapeados como TFloatField,
  passaram a ser mapeados como TBCDField ou TFMTBCDField, gerando inúmeros
  erros de type mismatch.

  Nota 10 para o myDAC ! Está dando trabalho pra substituir os componentes
  DBExpress (SQLDataSet + DatasetProvider + ClientDataset) por apenas um
  componente TMyQuery, mas depois disso, funciona que é uma maravilha.

  A propósito: vc utiliza o myDAC num DataModule ? A aplicação em que estou
  trabalhando possui os componentes de conexão em cada form, pois cada form
  (principalmente consultas e relatórios) possui uma query diferente. É
  correto ?

  Plinio Cesar Pavin

  - Original Message -
  From: Luiz Escobar
  To: delphi-br@yahoogrupos.com.br
  Sent: Wednesday, December 27, 2006 2:20 PM
  Subject: Re: [delphi-br] MySQL Com DBExpress

  Bom EU uso MySQL 5.xx com o MyDAC da www.clab.com.br e não mudo por nada
  nesse mundo, pelo menos até sair algo melhor que ele, que na minha opnião
é
  o melhor... hehehehe

  Luiz Escobar
  Analista/Desenvolvedor:
  WEB - HTML/JavaScript/PHP/MySQL
  WINDOWS - Delphi/MyDAC/ASSEMBLER/MySQL/xBase
  DOS - Clipper/Assembler xBase
  SERVIDORES - NetWare4.11, LINUX-REDHAT9, WINDOWS-2k
  LINUX - LAZARUS/Kylix/MySQL;
  http://www.megasistema.com.br

  - Original Message -
  From: Plinio Cesar Pavin
  To: delphi-br@yahoogrupos.com.br
  Sent: Wednesday, December 27, 2006 12:27 PM
  Subject: [delphi-br] MySQL Com DBExpress

  Olá Pessoal, estou dando manutenção numa aplicação desenvolvida com
  Delphi 7 + mySQL (4.00) usando DBExpress (Driver da MicroOlap), porém
  o cliente precisa atualizar o BD para a versão 5.0. Ao fazer isso, o
  driver da MicroOlap começa apresentar uma série de erros nos campos
  numéricos.

  Em resumo, estou aceitando sugestões:
  Fazer o cliente comprar o driver atualizado da MicroOlap ?
  Fazer o cliente comprar o driver CoreLab ?
  Abandonar de vez o DBExpress ?
  Abandonar de vez o mySQL ?

  Um dos maiores problemas é que a aplicação tem componentes de acesso
  em cada form, ou seja, quem desenvolveu não utilizou um datamodule
  para centralizar os componentes de acesso.Assim, se resolver abandonar
  o DBExpress, vou ter que percorrer todos os forms da aplicação
  substituindo os componentes.

  

[delphi-br] Forms MDI

2006-11-27 Por tôpico Antonio Pires

 Exemplo:


 Abri o Cadastro de Notas Fiscais de Entrada
faltou um produto que nao esta cadastrado
faltou cadastrar o fornecedor

 Abri o Cadastro de Produtos coloquei em inclusao
 Abri o Cadastro de Fornecedores coloquei em inclusao


 Fecho a aplicacao sem Confirmar, o cadastro de produtos
 e o cadastro de fornecedores, e nota fiscal esta no meio.

 duvidas:

 1) coloco tudo isso dentro de uma transaction e quando fecho
o form pai dou um rollback se a conexao estiver ativa ?

 2) abro uma transaction para cada cadastro e fecho individual,
conforme as tabelas são fechadas ?



Antonio Pires




--
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.5.430 / Virus Database: 268.14.16/552 - Release Date: 26/11/2006
11:30



[delphi-br] BDE com Interbase ajuda !!!!!!

2006-10-03 Por tôpico Antonio Pires
tenho um banco de dados Interbase acessando pelo BDE, estava funcionando
legal,

mas, o cliente formatou a maquina e agora quando tendo entrar no Sistema da
o

erro:

Unknown user or password
unavailable database.
Alias: Hospital

tentei acessar pelo BDEAdmin dah o mesmo erro, é como se o servidor não
estivesse

ativado, mas tenho outro aplicativo em DbExpress e está rodando legal e

consigo acessar pelo firebird.

Servidor : FIREBIRD 1.5.2

O que pode ser isto 

--
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.407 / Virus Database: 268.12.11/460 - Release Date: 01/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

 




RES: [delphi-br] Fortes Report no BDS 2006

2006-10-03 Por tôpico Antonio Pires
pode mandar os fontes para mim
  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Bruno Lichot
  Enviada em: terça-feira, 3 de outubro de 2006 10:56
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Fortes Report no BDS 2006


  a minha versao eu baixei na net os fontes, naum lembro onde, compilei o
  projeto,e instalei o bpl.. foi molezinha

  abração

  Antonio Pires escreveu:
   como instalar o Fortes Report no BDS2006
  
  
  
  

  --
  --
  []´s
  Bruno Lichot

  
--
No virus found in this outgoing 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] Impressora Matricial Lx-300

2006-08-24 Por tôpico Antonio Pires
bom dia,

Estou imprimindo em uma lx300 via writeln,

mas como sao varios itens na nota, acho que esta estourando a memoria da
impressora,


porque fiz um teste com menos itens e ela imprime a nota ate o final,
quando coloco

a quantidade normal de itens, ela para na parte de transportadora e nao
imprime mais.

o que posso fazer para zerar o buffer da impressora, alguem jah passou por
isso ?


Antonio
--
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.11.5/426 - Release Date: 23/08/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] Converter de Delphi 2 para Delphi 7 ???

2006-08-16 Por tôpico Antonio Pires
bom dia,

Estou convertendo um Sistema de Delphi 2 para Delphi 7,

o cadastros tudo beleza, mas os relatórios feitos em

quick report 1.1 dão erro.

Alguem já passou por isso ??

Existe alguma maneira ou programa para fazer esta conversão  ???

São mais ou menos uns 50 relatorios, para fazer tudo de novo no braço

é o bicho 




Antonio C. de M. Pires

--
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.10.10/419 - Release Date: 15/08/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] Mouse com Net Scrool

2006-06-01 Por tôpico Antonio Pires



Como faço para o Mouse com Net Scrool funcionar nas minhas

aplicações Delphi 7.



--
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.394 / Virus Database: 268.8.0/353 - Release Date: 31/05/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]






  




  
Yahoo! Grupos, um serviço oferecido por:
  
  

PUBLICIDADE




  
  



  




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












[delphi-br] Mouse com NetScrool

2006-05-02 Por tôpico Antonio Pires



bom dia,

Como fazer com que o controles do delphi reconheçam
o movimento executado pelo Mouse com NetScrool, no meu
caso ele move a barra do dbgrid, mas não move a seta indicadora
de posicao ?


--
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.385 / Virus Database: 268.5.1/328 - Release Date: 01/05/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]






  




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




  
  



  




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











[delphi-br] Abstract Error

2006-05-02 Por tôpico Antonio Pires



alguem saber dizer que erro é esse, acontece
quando fecho a aplicacao:

ABSTRACT ERROR


--
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.1.385 / Virus Database: 268.5.1/328 - Release Date: 01/05/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]






  




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




  
  



  




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