[delphi-br] Off Topic - SQL - Como faço para buscar um valor (int eger ou string) em todos os campos de um registro?
Colegas Como faço para buscar um valor (integer ou string) dentro de todos os campos de um registro dentro do banco de dados. Exemplo: Quero buscar a palavra CASA em todos os registros de uma tabela de nome IMOVEIS. Qualquer ajuda é bem-vinda, muito obrigado. []´s Tiano. ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/
Re: [delphi-br] Delphi +Pen Drive
Olá pessoal! Bem gente vamos fazer assim! Final de semana, vou trabalhar um pouco nele para deixar mais amigável para vocês (hoje ele é exelente, mas para meu uso particular, para outras pessoas ainda precisa de algumas implementações) e no começo da semana disponibilizo em pvt o executável eo o código a quem interessar. Combinado? Mas já aviso com antecedência é um programa simples (condizente com o pouco tempo de desenvolvimento em Delphi que tenho.) Atenciosamente. werelli __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Off Topic - SQL - Como faço para buscar um valor (integer ou string) em todos os campos de um registro?
A um tempo atraz postei uma função que monta uma string de busca aqui, mas como o pessoal da lista comentou na época, é uma faca de dois gumes, pois coloca muitas instrucoes like com OR, entao dependendo da Base de dados, pode demorar muito a resposta e ate mesmo retornar, muitos registros. é só vc buscar nas mensagens antigas do grupo. Em 16/03/07, [EMAIL PROTECTED] [EMAIL PROTECTED] escreveu: Colegas Como faço para buscar um valor (integer ou string) dentro de todos os campos de um registro dentro do banco de dados. Exemplo: Quero buscar a palavra CASA em todos os registros de uma tabela de nome IMOVEIS. Qualquer ajuda é bem-vinda, muito obrigado. []´s Tiano. ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Como faço para saber qual Item do M enu foi clicado
Se eu entendi bem, pelo parâmetro Sender! Mais ou menos assi: procedure TForm1.TesteClick(Sender: TObject); begin ShowMessage(TMenuItem(Sender).Name); end; Atenciosamente, Enio José de Sousa -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Washington Enviada em: quinta-feira, 15 de março de 2007 08:51 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Como faço para saber qual Item do Menu foi clicado Alguem pode me informar como faço para conseguir descobrir qual o Item do menu foi clicado. [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] TEF e ECF
Bom Dia Galera !!! Pegando o gancho do assunto Eu baixei o emulador e os fontes p/ Delphi 6 da Bematech, pois preciso implementar uma frente de caixa ECF com TEF. Porem sou leigo total do assunto. O que um ECF precisa ter ??? Tipo: - Leitura X - Leitura Z - Abertura e Fechamento de Cupom. Etc Fora é claro a customização do Cliente !!! Poderia dizer que o que vem com o exemplo da Bematech seria o basico para ECF fazer ??? Obrigado, Rodrigo - Mensagem original De: Vinicius Barreira [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quinta-feira, 15 de Março de 2007 22:26:16 Assunto: RE: [delphi-br] TEF e ECF Tem que ser na unha, infelizmente não existe milagre nesse caso; não existe componente mágico nem código fonte perfeito, tem que ser na raça mesmo. No processo de homologação eles verificam se você domina mesmo o assunto. Já fiz duas e agora estou indo para terceira homologa. Vinicius Barreira Delphi 7 / Firebird / DbExpress São Bernardo do Campo Software Para Hotéis / Pousadas / Moteis -Original Message- From: [EMAIL PROTECTED] os.com.br [mailto:[EMAIL PROTECTED] os.com.br] On Behalf Of Eduardo Melo Sent: quarta-feira, 14 de março de 2007 18:29 To: [EMAIL PROTECTED] os.com.br Subject: Re: [delphi-br] TEF e ECF Legal. Muito obrigado. Isso quer dizer que por enquanto o jeito mais fácil de desenvolver o TEF seria na unha? Bom... Encontrei alguns exemplos na internet. Se alguém puder apontar algum que ache realmente bom serei bastante grato. De qualquer forma valeu. Eduardo Melo Em 13/03/07, Anderson RB HYPERLINK mailto:arbsis% 40yahoo.com. brarbsis@ yahoo.-com. br escreveu: HYPERLINK http://acbr. sourceforge. net/wiki/ index.php/ P%E1gina_ principalhttp://ac br.-sourceforge. -net/wiki/ -index.php/ -P%E1gina_ -principal HYPERLINK http://www.forumweb .com.br/foruns/ index.php? showforum= 465http://www.fo rumweb-.com. br/foruns/ -index.php? -showforum= -465 O projeto ACBr faz isso que vc precisa, ele ainda nao esta fazendo a parte do TEF, mas voce pode colaboarar para que o desenvolvimento do tef seja mais rapido.. hehe... é um projeto muito bom que visa a ajudar a todas da area de automacao comercial... Anderson - Original Message - From: Eduardo Melo To: HYPERLINK mailto:delphi- br%40yahoogrupos .com.br[EMAIL PROTECTED] -os.com.br delphi-br%40yahoog -rupos.com. -br Sent: Tuesday, March 13, 2007 3:59 PM Subject: [delphi-br] TEF e ECF Olá. Estou a procura de componentes, units, tutoriais ou qualquer coisa que me auxilie na impressão de cupom fiscal. Aonde devo começar? Como saber o layout específico e como se comunicar com a impressora? Devo homologar de quais formas? Quando eu posso saber se o software pode ser comercializado? Se tiverem qualquer documentação a respeito e puderem me enviar eu serei muito grato. Obrigado Eduardo Melo [As partes desta mensagem que não continham texto foram removidas] [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: 268.18.10/720 - Release Date: 12/03/2007 19:19 -- No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.5.446 / Virus Database: 268.18.11/723 - Release Date: 15/03/2007 11:27 [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.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Delphi +Pen Drive
gostaria de ver. - Original Message - From: werelli To: delphi-br@yahoogrupos.com.br Sent: Friday, March 16, 2007 7:30 AM Subject: Re: [delphi-br] Delphi +Pen Drive Olá pessoal! Bem gente vamos fazer assim! Final de semana, vou trabalhar um pouco nele para deixar mais amigável para vocês (hoje ele é exelente, mas para meu uso particular, para outras pessoas ainda precisa de algumas implementações) e no começo da semana disponibilizo em pvt o executável eo o código a quem interessar. Combinado? Mas já aviso com antecedência é um programa simples (condizente com o pouco tempo de desenvolvimento em Delphi que tenho.) Atenciosamente. werelli __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 2120 (20070316) __ 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]
Re: [delphi-br] TSQLCLIENTDATASET
Pelo que eu estava vendo, este componente foi substituido pelo TSimpleDataSet, mas pelo que entendi ao ler o link abaixo vc pode instalá-lo junto ao seu Delphi 7. O link é: http://mail.firebase.com.br/pipermail/lista_firebase.com.br/2005-October/020101.html Sds, Ricardo. Adevaldo Oliveira [EMAIL PROTECTED] escreveu: Ola Sou novo na programacao em delphi, comprei um sistema de cheque no site www.ramodainformatica.com.br , para poder estudar, mas quando tento abrir alguns form do sistema da a seguinte mensagem de erro. TSQLCLIENTDATASET, NOT FOUND cancel ignore, fui informado que esse componente a da versao delphi 6, mas eu uso delphi 7, alguem sabe onde posso encontrar esse componente TSQLCLIENTDATASET, pois no site onde comprei o sistema nao me deram retorno. Gratos Adevaldo __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [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.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] JEDI
Acho que não .. mas ele vem com instalador ... pelo menos comigo, o instalador funcionou redondinho. Em 14/03/07, Humberto [EMAIL PROTECTED] escreveu: Olá colegas, gostaria de saber se existe algum tutorial de instalação do JEDI para o Delphi 2006.. Obrigado. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Off Topic - SQL - Como fa ço para buscar um valor (integer ou strin g) em todos os campos de um registro?
Para o caso citado vc usaria uma expressão como: Select * From IMÓVEIS Where campo_onde_esta_a_expressao_a_pesquisar Like %Casa% Só estou em dúvida com onde ficam os parênteses, mas em linhas gerais é isto. Sds, Ricardo. [EMAIL PROTECTED] escreveu: Colegas Como faço para buscar um valor (integer ou string) dentro de todos os campos de um registro dentro do banco de dados. Exemplo: Quero buscar a palavra CASA em todos os registros de uma tabela de nome IMOVEIS. Qualquer ajuda é bem-vinda, muito obrigado. []´s Tiano. __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: Res: [delphi-br] TEF e ECF
Cara... sinceramente recomendo que vc dê uma olhada nos sites que foram passados. Mas os exemplos que a Bematech disponibilizam tem o básico do que vc tem que fornecer para um ECF. Mas caso ache interessante tenho um ECF que já esta em estágio bastante avançado de desenvolvimento. Poderiamos fazer uma parceria. Sds, Ricardo Rodrigo Lether [EMAIL PROTECTED] escreveu: Bom Dia Galera !!! Pegando o gancho do assunto Eu baixei o emulador e os fontes p/ Delphi 6 da Bematech, pois preciso implementar uma frente de caixa ECF com TEF. Porem sou leigo total do assunto. O que um ECF precisa ter ??? Tipo: - Leitura X - Leitura Z - Abertura e Fechamento de Cupom. Etc Fora é claro a customização do Cliente !!! Poderia dizer que o que vem com o exemplo da Bematech seria o basico para ECF fazer ??? Obrigado, Rodrigo - Mensagem original De: Vinicius Barreira [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quinta-feira, 15 de Março de 2007 22:26:16 Assunto: RE: [delphi-br] TEF e ECF Tem que ser na unha, infelizmente não existe milagre nesse caso; não existe componente mágico nem código fonte perfeito, tem que ser na raça mesmo. No processo de homologação eles verificam se você domina mesmo o assunto. Já fiz duas e agora estou indo para terceira homologa. Vinicius Barreira Delphi 7 / Firebird / DbExpress São Bernardo do Campo Software Para Hotéis / Pousadas / Moteis -Original Message- From: [EMAIL PROTECTED] os.com.br [mailto:[EMAIL PROTECTED] os.com.br] On Behalf Of Eduardo Melo Sent: quarta-feira, 14 de março de 2007 18:29 To: [EMAIL PROTECTED] os.com.br Subject: Re: [delphi-br] TEF e ECF Legal. Muito obrigado. Isso quer dizer que por enquanto o jeito mais fácil de desenvolver o TEF seria na unha? Bom... Encontrei alguns exemplos na internet. Se alguém puder apontar algum que ache realmente bom serei bastante grato. De qualquer forma valeu. Eduardo Melo Em 13/03/07, Anderson RB HYPERLINK mailto:arbsis% 40yahoo.com. brarbsis@ yahoo.-com. br escreveu: HYPERLINK http://acbr. sourceforge. net/wiki/ index.php/ P%E1gina_ principalhttp://ac br.-sourceforge. -net/wiki/ -index.php/ -P%E1gina_ -principal HYPERLINK http://www.forumweb .com.br/foruns/ index.php? showforum= 465http://www.fo rumweb-.com. br/foruns/ -index.php? -showforum= -465 O projeto ACBr faz isso que vc precisa, ele ainda nao esta fazendo a parte do TEF, mas voce pode colaboarar para que o desenvolvimento do tef seja mais rapido.. hehe... é um projeto muito bom que visa a ajudar a todas da area de automacao comercial... Anderson - Original Message - From: Eduardo Melo To: HYPERLINK mailto:delphi- br%40yahoogrupos .com.br[EMAIL PROTECTED] -os.com.br delphi-br%40yahoog -rupos.com. -br Sent: Tuesday, March 13, 2007 3:59 PM Subject: [delphi-br] TEF e ECF Olá. Estou a procura de componentes, units, tutoriais ou qualquer coisa que me auxilie na impressão de cupom fiscal. Aonde devo começar? Como saber o layout específico e como se comunicar com a impressora? Devo homologar de quais formas? Quando eu posso saber se o software pode ser comercializado? Se tiverem qualquer documentação a respeito e puderem me enviar eu serei muito grato. Obrigado Eduardo Melo [As partes desta mensagem que não continham texto foram removidas] [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: 268.18.10/720 - Release Date: 12/03/2007 19:19 -- No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.5.446 / Virus Database: 268.18.11/723 - Release Date: 15/03/2007 11:27 [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.yahoo.com/ [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.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Delphi +Pen Drive
Sem problemas. Fica combinado assim. Na verdade gostaria apenas de ter o programa pq não entendi direito para que ele faz. Sds, Ricardo werelli [EMAIL PROTECTED] escreveu: Olá pessoal! Bem gente vamos fazer assim! Final de semana, vou trabalhar um pouco nele para deixar mais amigável para vocês (hoje ele é exelente, mas para meu uso particular, para outras pessoas ainda precisa de algumas implementações) e no começo da semana disponibilizo em pvt o executável eo o código a quem interessar. Combinado? Mas já aviso com antecedência é um programa simples (condizente com o pouco tempo de desenvolvimento em Delphi que tenho.) Atenciosamente. werelli __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [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.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Material sobre SQL x Delphi
Vou lhe indicar alguns sites que contém bastante material.. www.clubedelphi.com.br www.planetadelphi.com.br www.activedelphi.com.br www.devmedia.com.br Fora isso vc pode tb se informar sobre uso do DBExpress no Delphi ou ainda como instalar e utilizar a biblioteca de componentes de acesso a banco de dados Zeos (eu gosto hehe). Bons estudos. \o/ - Original Message - From: Sergio To: delphi-br@yahoogrupos.com.br Sent: Thursday, March 15, 2007 9:56 AM Subject: [delphi-br] Material sobre SQL x Delphi Bom dia! Sou novato em Delphi; já programo algum tempo em outras linguagens (Cobol,Perl,PHP,...) Alguém me indica algum material que possua explicações sobre utilizar SQL no Delphi. Obs. Não é material sobre SQL, esse não é mais necessário. Thanks! Sérgio [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: 268.18.11/723 - Release Date: 15/3/2007 11:27 [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Demora ...
... Original Message Follows From: Magnun Oliveira [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Demora ... Date: Wed, 14 Mar 2007 18:47:45 + Olá, tenho uma dakelas aplicações em q o cliente precisa ver varios dados na tela com um grid. Uso DBX + CDS + FB 1.5 Configurei o o package do CDS pra exibir 20 registros por vez ... blz. Porem o cliente precisa q ao entrar no formulario, o cursor do CDS se mova p/ o registro com a data mais proxima da atual, ferrando assim o tempo dessa consulta. Uma ordenação decrescente resolveria esse caso? Mas acho q nao vou poder usar assim, alguma outra solução? Outra duvida é, nessa mesma tela será exibido um saldo: DATA-VALOR---SALDO 01/01/07-50,00---50,00 02/01/07100,00--150,00 03/01/07-25,00--175,00 ... etc ... O cliente poderá editar o VALOR e automaticamente o sistema atualiza o saldo. criei uma rotina na aplicação p/ fazer esse saldo, ela posiciona o select no registro alterado e vai calculando até o ultimo. Gostaria de saber se com uma SP, esse update no saldo seria mais rapido? _ MSN Busca: fácil, rápido, direto ao ponto. http://search.msn.com.br _ MSN Hotmail, o maior webmail do Brasil. http://www.hotmail.com
Re: [delphi-br] Gerar arquivo JPEG
Segue função que fiz para salvar tela qdo der erro no sistema (tem umas
variaveis de uso meu aí no meio,
mas substitua pelos caminho da imagem, etc)
procedure TfAdm001.SalvaImagemErro(pMensagem : String);
//Função que captura tela
function CaptureScreenRect( ARect: TRect ): TBitmap;
var
ScreenDC: HDC;
begin
Result := TBitmap.Create;
with Result, ARect do
begin
Width := Right - Left;
Height := Bottom - Top;
ScreenDC := GetDC( 0 );
try
BitBlt( Canvas.Handle, 0, 0, Width, Height, ScreenDC, Left, Top,
SRCCOPY );
finally
ReleaseDC( 0, ScreenDC );
end;
end;
end;
const
cPastaErros = 'C:\Administrativo\Imagens\Erros\';
Var BitMap : TBitmap;
JPeg: TJPegImage;
zNomeArq : String;
zArqTXT : TStringList;
Begin
try
if not DirectoryExists(cPastaErros) then
ForceDirectories(cPastaErros);
except
exit;
end;
zNomeArq := FormatDateTime('MMddhhnnsszzz', now);
//Criando o Componente TBitmap
BitMap := TBitmap.Create;
//Capturando a Tela do PC
BitMap := CaptureScreenRect(Bounds(0,0,Screen.Width,Screen.Height));
//Salvando a imagem capturada no PC, note que o arquivo
//serah salvo em c\: com o nome HMG.BMP
// BitMap.SaveToFile(ExtractFilePath('c:\')+'HMG.bmp') ;
//Convertendo o aurquio HMG.BMP em HMG.JPG
try
BitMap.SaveToFile(cPastaErros + zNomeArq + '.bmp') ;
// BitMap.LoadFromFile(cPastaErros + zNomeArq + '.jpg');
JPeg := TJPegImage.Create;
try
JPeg.CompressionQuality := 30; { Aqui coloquei que o arq deve ter uma
Qualidade de 10% }
JPeg.Assign(BitMap);
//Convertendo em JPG
//JPeg.SaveToFile(ChangeFileExt('c:\HMG', '.jpg'));
JPeg.SaveToFile(cPastaErros + zNomeArq + '.jpg');
finally
JPeg.Free;
//*** salva mensagem erro em txt pq no momento que salva jpg ja deu
ok na msg **
try
zArqTXT := TStringList.Create;
zArqTXT.Add(pMensagem);
zArqTXT.SaveToFile(cPastaErros + zNomeArq + '.txt');
finally
zArqTXT.Free;
end;
//***
end;
finally
BitMap.Free;
if FileExists(cPastaErros + zNomeArq + '.bmp') then //exclui o BMP, deixa
só o JPG
DeleteFile(cPastaErros + zNomeArq + '.bmp');
end;
end;
- Original Message -
From: pcinfowave
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, March 15, 2007 12:33 PM
Subject: [delphi-br] Gerar arquivo JPEG
Ola, gostaria da ajuda para criar um procedimento q gera uma imagem JPG
de uma tela, tipo o PrintScreen
porem q já salve o arquivo na area de trabalho, para que meu usuario
possa me enviar esta tela por msn por exemplo.
É que os usuarios nao tem muito conhecimento sobre o micro, daí quero
facilitar para eles.
Se alguem puder ajudar, agradeço!
[]´s
paulo
[As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Apostila de Rave Reports Avancada
Bom dia Pessoal alguem tem alguma apostila ou tutorial do Rave que envolve a parte avancanda de relotorios , como fazer um relatorio utilizando 2 ou mais tabelas do banco , relatorio com quebra de pagina ,etc. Se alguem tiver e poder enviar para o meu email ou passar o link agradeço. email - [EMAIL PROTECTED] Obrigado, Danilo
[delphi-br] WebService (Urgente)!!!!
Pessoal, preciso de ajuda para consumir um WebService... aparentemente programei tudo corretamente... quando faço a chamado do método recebo a seguinte mensagem de erro: Conversion from class TButton to SOAP is not suported - SOAP Classes must derive from TRemotable Alguém pode me ajudar Se precisarem da url segue abaixo: http://200.213.192.135/wscadastromotorista/wsmotorista.asmx Segue o meu código abaixo: procedure TForm1.btnValidarClick(Sender: TObject); var wsMotorista : wsMotoristaSoap ; lAuthHeader : AuthHeader ; lSituacao : Situacao_Motorista ; begin wsMotorista := GetwsMotoristaSoap() ; lAuthHeader.Senha := 'teste' ; lAuthHeader.Usuario := abc ; lAuthHeader.Unidade := 560 ; lAuthHeader.CPF_Motorista := '333' ; lAuthHeader.Placa := 'CMC3210' ; lAuthHeader.Funcao:= FUNCAO(1) ; lAuthHeader.Categoria := CATEGORIA(2) ; wsMotorista.Verifica_Situacao_Motorista(lAuthHeader, lSituacao ) ; //Pega o resultado ... end ;
[delphi-br] Printer index out of range
Galerta, tenho uma aplicação rodando em estilo client/server, feita em D7. Estou com o seguinte problema, quando o usuario ta dentro de um cadastro e mandar gerar a impressão desse cadastro acontece do sistema travar e a mensagem Printer index out of range aparecer para o usuário. Ai eu tenho q finalizar o aplicativo pelo gerenciado de tarefa. Alguem sabe me informar como resolver isso ou q está causando isso.. Agradeço a atenção Ricardo Mendes TotalSat - Rastreamento de Veículos Departamento de Informática E-mail: [EMAIL PROTECTED] Tel. (41) 2109-7717 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Printer index out of range
fale pra gente como é feita essa rotina de impressão. qual componente vc usa. Em 16/03/07, Ricardo Mendes [EMAIL PROTECTED] escreveu: Galerta, tenho uma aplicação rodando em estilo client/server, feita em D7. Estou com o seguinte problema, quando o usuario ta dentro de um cadastro e mandar gerar a impressão desse cadastro acontece do sistema travar e a mensagem Printer index out of range aparecer para o usuário. Ai eu tenho q finalizar o aplicativo pelo gerenciado de tarefa. Alguem sabe me informar como resolver isso ou q está causando isso.. Agradeço a atenção Ricardo Mendes TotalSat - Rastreamento de Veículos Departamento de Informática E-mail: [EMAIL PROTECTED] r.mendes%40totalsat.com.br Tel. (41) 2109-7717 [As partes desta mensagem que não continham texto foram removidas] -- 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]
Re: [delphi-br] Printer index out of range
Esse é o evento q utilizo para impressão da ficha.
procedure Tfrm_FichadeVenda.BotaoImprimirClick(Sender: TObject);
var
cli,fin,ite,fic,cor:integer;
opc, doc, ie: String;
begin
Application.CreateForm(Tfrm_RelFichaVenda, frm_RelFichaVenda);
cli := d.IBFicha_VendaID_VENDA.Value;
fin := d.IBFicha_VendaID_VENDA.Value;
ite := d.IBFicha_VendaID_FICHA.Value;
fic := d.IBFicha_VendaID_FICHA.Value;
cor := d.IBFicha_VendaID_VENDA.Value;
opc := IBQryVerClienteTESTA.Value;
ie := IBQryVerClienteIE.Value;
doc := IBQryVerClienteRG.Value;
try
with frm_RelFichaVenda do
begin
if opc='N'then
begin
cnpjcpf.Caption:= ie;
QRLabel10.Caption:= 'I.E.:';
QRLabel7.Caption:= 'CNPJ';
end
else
begin
QRLabel10.Caption:= 'RG:';
cnpjcpf.Caption:= doc;
QRLabel7.Caption:= 'CPF';
end;
IBQryVerCliente.Close;
IBQryVerCliente.ParamByName('codigo').Value := cli;
IBQryVerCliente.Open;
IBQryVerFinanceiro.Close;
IBQryVerFinanceiro.ParamByName('codigo').Value := fin;
IBQryVerFinanceiro.Open;
IBQryVerFicha.Close;
IBQryVerFicha.ParamByName('venda').Value := fic;
IBQryVerFicha.Open;
IBQryVerCorretora.Close;
IBQryVerCorretora.ParamByName('codigo').Value := cor;
IBQryVerCorretora.Open;
IBQryVerItensFicha.Close;
IBQryVerItensFicha.ParamByName('ficha').Value := ite;
IBQryVerItensFicha.Open;
IBQryVerCo.Close;
IBQryVerCo.ParamByName('consultor').Value:=
IBQryVerClienteID_CONSULTOR.Value;
IBQryVerCo.Open;
consultor.Caption:= Contar(IBQryVerCoNOMECONSULTOR.Value);
QuickRep1.PrinterSetup;
QuickRep1.Preview;
end;
finally
frm_RelFichaVenda.Free;
end;
end;
Ricardo Mendes
TotalSat - Rastreamento de Veículos
Departamento de Informática
E-mail: [EMAIL PROTECTED]
Tel. (41) 2109-7717
- Original Message -
From: Eduardo Silva dos Santos
To: delphi-br@yahoogrupos.com.br
Sent: Friday, March 16, 2007 3:02 PM
Subject: Re: [delphi-br] Printer index out of range
fale pra gente como é feita essa rotina de impressão.
qual componente vc usa.
Em 16/03/07, Ricardo Mendes [EMAIL PROTECTED] escreveu:
Galerta, tenho uma aplicação rodando em estilo client/server, feita em
D7.
Estou com o seguinte problema, quando o usuario ta dentro de um cadastro e
mandar gerar a impressão desse cadastro acontece do sistema travar e a
mensagem Printer index out of range aparecer para o usuário. Ai eu tenho q
finalizar o aplicativo pelo gerenciado de tarefa.
Alguem sabe me informar como resolver isso ou q está causando isso..
Agradeço a atenção
Ricardo Mendes
TotalSat - Rastreamento de Veículos
Departamento de Informática
E-mail: [EMAIL PROTECTED] r.mendes%40totalsat.com.br
Tel. (41) 2109-7717
[As partes desta mensagem que não continham texto foram removidas]
--
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]
[As partes desta mensagem que não continham texto foram removidas]
[delphi-br] OFF - Sistema de Chamados
Pessoal alguem conhece algum sistema open-source em qualquer linguagem de controle de chamados/solicitações de serviços ? Abraço Fabio dantas [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] OFF - Sistema de Chamados
Sim, eu uso um. chama-se OSTICKET e é em php/mysql. - Original Message - From: Fabio Dantas To: delphi-br@yahoogrupos.com.br Sent: Friday, March 16, 2007 3:35 PM Subject: [delphi-br] OFF - Sistema de Chamados Pessoal alguem conhece algum sistema open-source em qualquer linguagem de controle de chamados/solicitações de serviços ? Abraço Fabio dantas [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: 268.18.11/723 - Release Date: 15/3/2007 11:27 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] relatório (Nota Fiscal) pelo VDOPrint
Olá amigos, tenho um problema aqui gostaria de ajuda, quando vou imprimir um relatório (Nota Fiscal) pelo VDOPrint, e onde há caracteres acentuados, aparece um símbolo maluco. Alguém já teve esse propblema. a impressora é Epson FX 2191. Agradeço a atenção de todos. Mario Lucio [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Printer index out of range
Aparentemente ta tudo certo.
o ideal é vc depurar para ver exatamente onde é o erro, ou usar alguma
ferramente que registre o erro e em qual linha aconteceu, o MadException faz
isso, mas tem outros..
lembrando que pode ser uma olhada do Sistema Operacional, principalmente se
for Windows 98..
o ideal mesmo é vc usar uma dessas ferramentas para capturar o log de erros.
eu uso o ExceptionalMagic..
http://www.dimusware.com/products/excmagic/index.html
toda vez que minha aplicação da um erro, ela envia um arquivo de log no
seguinte formato:
ajuda muito, e antes do cliente ligar eu ja corrigi.
***
--15/03/2007 14:08:47---
Exception 'EMyError' in module ControleAtos.exe at 001B4660
Can't connect to MySQL server on 'cartoriobarra.no-ip.org' (10061)
Socket error on connect. WSAGetLastError return 10060($274C)
Module: MyClasses, Source: UNKNOWN, Line UNKNOWN
Procedure: UNKNOWN
Call stack:
:005B5660 [ControleAtos.exe]
:7C812A5B [kernel32.dll]
:00590ABA [ControleAtos.exe]
:005C35CE [ControleAtos.exe]
:0080D2C7 [ControleAtos.exe] (Cad_Corretores.pas, line 117)
:0080D822 [ControleAtos.exe] (Cad_Corretores.pas, line 224)
:0049BB33 [ControleAtos.exe]
:0049EB06 [ControleAtos.exe]
:0048181C [ControleAtos.exe]
:77D28734 [USER32.dll]
Main Thread ID = 0FC0, Current Thread ID = 0FC0
Registers:
EAX = 0012F5F8 CS = 001B EIP = 7C812A5B Flags = 0202
EBX = 005B37A0 SS = 0023 ESP = 0012F5F4EBP = 0012F648
ECX = DS = 0023 ESI = 0012F67CFS = 003B
EDX = 005B5660 ES = 0023 EDI = 005AB724GS =
Code at CS:EIP
5E C9 C2 10 00 85 FF 0F 8E 36 93 FF FF 8B 55 FC
Stack:
0103D688 0EEDFADE 0001 7C812A5B
77D28734 00404405 0103D780
0043490B 0002 010E7220
77D28734
*
Em 16/03/07, Ricardo Mendes [EMAIL PROTECTED] escreveu:
Esse é o evento q utilizo para impressão da ficha.
procedure Tfrm_FichadeVenda.BotaoImprimirClick(Sender: TObject);
var
cli,fin,ite,fic,cor:integer;
opc, doc, ie: String;
begin
Application.CreateForm(Tfrm_RelFichaVenda, frm_RelFichaVenda);
cli := d.IBFicha_VendaID_VENDA.Value;
fin := d.IBFicha_VendaID_VENDA.Value;
ite := d.IBFicha_VendaID_FICHA.Value;
fic := d.IBFicha_VendaID_FICHA.Value;
cor := d.IBFicha_VendaID_VENDA.Value;
opc := IBQryVerClienteTESTA.Value;
ie := IBQryVerClienteIE.Value;
doc := IBQryVerClienteRG.Value;
try
with frm_RelFichaVenda do
begin
if opc='N'then
begin
cnpjcpf.Caption:= ie;
QRLabel10.Caption:= 'I.E.:';
QRLabel7.Caption:= 'CNPJ';
end
else
begin
QRLabel10.Caption:= 'RG:';
cnpjcpf.Caption:= doc;
QRLabel7.Caption:= 'CPF';
end;
IBQryVerCliente.Close;
IBQryVerCliente.ParamByName('codigo').Value := cli;
IBQryVerCliente.Open;
IBQryVerFinanceiro.Close;
IBQryVerFinanceiro.ParamByName('codigo').Value := fin;
IBQryVerFinanceiro.Open;
IBQryVerFicha.Close;
IBQryVerFicha.ParamByName('venda').Value := fic;
IBQryVerFicha.Open;
IBQryVerCorretora.Close;
IBQryVerCorretora.ParamByName('codigo').Value := cor;
IBQryVerCorretora.Open;
IBQryVerItensFicha.Close;
IBQryVerItensFicha.ParamByName('ficha').Value := ite;
IBQryVerItensFicha.Open;
IBQryVerCo.Close;
IBQryVerCo.ParamByName('consultor').Value:=
IBQryVerClienteID_CONSULTOR.Value;
IBQryVerCo.Open;
consultor.Caption:= Contar(IBQryVerCoNOMECONSULTOR.Value);
QuickRep1.PrinterSetup;
QuickRep1.Preview;
end;
finally
frm_RelFichaVenda.Free;
end;
end;
Ricardo Mendes
TotalSat - Rastreamento de Veículos
Departamento de Informática
E-mail: [EMAIL PROTECTED] r.mendes%40totalsat.com.br
Tel. (41) 2109-7717
- Original Message -
From: Eduardo Silva dos Santos
To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
Sent: Friday, March 16, 2007 3:02 PM
Subject: Re: [delphi-br] Printer index out of range
fale pra gente como é feita essa rotina de impressão.
qual componente vc usa.
Em 16/03/07, Ricardo Mendes [EMAIL PROTECTED] rick%40clinirad.com.br
escreveu:
Galerta, tenho uma aplicação rodando em estilo client/server, feita em
D7.
Estou com o seguinte problema, quando o usuario ta dentro de um cadastro
e
mandar gerar a impressão desse cadastro acontece do sistema travar e a
mensagem Printer index out of range aparecer para o usuário. Ai eu tenho
q
finalizar o aplicativo pelo gerenciado de tarefa.
Alguem sabe me informar como resolver isso ou q está causando isso..
Agradeço a atenção
Ricardo Mendes
TotalSat - Rastreamento de Veículos
Departamento de Informática
E-mail: [EMAIL PROTECTED] r.mendes%40totalsat.com.br
r.mendes%40totalsat.com.br
Tel. (41) 2109-7717
[As partes desta mensagem que não continham texto foram removidas]
--
Eduardo Silva dos Santos
DRD Sistemas.
(27) 3218-4201
MSN: [EMAIL PROTECTED] eduardo.drd%40gmail.com
Site:
[delphi-br] Homologar Farmacia Popuplar
Boa tarde pessoal , tenho um sistema de farmacia estamos começamos a homologar a NOVARTIS , como faço para homologar a FARMACIA POPULAR?? Alguem ja homologou?? Se sim pode me dar umas dicas?? JESUS TE AMA !!! Itabyte Tecnologia®-www.itabyte.com MarcioCC® Analista/Programador - For Delphi MSN : [EMAIL PROTECTED] SKYPE : itabytetec Fone : 15-3524-1946 [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] Alternar aplicativo
Boa noite pessoal... Um amigo meu me perguntou sobre uma questão que ainda não fiz. É a seguinte, no Delphi eu quero saber como faço para trazer um aplicativo qualquer que já esteja em execução para primeiro plano. Obrigado, Cleber. Analista de Sistemas [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] OFF - Sistema de Chamados
cara como vc fez para fazer download dele ??? já abri o site varias vezes e sempre esta coming soon! e a versão antica esta descontinuada e não tem opção apra download - Original Message - From: Mauro Paes Corrêa - GNX LTDA. To: delphi-br@yahoogrupos.com.br Sent: Friday, March 16, 2007 3:43 PM Subject: Re: [delphi-br] OFF - Sistema de Chamados Sim, eu uso um. chama-se OSTICKET e é em php/mysql. - Original Message - From: Fabio Dantas To: delphi-br@yahoogrupos.com.br Sent: Friday, March 16, 2007 3:35 PM Subject: [delphi-br] OFF - Sistema de Chamados Pessoal alguem conhece algum sistema open-source em qualquer linguagem de controle de chamados/solicitações de serviços ? Abraço Fabio dantas [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: 268.18.11/723 - Release Date: 15/3/2007 11:27 [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/
Re: [delphi-br] OFF - Sistema de Chamados
Passo para vc em PVT o que eu tenho aqui. - Original Message - From: Valdemir To: delphi-br@yahoogrupos.com.br Sent: Friday, March 16, 2007 6:22 PM Subject: Re: [delphi-br] OFF - Sistema de Chamados cara como vc fez para fazer download dele ??? já abri o site varias vezes e sempre esta coming soon! e a versão antica esta descontinuada e não tem opção apra download - Original Message - From: Mauro Paes Corrêa - GNX LTDA. To: delphi-br@yahoogrupos.com.br Sent: Friday, March 16, 2007 3:43 PM Subject: Re: [delphi-br] OFF - Sistema de Chamados Sim, eu uso um. chama-se OSTICKET e é em php/mysql. - Original Message - From: Fabio Dantas To: delphi-br@yahoogrupos.com.br Sent: Friday, March 16, 2007 3:35 PM Subject: [delphi-br] OFF - Sistema de Chamados Pessoal alguem conhece algum sistema open-source em qualquer linguagem de controle de chamados/solicitações de serviços ? Abraço Fabio dantas [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: 268.18.11/723 - Release Date: 15/3/2007 11:27 [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/ -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.446 / Virus Database: 268.18.11/723 - Release Date: 15/3/2007 11:27 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Alternar aplicativo
procedure... var nHandle : THandle; begin //localiza a janela do aplicativo nHandle := FindWindow(nil, 'Calculadora'); if nHandle 0 then begin FlashWindow(nHandle, True); //pisca a janela ShowWindow(nHandle, SW_RESTORE);//mostra a janela SetForegroundWindow(nHandle);//traz pra frente end end; *Adriano Santos* Cleber(Telefonica) respondeu: Boa noite pessoal... Um amigo meu me perguntou sobre uma questão que ainda não fiz. É a seguinte, no Delphi eu quero saber como faço para trazer um aplicativo qualquer que já esteja em execução para primeiro plano. Obrigado, Cleber. Analista de Sistemas [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: 268.18.11/723 - Release Date: 15/3/2007 11:27
Res: [delphi-br] OFF - Sistema de Chamados
VC PODERIA ENVIAR PRA MIM TAMBÉM? - Mensagem original De: Mauro Paes Corrêa - GNX LTDA. [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Sexta-feira, 16 de Março de 2007 18:47:19 Assunto: Re: [delphi-br] OFF - Sistema de Chamados Passo para vc em PVT o que eu tenho aqui. - Original Message - From: Valdemir To: [EMAIL PROTECTED] os.com.br Sent: Friday, March 16, 2007 6:22 PM Subject: Re: [delphi-br] OFF - Sistema de Chamados cara como vc fez para fazer download dele ??? já abri o site varias vezes e sempre esta coming soon! e a versão antica esta descontinuada e não tem opção apra download - Original Message - From: Mauro Paes Corrêa - GNX LTDA. To: [EMAIL PROTECTED] os.com.br Sent: Friday, March 16, 2007 3:43 PM Subject: Re: [delphi-br] OFF - Sistema de Chamados Sim, eu uso um. chama-se OSTICKET e é em php/mysql. - Original Message - From: Fabio Dantas To: [EMAIL PROTECTED] os.com.br Sent: Friday, March 16, 2007 3:35 PM Subject: [delphi-br] OFF - Sistema de Chamados Pessoal alguem conhece algum sistema open-source em qualquer linguagem de controle de chamados/solicitaçõ es de serviços ? Abraço Fabio dantas [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: 268.18.11/723 - Release Date: 15/3/2007 11:27 [As partes desta mensagem que não continham texto foram removidas] _ _ _ _ ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo. com/mailbeta/ tudonovo/ - - - - - - No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.446 / Virus Database: 268.18.11/723 - Release Date: 15/3/2007 11:27 [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.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] relatório (Nota Fiscal) pelo VDO Print
Eu uso a propriedade CharMode = cmClear ao qual ele retira os acentos... - Original Message - From: Mario Lucio To: delphi-br Sent: Friday, March 16, 2007 3:05 PM Subject: [delphi-br] relatório (Nota Fiscal) pelo VDOPrint Olá amigos, tenho um problema aqui gostaria de ajuda, quando vou imprimir um relatório (Nota Fiscal) pelo VDOPrint, e onde há caracteres acentuados, aparece um símbolo maluco. Alguém já teve esse propblema. a impressora é Epson FX 2191. Agradeço a atenção de todos. Mario Lucio [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] OFF - Sistema de Chamados
Podem baixar no fórum, na categoria MOD. Procure por post do último ano. http://www.osticket.com/forums/showthread.php?t=914 Bom uso, JDorea - Original Message - From: Nilton Fernando Barbosa To: delphi-br@yahoogrupos.com.br Sent: Friday, March 16, 2007 7:31 PM Subject: Res: [delphi-br] OFF - Sistema de Chamados VC PODERIA ENVIAR PRA MIM TAMBÉM? - Mensagem original De: Mauro Paes Corrêa - GNX LTDA. [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Sexta-feira, 16 de Março de 2007 18:47:19 Assunto: Re: [delphi-br] OFF - Sistema de Chamados Passo para vc em PVT o que eu tenho aqui. - Original Message - From: Valdemir To: [EMAIL PROTECTED] os.com.br Sent: Friday, March 16, 2007 6:22 PM Subject: Re: [delphi-br] OFF - Sistema de Chamados cara como vc fez para fazer download dele ??? já abri o site varias vezes e sempre esta coming soon! e a versão antica esta descontinuada e não tem opção apra download - Original Message - From: Mauro Paes Corrêa - GNX LTDA. To: [EMAIL PROTECTED] os.com.br Sent: Friday, March 16, 2007 3:43 PM Subject: Re: [delphi-br] OFF - Sistema de Chamados Sim, eu uso um. chama-se OSTICKET e é em php/mysql. - Original Message - From: Fabio Dantas To: [EMAIL PROTECTED] os.com.br Sent: Friday, March 16, 2007 3:35 PM Subject: [delphi-br] OFF - Sistema de Chamados Pessoal alguem conhece algum sistema open-source em qualquer linguagem de controle de chamados/solicitaçõ es de serviços ? Abraço Fabio dantas [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: 268.18.11/723 - Release Date: 15/3/2007 11:27 [As partes desta mensagem que não continham texto foram removidas] _ _ _ _ ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo. com/mailbeta/ tudonovo/ - - - - - - No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.446 / Virus Database: 268.18.11/723 - Release Date: 15/3/2007 11:27 [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.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Dúvida sobre código de barras
Olá pessoal, alguém sabe como faço para ler o código de barras através do scaner e o código já sair em um edit por exemplo ? Preciso de algum componente para isso ? Obrigado Ricardo
