Re: [delphi-br] Colocar um diretório no PATH do Wind ows
pelo dos faça assim set path=%path%;c:\minha pasta Alcione Guimarães (11)9515-8707 - Original Message - From: José Mário Silva Guedes To: Delphi BR - Grupo de Discussão Sent: Monday, July 07, 2008 10:45 AM Subject: [delphi-br] Colocar um diretório no PATH do Windows Juro que procurei mas acho que o Google brigou comigo... Tem como incluir na variável PATH um determinado diretório? Extendendo a pergunta, tem como criar uma variável de sistema nova? Obrigado pela paciência, -- José Mário Silva Guedes Analista Programador Delphi http://pgviavel.blogspot.com/ [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] Exibir nome das tabelas de um banco Access.
faça assim ponha um listbox no form depois no on click do botão ou no on show do form: ListBox1.Items.Clear; try IBDataBase2.GetTableNames(listBox1.Items,false); except end; Alcione Guimarães (11)9515-8707 - Original Message - From: criamabr To: delphi-br@yahoogrupos.com.br Sent: Monday, June 23, 2008 9:47 AM Subject: [delphi-br] Exibir nome das tabelas de um banco Access. Olá pessoal, Existe algum objeto que guarde o nome das tabelas de um banco Access, para serem exibidas através de um for? Desde já, obrigado. Abraço, Cristiano. [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Impressora HP Laser P1005 x QuickReport
Ligo o pc, gero um Relatório QuickReport.. não imprime abro o bloco de notas, word.. qq coisa... imprime... volto pro meu aplicavo com quickreport. aí imprime... Delphi7 + QuickReport... O Que pode ser? a porta é USB. tem algo tipo abrir a porta Alcione Guimarães (11)9515-8707 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Gravar imagens no Banco Interbase/Firebir
Isso já me conforta bastante,
Abraço!
Alcione Guimarães
(11)9515-8707
- Original Message -
From: Bruno Lichot
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, May 14, 2008 3:42 PM
Subject: RE: [delphi-br] Re: Gravar imagens no Banco Interbase/Firebir
Em 5 anos usando imagens no banco, e bases especificas de imagem começando em
10gb, eu nunca tive corrupção de banco de dados em nenhum cliente, mas meu
banco em termos de hardware e sofwtrae está sempre bem cuidado.
Inclusive tenho alguns casos grandes em FireBird que funcionam a mais de 4
anos perfeitamente.
Abs
BL
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of
Alcistemas Informática
Sent: quarta-feira, 14 de maio de 2008 15:07
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] Re: Gravar imagens no Banco Interbase/Firebir
Bruno, desculpe entrar no tópico.
Tenho um projeto com 90.000 imagens para por isso em banco de dados,
quanto a desempenho, não vejo problema algum, é só tomar alguns cuidados nos
selects e etc.. epronto.
O que me preocupa é em caso se corromper o banco de dados,
isso poderia dificultar ainda mais o processo de recuperação do banco de
dados ?
Alcione Guimarães
(11)9515-8707
- Original Message -
From: Bruno Lichot
To: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br
Sent: Tuesday, May 13, 2008 5:31 PM
Subject: RE: [delphi-br] Re: Gravar imagens no Banco Interbase/Firebir
Meus sistemas e este exemplo estão preparados para trabalhar somente em rede,
e com distribuição geográfica.
Meus sistema trabalham com persistência de imagens sempre no banco, e a
maioria são ERPs de missão crítica. E sempre em redes e maioria com
distribuição geográfica através de vpn, link dedicado e internet, sendo que a
maioria é pela internet :D
Abs
BL
From: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br] On
Behalf Of Ricardo Cabral
Sent: terça-feira, 13 de maio de 2008 17:22
To: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br
Subject: RE: [delphi-br] Re: Gravar imagens no Banco Interbase/Firebir
Bruno,
E se o sistema for em rede, será se o banco não ficaria muito lento?
Bruno Lichot [EMAIL
PROTECTED]mailto:bruno.lichot%40codegear.commailto:bruno.lichot%40codegear.com
escreveu:
No meu link de downloads gratuitos(HTTP://cc.codegear.com/author/795118), no
primeiro exemplo, no cadastro de cliente eu trabalho com fotos dos clientes.
E está funcional e otimizado a forma de se trabalhar com persistência no
banco de imagens.
Eu apenas recomendaria, que no caso de produção, não use a mesma tabela de
clientes para armazenar a foto, mas que crie uma tabela clientes foto, não
somente pela melhora do armazenamento, mas também pela organização e dificulta
que algum estagiário desavisado ou programador inexperiente aplique um select *
na tabela de clientes e trafegue aquele montão de fotos desnecessariamente :D.
Sobre pesar no banco, olha, é claro que bancos de dados com imagens o fazem
crescer mais, mas o fato do banco ficar lento, está mais relacionado com a sua
construção, manutenção e configuração do que conter fotos ou não. Um banco de
dados sem fotos corre os mesmos riscos de ser lento.
Abs
BL
From:
delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br]
On Behalf Of rafaelpinto19
Sent: terça-feira, 6 de maio de 2008 19:17
To:
delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br
Subject: [delphi-br] Re: Gravar imagens no Banco Interbase/Firebir
Alessandro, Ricardo e Bruno e aos demais membros do Grupo, quero
agradecer por tentarem me expilcar e ajudar a resolver este problema,
Estou em fase de aprendizagem ainda. Eu tentei um código, mas não deu
certo. Mas perece q eu estou no caminho certo. No Primeiro momento eu
até pensei que consegui gravar a imagen capturada, pensei em ter
conseguindo resolver o problema. Sempre quando faço uma consulta para
retornar a foto da pessoa resgitrada no Sistema, sempre aparece a foto
da última imagem capturada. Ou seja...se eu registrei João, Maria e
José respectivamente e capturei a foto de cada um deles, mesmo eu
consultando o João, sempre me rotorna a imagem do José, por ter sido o
último quem o sistema capturou a imagem. Postei esse meu código para
ver onde eu estou errando e ver se vcs conseguem me ajudar a resolver
este problema.
procedure TPrincipal.BtnGravarClick(Sender: TObject);
begin
//imgFoto.Visible:= True;
imgFoto.Picture.Bitmap.LoadFromFile(Camera1.FichierImage);
Query.Close;
Query.SQL.Clear;
Query.SQL.Add('insert into VISITA(CODIGO,NOME,FOTO) values
Re: [delphi-br] Re: Gravar imagens no Banco Interbase/Firebir
Bruno, desculpe entrar no tópico.
Tenho um projeto com 90.000 imagens para por isso em banco de dados,
quanto a desempenho, não vejo problema algum, é só tomar alguns cuidados nos
selects e etc.. epronto.
O que me preocupa é em caso se corromper o banco de dados,
isso poderia dificultar ainda mais o processo de recuperação do banco de dados ?
Alcione Guimarães
(11)9515-8707
- Original Message -
From: Bruno Lichot
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, May 13, 2008 5:31 PM
Subject: RE: [delphi-br] Re: Gravar imagens no Banco Interbase/Firebir
Meus sistemas e este exemplo estão preparados para trabalhar somente em rede,
e com distribuição geográfica.
Meus sistema trabalham com persistência de imagens sempre no banco, e a
maioria são ERPs de missão crítica. E sempre em redes e maioria com
distribuição geográfica através de vpn, link dedicado e internet, sendo que a
maioria é pela internet :D
Abs
BL
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On Behalf Of
Ricardo Cabral
Sent: terça-feira, 13 de maio de 2008 17:22
To: delphi-br@yahoogrupos.com.br
Subject: RE: [delphi-br] Re: Gravar imagens no Banco Interbase/Firebir
Bruno,
E se o sistema for em rede, será se o banco não ficaria muito lento?
Bruno Lichot [EMAIL PROTECTED]mailto:bruno.lichot%40codegear.com escreveu:
No meu link de downloads gratuitos(HTTP://cc.codegear.com/author/795118), no
primeiro exemplo, no cadastro de cliente eu trabalho com fotos dos clientes.
E está funcional e otimizado a forma de se trabalhar com persistência no
banco de imagens.
Eu apenas recomendaria, que no caso de produção, não use a mesma tabela de
clientes para armazenar a foto, mas que crie uma tabela clientes foto, não
somente pela melhora do armazenamento, mas também pela organização e dificulta
que algum estagiário desavisado ou programador inexperiente aplique um select *
na tabela de clientes e trafegue aquele montão de fotos desnecessariamente :D.
Sobre pesar no banco, olha, é claro que bancos de dados com imagens o fazem
crescer mais, mas o fato do banco ficar lento, está mais relacionado com a sua
construção, manutenção e configuração do que conter fotos ou não. Um banco de
dados sem fotos corre os mesmos riscos de ser lento.
Abs
BL
From: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br] On
Behalf Of rafaelpinto19
Sent: terça-feira, 6 de maio de 2008 19:17
To: delphi-br@yahoogrupos.com.brmailto:delphi-br%40yahoogrupos.com.br
Subject: [delphi-br] Re: Gravar imagens no Banco Interbase/Firebir
Alessandro, Ricardo e Bruno e aos demais membros do Grupo, quero
agradecer por tentarem me expilcar e ajudar a resolver este problema,
Estou em fase de aprendizagem ainda. Eu tentei um código, mas não deu
certo. Mas perece q eu estou no caminho certo. No Primeiro momento eu
até pensei que consegui gravar a imagen capturada, pensei em ter
conseguindo resolver o problema. Sempre quando faço uma consulta para
retornar a foto da pessoa resgitrada no Sistema, sempre aparece a foto
da última imagem capturada. Ou seja...se eu registrei João, Maria e
José respectivamente e capturei a foto de cada um deles, mesmo eu
consultando o João, sempre me rotorna a imagem do José, por ter sido o
último quem o sistema capturou a imagem. Postei esse meu código para
ver onde eu estou errando e ver se vcs conseguem me ajudar a resolver
este problema.
procedure TPrincipal.BtnGravarClick(Sender: TObject);
begin
//imgFoto.Visible:= True;
imgFoto.Picture.Bitmap.LoadFromFile(Camera1.FichierImage);
Query.Close;
Query.SQL.Clear;
Query.SQL.Add('insert into VISITA(CODIGO,NOME,FOTO) values
(:CODIGO,:NOME,:FOTO)');
Query.ParamByName('FOTO').LoadFromFile(Camera1.FichierImage,ftBlob);
//:= imgFoto.Picture.Bitmap.LoadFromFile(Camera1.FichierImage);
Query.ParamByName('CODIGO').AsString := Edit1.Text;
Query.ParamByName('NOME').AsString := Edit2.Text;
Query.ExecSQL;
Query.Transaction.Commit;
Query.Transaction.Active := true;
end.
Onde:
* imgFoto = TImage(Image), é o 6º componente da palheta Aditional no
Delphi e responsável pela visualização de imagens, fotos e etc.
* Camera1 =TCamera(Câmera), É o único componente da palheta Yves e é
responsável pela visualização de imagens de uma Webcam ou Câmeras
digitais. Nela conseguimos fazer a devidas e necessárias capturas.
e esse é o código que eu uso na para visualizar os dados e foto do
registro consultado.
procedure TProcFoto.DBGrid1DblClick(Sender: TObject);
begin
Principal.Edit1.Text := Query1.fieldbyname('CODIGO').AsString;
Principal.Edit2.Text := Query1.fieldbyname('NOME').AsString;
Principal.imgFoto.Picture.Bitmap.LoadFromFile(Principal.Camera1.FichierImage);
close;
end;
Onde:
* Principal é o nome do Form de destino onde estão os edtis que vão
mostrar as
Re: [delphi-br] [Off] 5º FDD em São Paulo, a lguém vai?
Eu vou, aproveitando o Adriano no tópico, a devmedia pretende dar uma forcinha para assinantes, tipo um descontinho...? Alcione Guimarães (11)9515-8707 - Original Message - From: O2 Tecnologia (aJato) To: delphi-br@yahoogrupos.com.br Sent: Saturday, May 10, 2008 5:44 PM Subject: Re: [delphi-br] [Off] 5º FDD em São Paulo, alguém vai? Estamos verificando a possibilidade de irmos. Adriano Santos (Yahoo) escreveu: Olá pessoal, Alguém de SP vai no 5º FDD esse ano? -- Adriano Santos --- Editor Técnico Revista ClubeDelphi e WebMobile http://www.delphitodelphi.blogspot.com http://www.delphitodelphi.blogspot.com http://www.adrianosantos.pro.br http://www.adrianosantos.pro.br http://www.devmedia.com.br http://www.devmedia.com.br __ Informação do NOD32 IMON 3090 (20080509) __ 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] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] DbGrid não atualiza após inser ção
Desculpe, nao gosto de responder assim, mais poderia passar o banco de dados que está usando e quais os componentes de acesso.. se for um AdoTable ou Adoquery por exempoo tente query1.refresh; ou se for uma máquina muito antigo tente. dbgrid1.refresh ou form1.refresh; pode ser que nao esteja desenhando a tela pra vc.. qual a configuraçao da maquina em que o erro ocorre ? Alcione Guimarães (11)9515-8707 - Original Message - From: Alisson To: delphi-br@yahoogrupos.com.br Sent: Wednesday, April 30, 2008 10:46 AM Subject: [delphi-br] DbGrid não atualiza após inserção Pessoal, Estou com um problema mei macabro. Em algumas máquinas o DbGrid não insere uma nova linha após a inclusão de um novo registro. Se fechar a tela e abrir o dataset novamente, o DbGrid é atualizado(Mostra todas as linhas). Na máquina onde programo o erro não acontece. Alguém sabe o que está acontecendo? __ Faça ligações para outros computadores com o novo Yahoo! Messenger http://br.beta.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Gerador de Relatorios..
Esse fast-report tem como utilizar com a versão Free do Delphi ? pois o mesmo não permite instalar componentes, porém se o Fast-Report tivesse como conversar com ele via Dll ou algo parecido.. seria uma combinação perfeita... Alcione Guimarães (11)9515-8707 - Original Message - From: Alessandro DUARTE de Moraes To: delphi-br@yahoogrupos.com.br Sent: Tuesday, April 29, 2008 2:00 PM Subject: Re: [delphi-br] Gerador de Relatorios.. Sugiro o FastReport, que inclusive tem uma versão Free que é muito boa. www.fast-report.com Eu utilizo a versão Free já faz tempo e não tenho do que me queixar. Alessandro DUARTE de Moraes A.C. Santa Casa do Rio Grande. http://www.santacasarg.com.br - Original Message - From: Vinicius da Silva Pinto To: delphi-br@yahoogrupos.com.br Sent: Tuesday, April 29, 2008 1:12 PM Subject: [delphi-br] Gerador de Relatorios.. Salve a todos... Alguem poderia me indicar um gerador de relatorios que seja similar ao ReportBuilder, onde eu posso comprar, se é free ou não... pois estou tendo dificuldade de comprar o mesmo com o representante aqui no Brasil. É para ser utilizado com D7 e FB, não estou conseguindo tirar muito proveito do Rave. Agradeço qualquer dica e sugestão... Vinicius. Tel (21) 8816-2404 -- E-mail Seguro Vetorial.net Mensagem classificada como NÃO-SPAM. Para classificar como SPAM, encaminhe para [EMAIL PROTECTED] Chave de Identificação: 54568,4817513c952341644335774 [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] Gerador de Relatorios..
show de bola! vou começar a estudar, valeu colega! Alcione Guimarães (11)9515-8707 - Original Message - From: Joao Morais To: delphi-br@yahoogrupos.com.br Sent: Tuesday, April 29, 2008 4:07 PM Subject: Re: [delphi-br] Gerador de Relatorios.. Alcistemas Informática wrote: Esse fast-report tem como utilizar com a versão Free do Delphi ? pois o mesmo não permite instalar componentes, porém se o Fast-Report tivesse como conversar com ele via Dll ou algo parecido.. seria uma combinação perfeita... Se você colocar uma opção para acessar o designer do FR em tempo de execução, você não precisa do FR instalado na IDE. É assim que eu tenho utilizado. Alcione Guimarães (11)9515-8707 - Original Message - From: Alessandro DUARTE de Moraes To: delphi-br@yahoogrupos.com.br Sent: Tuesday, April 29, 2008 2:00 PM Subject: Re: [delphi-br] Gerador de Relatorios.. Sugiro o FastReport, que inclusive tem uma versão Free que é muito boa. www.fast-report.com Eu utilizo a versão Free já faz tempo e não tenho do que me queixar. Alessandro DUARTE de Moraes A.C. Santa Casa do Rio Grande. http://www.santacasarg.com.br - Original Message - From: Vinicius da Silva Pinto To: delphi-br@yahoogrupos.com.br Sent: Tuesday, April 29, 2008 1:12 PM Subject: [delphi-br] Gerador de Relatorios.. Salve a todos... Alguem poderia me indicar um gerador de relatorios que seja similar ao ReportBuilder, onde eu posso comprar, se é free ou não... pois estou tendo dificuldade de comprar o mesmo com o representante aqui no Brasil. É para ser utilizado com D7 e FB, não estou conseguindo tirar muito proveito do Rave. Agradeço qualquer dica e sugestão... Vinicius. Tel (21) 8816-2404 -- E-mail Seguro Vetorial.net Mensagem classificada como NÃO-SPAM. Para classificar como SPAM, encaminhe para [EMAIL PROTECTED] Chave de Identificação: 54568,4817513c952341644335774 [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]
Re: [delphi-br] 3 camadas - dephi
Kra, tem um livro da editora Erica, que aborta esse tema direitinho.. é um pouquinho antigo. acho que delphi 5 ainda Mais é muito bom... se não localizar, te passo o autor em pvt ágora não tenho em mãos... me reporte Ats, Alcione Guimarães - Original Message - From: Ricardo Cabral To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 24, 2008 11:53 AM Subject: [delphi-br] 3 camadas - dephi Alô amigos da lista ! Jà andei pela internet pesquisando sobre 3 camadas e encontrei bastante coisa. Só que cada um fala uma coisa e textos enrrrmmmeees sobre o assunto. Alguém sabe onde posso encontrar alguma coisa sobre o assunto e exemplo de programação 3 camadas em delphi ? Desde de já agradeço, Ricardo Cabral - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [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] 3 camadas - dephi
É esse mesmo! rss - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br Sent: Friday, April 25, 2008 5:08 PM Subject: RE: [delphi-br] 3 camadas - dephi O livro se chama 'Delphi 5 Bancos de Dados e MIDAS'. Comprei esse livro em 2000. Dou nota 7,0 pra ele, pois ele tem mais é receita de bolo do que explicação sobre técnicas de desenvolvimento em camadas. Ele usa COM+ e banco de dados InterBase como referência a um pequeno sistema de estoque e financeiro. Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Fri, 25 Apr 2008 16:41:44 -0300 Subject: Re: [delphi-br] 3 camadas - dephi Kra, tem um livro da editora Erica, que aborta esse tema direitinho.. é um pouquinho antigo. acho que delphi 5 ainda Mais é muito bom... se não localizar, te passo o autor em pvt ágora não tenho em mãos... me reporte Ats, Alcione Guimarães - Original Message - From: Ricardo Cabral To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 24, 2008 11:53 AM Subject: [delphi-br] 3 camadas - dephi Alô amigos da lista ! Jà andei pela internet pesquisando sobre 3 camadas e encontrei bastante coisa. Só que cada um fala uma coisa e textos enrrrmmmeees sobre o assunto. Alguém sabe onde posso encontrar alguma coisa sobre o assunto e exemplo de programação 3 camadas em delphi ? Desde de já agradeço, Ricardo Cabral - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger! http://www.amigosdomessenger.com.br/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] query
até pode,
porém a query não pode ter campos adicionados nela.
segundo antes de usar a query tem que limpa-la.
ex:
var
grupo_cli:integer;
begin
query1.close;
query1.sql.clear;
query1.sql.add('select * from clientes');
query1.open;
grupo_cli := query1.fieldbyname('GRUPO').value;
EditCodigo.text := query1.fieldbyname('codigo').text;
EditNome.text := query1.fieldbyname('Nome').text;
query1.close;
query1.sql.clear;
query1.sql.add('select descricao from grupos_de_clientes where codigo =:busca');
query1.parameters.parambyname('busca').value := grupo_cli;
query1.open;
EditGrupo.text := query1.fieldbyname('descricao').text;
se for algo parecido está aí..
- Original Message -
From: Eduardo Oliveira silva
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, April 22, 2008 10:11 AM
Subject: [delphi-br] query
Pessoa. Eu posso usar duas query em uma só função.
ex.
no meu formulário tem um botão que pesquisa um campo e joga o
resultado em algumas label.
uso uma adoquery para fazer isso. Posso usar mais uma para buscar
dados em uma outra tabela que não se relaciona, como ficaria o código.
Já tentei mais sempre dá erro.
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] converte em string
LbClassificacao.caption :=
floattostr(DMD.Qcoop.FieldByName('salario').AsValue); // dinheio
LbClassificacao.caption := inttostr(DMD.Qcoop.FieldByName('idade').Value);
// inteiro
LbClassificacao.caption :=
datetostr(DMD.Qcoop.FieldByName('Nascimento').AsValue; //Data
Ats,
Alcione Guimarães
- Original Message -
From: Eduardo Oliveira silva
To: delphi-br@yahoogrupos.com.br
Sent: Monday, April 21, 2008 10:27 AM
Subject: [delphi-br] converte em string
Pessoal,
como eu converto um valor que vem do banco de dados em string
as valores são inteiros,data e moeda do access.
to fazendo assim
LbClassificacao.caption :=
DMD.Qcoop.FieldByName('classificacaoCoop').AsString;
A mensagem é que os dados são incompatíveis.
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Criar forma de validar o sistema..
Amigo tem um componente que é vendido bem barato acho que uns 50,00 R$ coisa parecida, é muito bom, é do Elivaldo, segue o link. http://www.elivaldo.com.br/ - Original Message - From: Lindolfo Junior To: delphi-br@yahoogrupos.com.br Sent: Friday, April 04, 2008 4:19 PM Subject: [delphi-br] Criar forma de validar o sistema.. Boa tarde pessoal, fiz um sistema que quero comercializá-lo através de locação, porém, preciso criar um forma segura de que, se o cliente não pagar, o sistema para e ele não consegue voltar enquanto eu não liberar uma atualização pra ele na internet... alguém pode me dar uma força urgente... Lindolfo Junior [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Delphi 7 no Vista funciona ? (urgente)
Desculpe passar essa dúvida como urgente, tenho 1 oferta quase imperdível até amanhã de um notebook porém vem com o Vista Original (ou seja estou pagando por ele.. já está no custo) vou usaar Delphi 7 nele, vai funcionar perfeitamente ? Agradeço e novamente desculpas. Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Delphi 7 no Vista funciona ? (urgente)
ô Animal, tenho mais confiança neste grupo, por isso não fui no google, segundo, onde estou agora, não tenho liberação para uso de browser só outlook mesmo. Ats - Original Message - From: Gerhard Roger Nack To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 03, 2008 4:54 PM Subject: RES: [delphi-br] Delphi 7 no Vista funciona ? (urgente) Procure no histórico da lista, já foi discutido diversas vezes. O Google também tem a resposta pra isso. E se mesmo assim a preguiça não deixar a resposta é SIM, funciona perfeitamente. De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alcistemas Informática Enviada em: quinta-feira, 3 de abril de 2008 16:46 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Delphi 7 no Vista funciona ? (urgente) Desculpe passar essa dúvida como urgente, tenho 1 oferta quase imperdível até amanhã de um notebook porém vem com o Vista Original (ou seja estou pagando por ele.. já está no custo) vou usaar Delphi 7 nele, vai funcionar perfeitamente ? Agradeço e novamente desculpas. Alcione Guimarães e-mail: [EMAIL PROTECTED] mailto:alcistemas%40yahoo.com.br Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn: [EMAIL PROTECTED] mailto:alcistemas%40hotmail.com [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]
Re: [delphi-br] Delphi 7 no Vista funciona ? (urgente)
Obrigado amigo, - Original Message - From: Sergioinfo SP To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 03, 2008 5:03 PM Subject: Res: [delphi-br] Delphi 7 no Vista funciona ? (urgente) eu iinstalei em casa e funcionou corretamente... coloquei o delphi 7 e o delphi 2007 - Mensagem original De: Alcistemas Informática [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quinta-feira, 3 de Abril de 2008 16:46:11 Assunto: [delphi-br] Delphi 7 no Vista funciona ? (urgente) Desculpe passar essa dúvida como urgente, tenho 1 oferta quase imperdível até amanhã de um notebook porém vem com o Vista Original (ou seja estou pagando por ele.. já está no custo) vou usaar Delphi 7 nele, vai funcionar perfeitamente ? Agradeço e novamente desculpas. Alcione Guimarães e-mail: [EMAIL PROTECTED] com.br Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn: [EMAIL PROTECTED] com [As partes desta mensagem que não continham texto foram removidas] Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/ [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] Delphi 7 no Vista funciona ? (urgente)
Chamar de preguiçoso alguém que acorda as 04:30 am pega 3 onibus e chega em casa as 22:00 é o q ? - Original Message - From: Jackson Gomes - ToolsComps To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 03, 2008 5:45 PM Subject: Re: [delphi-br] Delphi 7 no Vista funciona ? (urgente) ô Animal, tenho mais confiança neste grupo, por isso não fui no google, Agressividade totalmente desnecessária para essa lista de discussão segundo, onde estou agora, não tenho liberação para uso de browser só outlook mesmo. Você deveria ter esclarecido isso na sua pergunta. Pessoal, estou impossibilitado de acessar o google ou mesmo o histórico de mensagens do yahoo e gostaria de perguntar se ... Seria muito melhor. Vamos tentar fazer com que essa lista seja mais produtiva? Jackson Gomes ToolsComps - Controle de Usuários para Desenvolvedores Borland/CodeGear Web Site: http://www.toolsandcomps.com Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps e-mail: [EMAIL PROTECTED] Fone: 27 3389 1138 - 8811 0324 -- Devhost - Webhost para desenvolvedores Borland http://www.devhost.com.br [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Adicionar evento a um componente
Como faço para adicionar via código, eventos a um componente.. ex: function imprime_grid(Grid :TDBGrid):String; var RV : TRvSystem; begin RV := TRvSystem.Create(Application); /// A QUI PRECISO ADICIONAR O EVENTO ONPRINT.. ALGUNS CÓDIGOS DO COMPONENTE RV (Tipo Rave Reports) /// pois é nele que se escreve o código a ser impresso no relatório RV.Execute; end; Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Validar Nota Fiscal Paulista
Tem algum lugar onde eu possa validar meu arquivo, antes da transmssao, o contador nao quiz me dar a senha do cliente na sefaz para isso. Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] + uma dúvida nota fiscal paulista
validei meu arquivo da nota fiscal paulista no site da sefaz, deu tudo certo exceto: Data Referência do arquivo e valor processado do lote fica em branco na tela de acompanhamento porque ? Grato, Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] + uma dúvida nota fiscal paulista
validei meu arquivo da nota fiscal paulista no site da sefaz, deu tudo certo exceto: Data Referência do arquivo e valor processado do lote fica em branco na tela de acompanhamento porque ? Grato, Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Simular clique no formulário
depois do form1.show; faça: form1.activate; - Original Message - From: Fabio Gomes To: delphi-br@yahoogrupos.com.br Sent: Wednesday, February 13, 2008 7:55 PM Subject: Re: [delphi-br] Simular clique no formulário Não deu, cara. Tentei o form1.click no oncreate, no onshow do formulário e não simula o clique. Acontece que estou com problemas de dar o foco no form de login.. No oncreate do form principal eu estou criando o form de login, e ele não fica com o foco no login, ficando com o foco no form principal. Tem alguma outra alternativa? Alcistemas Informática [EMAIL PROTECTED] escreveu: Kra, no delphi 7 pelo menos é assim: form1.Click; - Original Message - From: Fabio Gomes To: [EMAIL PROTECTED] ; delphi-br@yahoogrupos.com.br Sent: Wednesday, February 13, 2008 3:45 PM Subject: [delphi-br] Simular clique no formulário Caros amigos, Preciso simular um clique do mouse no formulário de login. Como faço isso no Delphi 2007? Alguém tem algo para me passar de exemplo? Preciso muito. Aguardo uma ajuda Fábio Gomes. - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [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] Simular clique no formulário
Kra, no delphi 7 pelo menos é assim: form1.Click; - Original Message - From: Fabio Gomes To: [EMAIL PROTECTED] ; delphi-br@yahoogrupos.com.br Sent: Wednesday, February 13, 2008 3:45 PM Subject: [delphi-br] Simular clique no formulário Caros amigos, Preciso simular um clique do mouse no formulário de login. Como faço isso no Delphi 2007? Alguém tem algo para me passar de exemplo? Preciso muito. Aguardo uma ajuda Fábio Gomes. - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [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] Máscara de campo hora no dbgrid
vá na query ou table a que se refere esse campo. dois clicks sobre a query.. selecione o campo que precisa F11 Vá na opção Vá na opção Display Format e deixe assim: HH:MM - Original Message - From: Ricardo César Cardoso To: delphi-br@yahoogrupos.com.br Sent: Wednesday, February 13, 2008 3:44 PM Subject: Re: [delphi-br] Máscara de campo hora no dbgrid Vc pode formatar o campo usando a propriedade DisplayFormat na coluna que possui a hora ou então usar o evento GetText para o campo que possui estes dados. Dá uma olhada que já me lembro de ter visto exemplos disso na internet. Atte, Ricardo. ca_programador007 [EMAIL PROTECTED] escreveu: Olá amigos, Tenho uma consulta que trago o valor do campo hora (time no banco), e carrego as informações em um dbgrid. No banco o campo hora está gravado assim: 16:30:00 Preciso que no dbgrid mostre apenas o 16:30, sem os segundos. Como faço para colocar a máscara dentro do dbgrid? No aguardo. Valeu pela ajuda. - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Mecaf e Nota fiscal Paulista ?
A Mecaf já disponibilizou a Dll para Nota fiscal Paulista ? Como fazer com essa impressora ? Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Homologação de Sistema para Emissão de Notas fiscais.
que eu saiba homoloar software é só para Cupom Fiscal... - Original Message - From: Jorge Ericsson Sent: Tuesday, January 29, 2008 11:41 PM Subject: [delphi-br] Homologação de Sistema para Emissão de Notas fiscais. Olá pessoal, Pesquisei no fórum e encontrei algumas discussões a respeiro de homologação de sistema mas não encontrei algo que se enquadre no meu problema. Bom eu estou ainda finalizando o desenvolvimento de um software ERP para uma empresa que me contratou para isso e um dos donos resolveu confeccionar as suas notas fiscais - que antes estava sendo preenchida com uma máquina elétrica - para que o software imprimisse na mesma apenas preenchendo os campos. Até ai tudo bem, mas o vendedor perguntou se o software era homologado e o cliente me ligou perguntando o mesmo, bem como o sistema ainda não esta pronto eu não poderia homologa-lo, mas o vendedor colocou vários impecilhos para confeccionar a nota. Então eu pergunto aos meus caros amigos que já devem ter passado por isso: 1º - Se procede o que o vendedor informou ao meu cliente; 2º - Como poderia homologar o software sendo que o mesmo ainda não esta finalizado; 3º - Em caso afirmativo a primeira pergunta, como eu posso homologa-lo e quais órgão procurar; 4º - O meu cliente poderia confecionar as notas sem a homologação do sistema e depois de concluído, eu possa homologa-lo; 5º - Qual o custo para homologação de um sistema que vai imprimir notas fiscais. Essas são minhas dúvidas, alguém poderia me ajudar ? Grato, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Registro EAD
então, quanto ao MD5 ok, realmente obtenho ele apartir dos registros E00..E21 só nao sei criar a criptografia RSA 1024... do meu MD5 ' se alguém puder me ajudar ficarei muito grato... - Original Message - From: Ricardo LG To: delphi-br@yahoogrupos.com.br Sent: Monday, January 28, 2008 5:45 PM Subject: Re: [delphi-br] Registro EAD Boa tarde, Para você gerar o registro EAD você deve passar o MD5 em todo o arquivo E00, E01, E02, E12, E13, E14, E15, E16, E21 sem o EAD( porque você está gerando agora ) apos gerar o MD5 você deve utilizar a criptografia RSA 1024 bytes no resultado do MD5 E pelo que entendi do manual não é necessario você ter uma chave privada para cada cliente seu, no meu sistema estou gerando ela aleatoriamente. Cordialmente, Ricardo Lino Gonzalez Em 28/01/08, Alcistemas Informática [EMAIL PROTECTED] escreveu: nao consigo gerar o registro EAD da nota fiscal paulista, é a única coisa que falta... poderia me ajudar ? os componentes que vc citou ja consegui instalar no meu delphi 7 porém nao tenho idéia como usar, poderia me ajudar? var ChavePrivada:String; MD5:String; begin ChavePrivada:='FD77CA3D135392E19277410F76861948F18193EECB5C44F91E0C02A278B5F6DC484FAC181'; ChavePrivada:=ChavePrivada+'D614BF7D6FA53B96138901394182D63863B6B554342113DDFD8BC6A60E1CB38BD5E242E745659015754F7430254458C154038D98CF01882EF0730E3DDEA64207C68DCFE5F7756BE79DC3A91A50B6573C04298FA685ED6077DEDE962'; lbRSA1.PrivateKey.Passphrase := ChavePrivada; MD5:='6DF2496749AEA030CE995DEA17BF34ED'; EAD := lbRSA1.EncryptString(MD5); estou fazendo assim porém demora muito e não me cripografa. cada cliente terá que ter uma chave privada fixa, ou seja, sempre vou utilizar essa chave para meu cliente Y Alcione Guimarães e-mail: [EMAIL PROTECTED] alcistemas%40yahoo.com.br Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn: [EMAIL PROTECTED] alcistemas%40hotmail.com [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]
Re: [delphi-br] Registro EAD
então, quanto ao MD5 ok, realmente obtenho ele apartir dos registros E00..E21 só nao sei criar a criptografia RSA 1024... do meu MD5 ' se puder me ajudar ficarei muito grato... - Original Message - From: Ricardo LG To: delphi-br@yahoogrupos.com.br Sent: Monday, January 28, 2008 5:45 PM Subject: Re: [delphi-br] Registro EAD Boa tarde, Para você gerar o registro EAD você deve passar o MD5 em todo o arquivo E00, E01, E02, E12, E13, E14, E15, E16, E21 sem o EAD( porque você está gerando agora ) apos gerar o MD5 você deve utilizar a criptografia RSA 1024 bytes no resultado do MD5 E pelo que entendi do manual não é necessario você ter uma chave privada para cada cliente seu, no meu sistema estou gerando ela aleatoriamente. Cordialmente, Ricardo Lino Gonzalez Em 28/01/08, Alcistemas Informática [EMAIL PROTECTED] escreveu: nao consigo gerar o registro EAD da nota fiscal paulista, é a única coisa que falta... poderia me ajudar ? os componentes que vc citou ja consegui instalar no meu delphi 7 porém nao tenho idéia como usar, poderia me ajudar? var ChavePrivada:String; MD5:String; begin ChavePrivada:='FD77CA3D135392E19277410F76861948F18193EECB5C44F91E0C02A278B5F6DC484FAC181'; ChavePrivada:=ChavePrivada+'D614BF7D6FA53B96138901394182D63863B6B554342113DDFD8BC6A60E1CB38BD5E242E745659015754F7430254458C154038D98CF01882EF0730E3DDEA64207C68DCFE5F7756BE79DC3A91A50B6573C04298FA685ED6077DEDE962'; lbRSA1.PrivateKey.Passphrase := ChavePrivada; MD5:='6DF2496749AEA030CE995DEA17BF34ED'; EAD := lbRSA1.EncryptString(MD5); estou fazendo assim porém demora muito e não me cripografa. cada cliente terá que ter uma chave privada fixa, ou seja, sempre vou utilizar essa chave para meu cliente Y Alcione Guimarães e-mail: [EMAIL PROTECTED] alcistemas%40yahoo.com.br Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn: [EMAIL PROTECTED] alcistemas%40hotmail.com [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]
[delphi-br] Registro EAD
nao consigo gerar o registro EAD da nota fiscal paulista, é a única coisa que falta... poderia me ajudar ? os componentes que vc citou ja consegui instalar no meu delphi 7 porém nao tenho idéia como usar, poderia me ajudar? var ChavePrivada:String; MD5:String; begin ChavePrivada:='FD77CA3D135392E19277410F76861948F18193EECB5C44F91E0C02A278B5F6DC484FAC181'; ChavePrivada:=ChavePrivada+'D614BF7D6FA53B96138901394182D63863B6B554342113DDFD8BC6A60E1CB38BD5E242E745659015754F7430254458C154038D98CF01882EF0730E3DDEA64207C68DCFE5F7756BE79DC3A91A50B6573C04298FA685ED6077DEDE962'; lbRSA1.PrivateKey.Passphrase := ChavePrivada; MD5:='6DF2496749AEA030CE995DEA17BF34ED'; EAD := lbRSA1.EncryptString(MD5); estou fazendo assim porém demora muito e não me cripografa. cada cliente terá que ter uma chave privada fixa, ou seja, sempre vou utilizar essa chave para meu cliente Y Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como gerar Assinatura do Hash
kra, pode mandar pra mim também ? obrigado, - Original Message - From: Jumper To: delphi-br@yahoogrupos.com.br Sent: Tuesday, January 22, 2008 1:41 PM Subject: Re: [delphi-br] Como gerar Assinatura do Hash Cara estou te enviando a biblioteca que uso para gerar MD5 dá uma ohada. Em 22/01/08, DIMAS BOLOGNANI [EMAIL PROTECTED] escreveu: Ola pessoal, bom dia pra todos Tenho um programa comercial de automação com ECF - emissor de cupom fiscal, agora em SP tem a necessidade de gerar alguns arquivos p/ receita, em relação ao arquivo das vendas efetuadas no cupom fiscal há a necessidade de gerar um codigo MD-5 e assinatura do Hash... Alguem sabe como fazer usando o Delphi? Atenciosamente, DBSOFT INFORMÁTICA LDTDA OURO FINO - MG Dimas Bolognani Tel:35-3441-5254 [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]
Re: [delphi-br] Como gerar Assinatura do Hash
Instalei, mais não tenho nem ideia como eu uso isso dentro do meu aplicativo.. ex: Até aqui tudo bem, usei uma unit para gerar o MD5 6.10.1.1.1 - Aplicar a função unidirecional MD5 uma única vez em todo o arquivo, com exceção do registro EAD. O resultado será um código de 128 bits, ou 16 caracteres ASCII, correspondendo a um número hexadecimal de 32 dígitos. Deverá ser utilizado nos cálculos o número hexadecimal, considerando-o como um único bloco. daqui pra baixo, como implementar dentro do meu aplicativo ?? 6.10.1.1.2 - Criar uma chave privada de 1024 bits, equivalente a um número hexadecimal de 256 dígitos. 6.10.1.1.3 - Criptografar o código hexadecimal gerado no item 6.10.1.1.1, utilizando a chave do item 6.10.1.1.2, pelo algoritmo RSA de chave pública. O resultado dessa critptografia, um número hexadecimal com até 256 dígitos, deverá ser informado no campo Assinatura digital. 6.10.1.1.1 - Aplicar a função unidirecional MD5 uma única vez em todo o arquivo, com exceção do registro EAD. O resultado será um código de 128 bits, ou 16 caracteres ASCII, correspondendo a um número hexadecimal de 32 dígitos. Deverá ser utilizado nos cálculos o número hexadecimal, considerando-o como um único bloco. 6.10.1.1.2 - Criar uma chave privada de 1024 bits, equivalente a um número hexadecimal de 256 dígitos. 6.10.1.1.3 - Criptografar o código hexadecimal gerado no item 6.10.1.1.1, utilizando a chave do item 6.10.1.1.2, pelo algoritmo RSA de chave pública. O resultado dessa critptografia, um número hexadecimal com até 256 dígitos, deverá ser informado no campo Assinatura digital. - Original Message - From: Consultores Software To: delphi-br@yahoogrupos.com.br Sent: Tuesday, January 22, 2008 9:57 AM Subject: Re: [delphi-br] Como gerar Assinatura do Hash Colega, você pode usar os componentes da suite Lockbox http://sourceforge.net/projects/tplockbox/ Em 22/01/08, DIMAS BOLOGNANI [EMAIL PROTECTED] escreveu: Ola pessoal, bom dia pra todos Tenho um programa comercial de automação com ECF - emissor de cupom fiscal, agora em SP tem a necessidade de gerar alguns arquivos p/ receita, em relação ao arquivo das vendas efetuadas no cupom fiscal há a necessidade de gerar um codigo MD-5 e assinatura do Hash... Alguem sabe como fazer usando o Delphi? Atenciosamente, DBSOFT INFORMÁTICA LDTDA OURO FINO - MG Dimas Bolognani Tel:35-3441-5254 [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]
Re: [delphi-br] Como gerar Assinatura do Hash
É UMA impressora digiarte... - Original Message - From: Paulo Casagrande To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 23, 2008 5:08 PM Subject: Re: [delphi-br] Como gerar Assinatura do Hash Boa tarde Para qual ECF você esta desenvolvendo!? Para a maioria dos casos o próprio software básico da ECF gera o arquivo automaticamente após a redução Z, e permite que o arquivo seja gerado novamente mesmo depois disso! Instalei, mais não tenho nem ideia como eu uso isso dentro do meu aplicativo.. Se você já instalou é só ver os exemplos de utilização na pasta ...\TurboPower\examples\Delphi é fácil de utilizar :) ex: Até aqui tudo bem, usei uma unit para gerar o MD5 6.10.1.1.1 - Aplicar a função unidirecional MD5 uma única vez em todo o arquivo, com exceção do registro EAD. O resultado será um código de 128 bits, ou 16 caracteres ASCII, correspondendo a um número hexadecimal de 32 dígitos. Deverá ser utilizado nos cálculos o número hexadecimal, considerando-o como um único bloco. daqui pra baixo, como implementar dentro do meu aplicativo ?? 6.10.1.1.2 - Criar uma chave privada de 1024 bits, equivalente a um número hexadecimal de 256 dígitos. 6.10.1.1.3 - Criptografar o código hexadecimal gerado no item 6.10.1.1.1, utilizando a chave do item 6.10.1.1.2, pelo algoritmo RSA de chave pública. O resultado dessa critptografia, um número hexadecimal com até 256 dígitos, deverá ser informado no campo Assinatura digital. 6.10.1.1.1 - Aplicar a função unidirecional MD5 uma única vez em todo o arquivo, com exceção do registro EAD. O resultado será um código de 128 bits, ou 16 caracteres ASCII, correspondendo a um número hexadecimal de 32 dígitos. Deverá ser utilizado nos cálculos o número hexadecimal, considerando-o como um único bloco. 6.10.1.1.2 - Criar uma chave privada de 1024 bits, equivalente a um número hexadecimal de 256 dígitos. 6.10.1.1.3 - Criptografar o código hexadecimal gerado no item 6.10.1.1.1, utilizando a chave do item 6.10.1.1.2, pelo algoritmo RSA de chave pública. O resultado dessa critptografia, um número hexadecimal com até 256 dígitos, deverá ser informado no campo Assinatura digital. Até que está bem explicado... se você tem a função MD5 e uma para criptografar é só seguir as instruções acima. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Erro ao validar arquivo CAT102 conve rsão para UTF8
nao daria problema no registro EAD ? - Original Message - From: Paulo Casagrande To: delphi-br@yahoogrupos.com.br Sent: Monday, January 21, 2008 8:57 AM Subject: [delphi-br] Erro ao validar arquivo CAT102 conversão para UTF8 Bom dia a todos... Se você esta com dificuldades para validar o arquivo gerado conforme o layout do CAT-102, com relação ao formato do arquivo UTF-8 o link abaixo aponta para duas soluções. http://cincobytes.net/erro-ao-validar-arquivo-cat-102-converter-para-utf8-ansitoutf8/ Um abraço! [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Versão Indy ?
Como saber a versào do indy que estou utilizando no meu Delphi 7 e como atualizar ? - Original Message - From: Ricardo Ravelli To: delphi-br@yahoogrupos.com.br Sent: Sunday, January 20, 2008 3:08 PM Subject: [delphi-br] Problemas com Indy Boa tarde a todos, Tenho um sistema que faz envios de emails. Estou usando um email do gmail, só que eu queria que para o destinatário mostrasse outro email. Já tentei usar os passar as seguintes informações no idMessage mas não obtive exito. Estou utilizando Delphi 7 e o componente Indy versão 9.0.18. Se alguém puder me ajudar, agradeço desde já. Exemplo: with IdSMTP1 do begin AuthenticationType := atLogin; Host := 'smtp.gmail.com'; IOHandler := IdSSLIOHandlerSocket1; Password := 'teste'; Port := 465;1 Username := '[EMAIL PROTECTED]'; end; idMessage1.Clear; idMessage1.From.Address := '[EMAIL PROTECTED]'; idMessage1.From.Name := 'Apenas exemplo'; Obrigado. Ricardo Ravelli. [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] chave privada 1024
CAT 52 - Original Message - From: Paulo Casagrande To: delphi-br@yahoogrupos.com.br Sent: Thursday, January 17, 2008 3:06 PM Subject: Re: [delphi-br] chave privada 1024 Qual Portaria? CAT-52, CAT-85 ou CAT-102 ? Alguém já criou uma rotina em delphi para gerar uma chave privada de 1024 bits ? Preciso disso para Nota Fiscal Paulista.. Grato, Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn: [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.5.516 / Virus Database: 269.19.2/1224 - Release Date: 14/01/2008 17:39 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Contabilidade + ERP
a lista de língua portuguesa e gramática é outra... - Original Message - From: Davi Eduardo Borges Wall To: delphi-br@yahoogrupos.com.br Sent: Tuesday, January 15, 2008 11:14 AM Subject: RES: [delphi-br] Contabilidade + ERP Podes começar utilizando acentuação no seu texto. De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Samuel M. Basso Enviada em: terça-feira, 15 de janeiro de 2008 10:39 Para: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED] Assunto: [delphi-br] Contabilidade + ERP Bom dia a todos!! Tenho um sistema erp e estou com interesse de acrescentar contabilidade nele, entao gostaria de pedir algumas dicas, ideias ou alguns exemplos e softwares demonstrativos para eu analisar e bolar esta ideia, a principio minha ideia é colocar plano de contas no sistema e a cada compra, venda, contas receber e pagar adicionar uma conta credito e a conta debito para no final do mes simplismente gerar relatorios pronto de balancete, dre etc. Nao tenho muito conhecimento em contabilidade mas pelo pouco que andei pesquisando essa foi minha primeira ideia, entao querendo trocar ideias com alguem que conheça. Grato. -- Atenciosamente, Samuel M. Basso Tel: (54) 3452-9126 Cel: (54) 8135-3723 E-mail: [EMAIL PROTECTED] mailto:samuelbasso%40gmail.com MSN: [EMAIL PROTECTED] mailto:samuelbasso%40gmail.com [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]
Re: [delphi-br] Contabilidade + ERP
rsss - Original Message - From: Davi Eduardo Borges Wall To: delphi-br@yahoogrupos.com.br Sent: Tuesday, January 15, 2008 1:38 PM Subject: RES: [delphi-br] Contabilidade + ERP Concordu com vc AlciCistemas!!! Por ser uma lista de Delfi issu me dah o diretu de açacinar a língua portugueza! De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alcistemas Informática Enviada em: terça-feira, 15 de janeiro de 2008 12:09 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Contabilidade + ERP a lista de língua portuguesa e gramática é outra... - Original Message - From: Davi Eduardo Borges Wall To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Sent: Tuesday, January 15, 2008 11:14 AM Subject: RES: [delphi-br] Contabilidade + ERP Podes começar utilizando acentuação no seu texto. De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br [mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br ] Em nome de Samuel M. Basso Enviada em: terça-feira, 15 de janeiro de 2008 10:39 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br ; [EMAIL PROTECTED] mailto:lista-delphi%40yahoogrupos.com.br Assunto: [delphi-br] Contabilidade + ERP Bom dia a todos!! Tenho um sistema erp e estou com interesse de acrescentar contabilidade nele, entao gostaria de pedir algumas dicas, ideias ou alguns exemplos e softwares demonstrativos para eu analisar e bolar esta ideia, a principio minha ideia é colocar plano de contas no sistema e a cada compra, venda, contas receber e pagar adicionar uma conta credito e a conta debito para no final do mes simplismente gerar relatorios pronto de balancete, dre etc. Nao tenho muito conhecimento em contabilidade mas pelo pouco que andei pesquisando essa foi minha primeira ideia, entao querendo trocar ideias com alguem que conheça. Grato. -- Atenciosamente, Samuel M. Basso Tel: (54) 3452-9126 Cel: (54) 8135-3723 E-mail: [EMAIL PROTECTED] mailto:samuelbasso%40gmail.com mailto:samuelbasso%40gmail.com MSN: [EMAIL PROTECTED] mailto:samuelbasso%40gmail.com mailto:samuelbasso%40gmail.com [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] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] chave privada 1024
Alguém já criou uma rotina em delphi para gerar uma chave privada de 1024 bits ? Preciso disso para Nota Fiscal Paulista.. Grato, Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [OFF-TOPIC] Nf-paulista - Apelando
esses arquivos geram os registros da nota fiscal paulista ? é só isso ? - Original Message - From: Vinicius Barreira [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 02, 2008 7:04 PM Subject: Re: [delphi-br] [OFF-TOPIC] Nf-paulista - Apelando É brother, essa parada é sinistra mesmo. Vc precisa do seguinte: 1) instale a dll referente ao RFD, tem uma propria pra isso no site da bematech. 2) eu só faço a redução Z, não preciso fazer mais nada. veja exemplos de arquivos gerados, no disco local da estação: 19/12/2007 16:01 3.558 BED51021.IC7 19/12/2007 16:01 529.664 BED51021.IC7.mfd 18/12/2007 14:10 7.365 BED51021.QB7 18/12/2007 14:10 532.992 BED51021.QB7.mfd Os menores são TXT e os maiores, binários. Vinicius Barreira Check-In Informática Software Para Hotéis / Pousadas / Moteis São Bernardo do Campo - SP http://www.check-in.com.br Fone (11) 4330-3148 msn / e-mail: [EMAIL PROTECTED] skype: vinibarr Junior escreveu: Desculpem pelo “off” e ter que vir apelar aqui sobre a ref. a NF-Paulista, sendo que há um bom grupo no yahoo (automacaototal) em que faço parte, Porém estou apanhando feio e não estou conseguindo ajuda necessária, ou não estou sabendo perguntar. Se alguém já adequou o software para nf-paulista ficarei eternamente grato com a ajuda. Seguinte: (utilizando Bematech MP2O-FI-II) Como a MP20-FI-II é matricial, tenho que executar primeiro a função bematech_fi_reducaoZ, para esta gerar o arquivo .rfd, para em seguida executar a função bematech_fi_geraregistroscat52mfd, passando como parâmetro o arquivo .rfd que foi gerado na redução Z ? é isso ? E se for isso mesmo: -o arquivo será gerado com qual nome ? -será gerado no servidor ou no terminal onde está conectada o ECF ? -em qual pasta ? Desculpem novamente pelo “off” Atenciosamente, Junior [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 * 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] Nf-paulista - Apelando
estou desenvovendo exatamente isso para essa impressora, me adicione no msn, acredito poder te ajudar um pouquinho e quem save vc me ajudar também... uma mão lava a outra heheh como o assunto é longo melhor ir via pvt... [EMAIL PROTECTED] abraço... - Original Message - From: Junior To: [EMAIL PROTECTED] ; delphi-br@yahoogrupos.com.br Sent: Wednesday, January 02, 2008 11:53 AM Subject: [delphi-br] [OFF-TOPIC] Nf-paulista - Apelando Desculpem pelo off e ter que vir apelar aqui sobre a ref. a NF-Paulista, sendo que há um bom grupo no yahoo (automacaototal) em que faço parte, Porém estou apanhando feio e não estou conseguindo ajuda necessária, ou não estou sabendo perguntar. Se alguém já adequou o software para nf-paulista ficarei eternamente grato com a ajuda. Seguinte: (utilizando Bematech MP2O-FI-II) Como a MP20-FI-II é matricial, tenho que executar primeiro a função bematech_fi_reducaoZ, para esta gerar o arquivo .rfd, para em seguida executar a função bematech_fi_geraregistroscat52mfd, passando como parâmetro o arquivo .rfd que foi gerado na redução Z ? é isso ? E se for isso mesmo: -o arquivo será gerado com qual nome ? -será gerado no servidor ou no terminal onde está conectada o ECF ? -em qual pasta ? Desculpem novamente pelo off Atenciosamente, Junior [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] Pegar caracteres dentro de string va riável
- Original Message - From: Junior To: [EMAIL PROTECTED] ; delphi-br@yahoogrupos.com.br Sent: Thursday, January 03, 2008 2:04 PM Subject: [delphi-br] Pegar caracteres dentro de string variável Preciso pegar x caracteres dentro de uma string, porém nem sempre na mesma posição. O traço - e o que está a direita dele não me interessa, porém nem sempre a string vem com o - ou -A. A string tem sempre 10 posições e está sempre alinhada a direita. Exemplo: As vezes a string é 123456 As vezes a string é 123456-A As vezes a string é 1234- Alguém tem uma sugestão de como eu posso fazer para pegar sempre os NÚMEROS, e desprezar o traço - o que está a direita dele ? Atenciosamente, Junior [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] Pegar caracteres dentro de string va riável
copy(Variavel,1,pos('-') -1);
- Original Message -
From: Junior
To: [EMAIL PROTECTED] ; delphi-br@yahoogrupos.com.br
Sent: Thursday, January 03, 2008 2:04 PM
Subject: [delphi-br] Pegar caracteres dentro de string variável
Preciso pegar x caracteres dentro de uma string, porém nem sempre na mesma
posição.
O traço - e o que está a direita dele não me interessa, porém nem sempre a
string vem com o - ou -A.
A string tem sempre 10 posições e está sempre alinhada a direita.
Exemplo:
As vezes a string é 123456
As vezes a string é 123456-A
As vezes a string é 1234-
Alguém tem uma sugestão de como eu posso fazer para pegar sempre os NÚMEROS,
e desprezar o traço - o que está a direita dele ?
Atenciosamente,
Junior
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Turbo Delphi Explorer...
Ele é gratuíto? É de uso comercial ? (vender sistemas desenvolvidos com ele) Só para pessoas físicas ou jurídicas tambem ? Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Indy - Smtp
Este Indy funciona com o pop da uol, nao consigo fazer funcionar o do Delphi 7 - Original Message - From: Valdir Sola To: delphi-br@yahoogrupos.com.br Sent: Wednesday, December 26, 2007 4:31 PM Subject: Re: [delphi-br] Indy - Smtp Usa o SMTPServer da Indy. From: Alexandre Sent: Wednesday, December 26, 2007 12:47 PM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Indy - Smtp Pessoal, boa tarde, será que existe a possibilidade de eu me conectar a um determinado e-mail pelo TIdSMTP e quando a pessoa receber o e-mail e clicar em RESPONDER, aparecer outro e-mail no campo de e-mail?O meu problema é o seguinte pessoal, no meu programa, tem um recurso que o usuário envia Ordens de Serviço, orçamento, para o cliente dele, o problema é, tem certos e-mails que não funciona, como o HOTMAIL por exemplo, entre outros, a minha idéia é, usar um e-mail meu, interno para conectar no smtp e enviar o orçamento do cliente para o cliente dele, o problema ai é, quando o cliente do meu cliente vai RESPONDER ao e-mail, lá aparece o meu e-mail interno, entenderam?? Alex [As partes desta mensagem que não continham texto foram removidas] -- E-mail classificado pelo Identificador de Spam Inteligente. Para alterar a categoria classificada, visite o Terra Mail -- Esta mensagem foi verificada pelo E-mail Protegido Terra. Scan engine: McAfee VirusScan / Atualizado em 24/12/2007 / Versão: 5.1.00/5192 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [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] Incompatibilidade
apenas te corrigindo seu seu sobrenome henriquer se escreve com a inicial
maíuscula Henriquer
rsss
- Original Message -
From: Alexandre Rodrigues
To: delphi-br@yahoogrupos.com.br
Sent: Monday, December 17, 2007 12:49 PM
Subject: Re: [delphi-br] Incompatibilidade
Primeiro não assassina a língua portuguesa ao enviar tuas mensagens, foi
um horror entender o que tu quis dizer.
Segundo o problema é simples, a variável E está declarada como inteira
e você está fazendo uma divisão que retorna decimais ou seja um tipo
ponto flutuante.
Existe duas possibilidades para teu caso. Declarar E como Double ou
substituir / por div, assim tu terás somente a parte inteira da
divisão. Digamos se tu dividir fizer 3 div 2 teu resultado será 1 e não
1,5 como esperado.
Espero ter ajudado.
Renan Fernando Christino henriquer escreveu:
Tava tudo compilando até que botei a divisao no E: /4
e ta dando erro.. diz que é
incompatible types integer and real
Por que ta dando isso??
Sendo que divisao usa integer...
TO iniciando em delphi aqui no trabalho..valew
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,
Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Label1: TLabel;
Label2: TLabel;
Edit1: TEdit;
Edit2: TEdit;
Button1: TButton;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Edit3: TEdit;
Label6: TLabel;
Edit4: TEdit;
procedure Edit1KeyPress(Sender: TObject; var Key: Char);
procedure Edit2KeyPress(Sender: TObject; var Key: Char);
procedure Button1Click(Sender: TObject);
procedure Edit3KeyPress(Sender: TObject; var Key: Char);
procedure Edit4KeyPress(Sender: TObject; var Key: Char);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (key in ['0'..'9']) then key:=#0;
end;
procedure TForm1.Edit2KeyPress(Sender: TObject; var Key: Char);
begin
if not (key in ['0'..'9']) then key:=#0;
end;
procedure TForm1.Button1Click(Sender: TObject);
var A,B,C,D,E:integer;
begin
A:=strtoint(edit1.Text);
B:=strtoint(edit2.Text);
C:=strtoint(edit3.Text);
D:=strtoint(edit4.Text);
E:=A+B+C+D/2;
Label3.Caption:='Resultado:'+inttostr(E);
end;
procedure TForm1.Edit3KeyPress(Sender: TObject; var Key: Char);
begin
if not (key in ['0'..'9']) then key:=#0;
end;
procedure TForm1.Edit4KeyPress(Sender: TObject; var Key: Char);
begin
if not (key in ['0'..'9']) then key:=#0;
end;
end.
___
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]
[delphi-br] LX 300
Como faço para quando mandar imprimir em uma lx 300, um arquivo de texto, as luzes das fonte fique a Draft, pois toda vez que imprimo no windows ela volta para Romam Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Rodar programa em clipper no form do delphi
utilize o winzip ou winrar e ZIP o aplicativo com senha e jogue fora o executável... ou seja, só com senha vai abrir rss - Original Message - From: Jorge Ericsson Sent: Thursday, December 20, 2007 8:53 PM Subject: [delphi-br] Rodar programa em clipper no form do delphi Olá amigos, Eu tenho um cliente que possui um programinha bem antigo em DOS (Clipper) que não possui nenhuma senha de acesso. Eu estou fazendo a migração de algumas funcionalidades deste programinha para o meu sistema, mas o cliente (muito bom por sinal) quer que eu coloque uma senha nesse programinha que nem código fontes tem mais. Bom eu pensei em criar um programinha no delphi que executasse esse programinha dentro de um formulário. Alguém já passou por isso ? Alguém tem um idéia de como fazer ? Sei que tem como pq eu já vi algo semelhante em algum componente, mas não me lembro aonde. Valew, -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Rodar programa em clipper no form do delphi
me merdoe nobre colega, achei que você queria por uma simples senha de acesso ao aplicativo, e que a única forma que vc havia pensado seria coloca-lo dentro de um form no delphi. por isso dei a idéia de por senha no zip e não no aplicativo. Me perdoe. - Original Message - From: Jorge Ericsson To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 20, 2007 10:33 PM Subject: Re: [delphi-br] Rodar programa em clipper no form do delphi Eu acho que vc não entendeu a minha pergunta. Eu quero usar um programa delphi para rodar dentro de um form um programa clipper. Leia novamente e perceberá que o que escreveu é bobagem... Em 20/12/07, Alcistemas Informática [EMAIL PROTECTED] escreveu: utilize o winzip ou winrar e ZIP o aplicativo com senha e jogue fora o executável... ou seja, só com senha vai abrir rss - Original Message - From: Jorge Ericsson Sent: Thursday, December 20, 2007 8:53 PM Subject: [delphi-br] Rodar programa em clipper no form do delphi Olá amigos, Eu tenho um cliente que possui um programinha bem antigo em DOS (Clipper) que não possui nenhuma senha de acesso. Eu estou fazendo a migração de algumas funcionalidades deste programinha para o meu sistema, mas o cliente (muito bom por sinal) quer que eu coloque uma senha nesse programinha que nem código fontes tem mais. Bom eu pensei em criar um programinha no delphi que executasse esse programinha dentro de um formulário. Alguém já passou por isso ? Alguém tem um idéia de como fazer ? Sei que tem como pq eu já vi algo semelhante em algum componente, mas não me lembro aonde. Valew, -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] LX - 300 (RESOLVIDO)
Me desculpem, assim que enviei a dúvida já encontrei a resposta, porém estava atrás disso desde cedo... vou compartilhar com a Lista. Writeln(Arquivo,CHR(27)+'x0', 'TESTE DE IMPRESSAO'); mesmo estando em Draft Condensed a fonte da impressora volta para Draft. - Como faço para quando mandar imprimir em uma lx 300, um arquivo de texto, as luzes das fonte fique a Draft, pois toda vez que imprimo no windows ela volta para Romam Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Impressora Fiscal Bematech
Estou acrescentando no espaço reservado para observação. Foi de grande valia a sua ajuda. - Original Message - From: Wandarlei Michelon To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 13, 2007 9:45 AM Subject: RES: [delphi-br] Impressora Fiscal Bematech Oi Alcione, As impressoras MP-20 FI II e MP-40 FI II da Bematech não possui recurso para inserir o nome do favorecido, este recurso só existe nas impressoras com recurso mfd, para driblar este problema, (e aí tem que ver se a legislação do seu estado permite) eu verifico se a impressora suporta as funções mfd e insiro o nome do favorecido no rodapé do cupom fiscal. Wandarlei Michelon Programador Delphi Fone: 55 041 3279-2323 Tree Tools Informática Ltda. - Qualidade e Competência a Seu Alcance http://www.treetools.com.br/ http://www.treetools.com.br [EMAIL PROTECTED] De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alcistemas Informática Enviada em: quarta-feira, 12 de dezembro de 2007 23:26 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Impressora Fiscal Bematech Sei que nao é pertinente ao tópico deste grupo, porém preciso muito, se alguém puder me ajudar,pode até responder em PVT, para nao prejudicar o grupo. Qual função da Dll eu uso para incluir o Nome do Favorecido no Cupom Fiscal, da impressora Bematech MP-20 FI II ? (cpf eu já consegui) Qual biblioteca eu devo utilizar para gerar os registros da nota fiscal paulista para essa mesma impressora ? Obrigado, e me desculpem pelo off-topic Alcione Guimarães e-mail: [EMAIL PROTECTED] mailto:alcistemas%40yahoo.com.br Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn: [EMAIL PROTECTED] mailto:alcistemas%40hotmail.com [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]
Re: [delphi-br] Impressora Fiscal Bematech
Obrigado, achei que o recurso existia e eu é quem estava perdido.. Estou no caminho correto, valeu! - Original Message - From: Wainer To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 13, 2007 10:44 AM Subject: Re: [delphi-br] Impressora Fiscal Bematech Colega sao duas coisas, para a legislacao que entrou em vigor em outubro (sao paulo) ao abrir o cupom voce ja envia o cpf/cnpj no comando abrecupom. para emitir dados adicionais voce tem no final do cupom n linhas que ali voce escre o que voce quiser, respeitando o total de caracteres se nao me engano é no comando fechacupom para gerar o arquivo, as empresas da impressora dispopnibilaram versoes novas das dll de acesso ao ecf, caso nao for o seu caso, tera que armazenar as informacoes e fazer o arquivo na unha. -Mensagem Original- From: Marcelo Macorim [EMAIL PROTECTED] Date: Thu, 13 Dec 2007 07:20:59 -0200 To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Impressora Fiscal Bematech Amigo, oq seria nome do favorecido? E em que momento vc precisa desse parâmetro? Na hora de abrir o cupom? Na hora de finalizar? Enfin. Se porventura for na hora de abrir o cupom, consta nos meus conhecimentos que somente o CPF ou CNPJ são os suficientes. Mas no seu caso, qual a finalidade de apecer o nome do favorecido? Quando é baixado a dll do site da bema, ela possui um help que contem todas as funções da dll. No própio site da bema, possui também um protótipo feito em delphi utilizando todas as funções da dll. Espero ter ajudado. Alcistemas Informática escreveu: Sei que nao é pertinente ao tópico deste grupo, porém preciso muito, se alguém puder me ajudar,pode até responder em PVT, para nao prejudicar o grupo. Qual função da Dll eu uso para incluir o Nome do Favorecido no Cupom Fiscal, da impressora Bematech MP-20 FI II ? (cpf eu já consegui) Qual biblioteca eu devo utilizar para gerar os registros da nota fiscal paulista para essa mesma impressora ? Obrigado, e me desculpem pelo off-topic Alcione Guimarães e-mail: [EMAIL PROTECTED] mailto:alcistemas%40yahoo.com.br Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn: [EMAIL PROTECTED] mailto:alcistemas%40hotmail.com [As partes desta mensagem que não continham texto foram removidas] Wainer 16--6697 16-9101-1756 Wisa soft 16-3721-7187 o[|||]o ▓-o---▓ CJ3A - 49 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Impressora Fiscal Bematech
é para a nota fiscal paulista, na abertura ou no fechamento já resolveria, porém estou acrescentando na observação do cupom. Obrigado pela ajuda. - Original Message - From: Marcelo Macorim To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 13, 2007 8:20 AM Subject: Re: [delphi-br] Impressora Fiscal Bematech Amigo, oq seria nome do favorecido? E em que momento vc precisa desse parâmetro? Na hora de abrir o cupom? Na hora de finalizar? Enfin. Se porventura for na hora de abrir o cupom, consta nos meus conhecimentos que somente o CPF ou CNPJ são os suficientes. Mas no seu caso, qual a finalidade de apecer o nome do favorecido? Quando é baixado a dll do site da bema, ela possui um help que contem todas as funções da dll. No própio site da bema, possui também um protótipo feito em delphi utilizando todas as funções da dll. Espero ter ajudado. Alcistemas Informática escreveu: Sei que nao é pertinente ao tópico deste grupo, porém preciso muito, se alguém puder me ajudar,pode até responder em PVT, para nao prejudicar o grupo. Qual função da Dll eu uso para incluir o Nome do Favorecido no Cupom Fiscal, da impressora Bematech MP-20 FI II ? (cpf eu já consegui) Qual biblioteca eu devo utilizar para gerar os registros da nota fiscal paulista para essa mesma impressora ? Obrigado, e me desculpem pelo off-topic Alcione Guimarães e-mail: [EMAIL PROTECTED] mailto:alcistemas%40yahoo.com.br Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn: [EMAIL PROTECTED] mailto:alcistemas%40hotmail.com [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] Urgente (Exibir Dia e Mês do Anive rsariante no QuickReport)
Quer um conselho, deixa a data no field normal 01/11/2000 porém no mask do componente digite assim: DD/MM E só. - Original Message - From: Jorge Ericsson Sent: Wednesday, December 12, 2007 12:21 PM Subject: [delphi-br] Urgente (Exibir Dia e Mês do Aniversariante no QuickReport) Olá pessoal, Eu uso D7+ADO+MySql e preciso exibir no relatório apenas o DIA/MES do aniversariante e estou usando a instrução abaixo: SELECT nom_membro as Membro, dta_nascimento as Nascimento, CONCAT(extract(day from dta_nascimento), '/', extract(month from dta_nascimento)) as DiaMes, des_congregacao FROM TB_SGI_MEMBROS MEMBROS INNER JOIN TB_SGI_CONGREGACAO CONGREGACAO ON CONGREGACAO.COD_CONGREGACAO = MEMBROS.COD_CONGREGACAO WHERE MONTH(DTA_NASCIMENTO) = :prMes AND COD_SITUACAO IN (1,3,8) ORDER BY 4, 3 O problema é que esta gerando um código VARBYTES no campo e não o valor concatenado da data, se eu coloco o campo Nascimento os dados são exibidos corretamente. Alguém já passou por isso ? -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Enter dentro do DBMemo
no onkeydown do form faça assim: if (Key = #13) and (memo1.focused = false) then begin Key := #0; Perform(Wm_NextDlgCtl,0,0); end; - Original Message - From: Anderson Furtilho To: delphi-br@yahoogrupos.com.br Sent: Wednesday, December 12, 2007 4:27 PM Subject: [delphi-br] Enter dentro do DBMemo Olá amigos do Forum!!! Se alguém ja passou por isso e puder me dar uma dica, ficarei agradecido!!! Minha form o KeyPreview esta True e no evento OnKeyDown da mesma esta o seguinte código Case Key of VK_RETURN: Perform(WM_NEXTDLGCTL,0,0); End; O problema esta que quando ele passa por um DBMemo eu gostaria de que ao dar o enter ele não mudasse para o proximo controle. Sei que eu poderia desabilitar o KeyPreview (KeyPreview := False) ai o enter pularia de linha dentro do DBMemo, mas o problema é que esta componente DBMemo é o ultimo componente da form e o usuário costuma usar as teclas de atalhos para salvar o cadastro. Desabilitando o KeyPreview o restante das teclas de atalho também não funcionária na form. Resumo: Evitar o WM_NEXTDLGCTL,0,0 ao dar Enter dentro de um DBMemo. Desde já antecipo meus agradecimentos! Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Impressora Fiscal Bematech
Sei que nao é pertinente ao tópico deste grupo, porém preciso muito, se alguém puder me ajudar,pode até responder em PVT, para nao prejudicar o grupo. Qual função da Dll eu uso para incluir o Nome do Favorecido no Cupom Fiscal, da impressora Bematech MP-20 FI II ? (cpf eu já consegui) Qual biblioteca eu devo utilizar para gerar os registros da nota fiscal paulista para essa mesma impressora ? Obrigado, e me desculpem pelo off-topic Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Email UOL
Enviando email de [EMAIL PROTECTED] para [EMAIL PROTECTED]
nao consigo fazer isso, dá o seguinte erro: [EMAIL PROTECTED]: Recipient
address rejected: Access Danied
var
smtp : TIdSMTP ;
pop : TIDPop3;
Mensagem : TIdMessage ;
begin
smtp := TIdSMTP.Create( Nil );
Pop := TIdPOP3.Create(Nil);
Mensagem := TIdMessage.Create( Nil );
pop.Host := 'pop3.uol.com.br';
pop.Username := 'alcione';
pop.Password := '123' ;
pop.Port := 110;
pop.Connect() ;
//pop.Disconnect;
smtp.Host := 'smtp.uol.com.br';
smtp.Username := 'alcione';
smtp.Password := '123' ;
smtp.Port := 25;
smtp.AuthenticationType := atLogin;
smtp.Connect() ;
mensagem.From.Name:= [EMAIL PROTECTED];
mensagem.Recipients.EMailAddresses := '[EMAIL PROTECTED]';
mensagem.Subject := 'TESTE DE EMAIL SOFT ALCIONE...';
smtp.Send( mensagem );
showmessage('mensagem enviada');
Alcione Guimarães
e-mail: [EMAIL PROTECTED]
Cel: 11-9515-8707
SIP VOIP: 3301040
SKYPE: alcistemas
msn:[EMAIL PROTECTED]
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Email UOL
Já fiz isso e o erro persiste,
valeu a força!
- Original Message -
From: Apoio
To: delphi-br@yahoogrupos.com.br
Sent: Monday, December 10, 2007 3:27 PM
Subject: Re: [delphi-br] Email UOL
pop.Username := 'alcione';
smtp.Username := 'alcione';
olha , o username aqui é na verdade seu email .
pelomenos eu uso aqui do bol e tem q ser assim :
smtp.Username := '[EMAIL PROTECTED]';
- Original Message -
From: Alcistemas Informática
To: delphi-br@yahoogrupos.com.br
Sent: Monday, December 10, 2007 12:20 PM
Subject: [delphi-br] Email UOL
Enviando email de [EMAIL PROTECTED] para [EMAIL PROTECTED]
nao consigo fazer isso, dá o seguinte erro: [EMAIL PROTECTED]: Recipient
address rejected: Access Danied
var
smtp : TIdSMTP ;
pop : TIDPop3;
Mensagem : TIdMessage ;
begin
smtp := TIdSMTP.Create( Nil );
Pop := TIdPOP3.Create(Nil);
Mensagem := TIdMessage.Create( Nil );
pop.Host := 'pop3.uol.com.br';
pop.Username := 'alcione';
pop.Password := '123' ;
pop.Port := 110;
pop.Connect() ;
//pop.Disconnect;
smtp.Host := 'smtp.uol.com.br';
smtp.Username := 'alcione';
smtp.Password := '123' ;
smtp.Port := 25;
smtp.AuthenticationType := atLogin;
smtp.Connect() ;
mensagem.From.Name := [EMAIL PROTECTED];
mensagem.Recipients.EMailAddresses := '[EMAIL PROTECTED]';
mensagem.Subject := 'TESTE DE EMAIL SOFT ALCIONE...';
smtp.Send( mensagem );
showmessage('mensagem enviada');
Alcione Guimarães
e-mail: [EMAIL PROTECTED]
Cel: 11-9515-8707
SIP VOIP: 3301040
SKYPE: alcistemas
msn: [EMAIL PROTECTED]
[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]
Re: Res: [delphi-br] Unidades Mapeadas e Firebird
kra, tentei resolver seu problema mas não cosegui, pois não consegui apartir de um compartilhamento saber qual o caminho da pasta compartilhada ex: c:\teste\a\b\c a pasta c pode ser compartilhada como c mais nao ser o c:\ do micro.. se conseguir me avise, quebrei o coco e nao consegui... o maximo que descobri foi que no windows tem o comando net share que diz os compartilhamentos da máquina local e quais os verdadeiros caminhos, agora da máquina remoto nao dá.. abraço! - Original Message - From: blcksun954 To: delphi-br@yahoogrupos.com.br Sent: Friday, November 30, 2007 9:06 PM Subject: Re: Res: [delphi-br] Unidades Mapeadas e Firebird Sim, eu sei que dá pra fazer assim, mas meu chefe quer que que os usuários possam usar um FilenameEdit (da RX) pra selecionar o arquivo do banco de dados, e esse componente vai mostrar o caminho como o windows mapear ele na rede. Quer dizer, no meu servidor de teste, o banco está em C:\sistema\sistema.fdb No cliente de teste, ele aparece como \\carlos-6a1ff64\c\sistema\sistema.fdb ou J:\sistema\sistema.fdb E nenhuma das duas últimas opções funcionam com o firebird. O que preciso saber é se tem alguma opção que faria com os dois últimos caminhos fossem aceitos, ou como transformar um deles em 192.168.0.1:c:\sistema\sistema.fdb É possível? --- Em delphi-br@yahoogrupos.com.br, Robson [EMAIL PROTECTED] escreveu Sem nome, O caminho para o banco de dados em rede vc pode utilizar desta forma ipservidor:caminho_no_servidor exemplo 192.168.0.1:c:\sistema\banco_de_dados.fdb lebrando q é o caminho do servidor e tb q se tiver com o firewall ativo liberar a porta 3050, porta de serviço do firebird, e naum há necessidade de mapear unidades. Kaputz, Robson Skype: kaputz_gri Keep the Dream Alive [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Ler última linha de um arquivo de te xto
Var Arq : TextFile; uLinha : String; begin Assignfile(arq,'c:\arquivo.txt'); reset(arq); while not Eof ( arq ) do ReadLn ( arq, ulinha); CloseFile ( arq ); showmessage(uLinha); - Original Message - From: Paulo Daniel Dorensbach To: delphi-br@yahoogrupos.com.br Sent: Wednesday, December 05, 2007 10:09 PM Subject: [delphi-br] Ler última linha de um arquivo de texto Olá amigos, Tenho um arquivo de texto que é uma espécie de LOG e é mais ou menos assim: *1 05/12/2007 20:55 Backup.2007-12-05.20:55:23* *2 06/12/2007 20:59 Backup.2007-12-06.20:59:43* *3 08/12/2007 21:05 Backup.2007-12-08.21:05:12* *4 09/12/2007 19:35 Backup.2007-12-09.19:35:09* E assim por diante, a cada Backup uma nova linha é inserida. Como faço para ler a última linha do arquivo? Um abraço a todos! -- +--+ Paulo Daniel Dorensbach http://geocities.yahoo.com.br/dorensbach Usuario GNU/Linux #363631 - http://counter.li.org/ www.velocidadejusta.com.br/rfc.htm By Mozilla Thunderbird www.mozilla.org.br +--+ ___ 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]
Re: [delphi-br] Dúvidas e mais Dúvidas
Kra, faço isso também... Porém vc poderá na atualização do Firebird 2.*.* ter alguns probleminhas de falta de recurso. Existe um tal de IBO (componentes) que dizem ser muito bom... dê uma pesquisada é pago + vale a pena, quem me recomendou foi um DBA de firebird que entende do assunto. - Original Message - From: Darkzad To: delphi-br@yahoogrupos.com.br Sent: Friday, December 07, 2007 10:25 AM Subject: [delphi-br] Dúvidas e mais Dúvidas Olá pessoal, Estou programando em Delphi 7 com banco de dados Firebird e desde quando comecei a programar utilizo os componentes da paleta interbase. Gostaria de saber se estou fazendo correto, utilizando componentes do interbase para usar com firebird. Nunca gostei de usar componentes de terceiros, por isso não procurei outra alternativa, mas sempre fiquei com essa pulga atrás da orelha. O que acham? Desde já agradeço Darkzad [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] Impressora Fiscal em Rede
kra, comentamos isso faz poucos dias aqui, sob meu ponto de vista a lei não permite. E pelas demais respostas que ví aqui, acredito que não pode. O que pode é ter um balcão com 3 pcs por exemplo e lá no caixa sair o cupom fiscal. - Original Message - From: Leandro - Grupos To: delphi-br@yahoogrupos.com.br Sent: Thursday, December 06, 2007 8:49 AM Subject: [delphi-br] Impressora Fiscal em Rede E ai galera, blz É possível utilizar uma impressora fiscal por dois micros ao mesmo tempo??? Leandro Carbonera (54) 3343-3623 / 9977-1266 [EMAIL PROTECTED] www.sigmatecnologia.com.br [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] Unidades Mapeadas e Firebird
kra, eu tenho noção de como faz isso, sei que fica gravado no registro do windows. seria só quando o usuário setar J:\sistema\sistema.fdb buscar o que é J: entao se J: = '\\carlos-6a1ff64\c entao o caminho do banco de dados seria carlos-6a1ff64:c:\sistema\sistema\.fdb vou tentar escrever algo para vc, se por acaso já conseguiu me avise! - Original Message - From: Robson To: delphi-br@yahoogrupos.com.br Sent: Monday, December 03, 2007 3:06 PM Subject: Res: [delphi-br] Unidades Mapeadas e Firebird Meu jovem, ainda sem nome, Qdo coloquei seu me referi a sua configuração, a configuração q vc coloca no seu sistema. não sei e desconheço um comando ou função q retorne o nome da maquina em q está o mapeamento, entaum não sei lhe dizer se ou como fazer essa troca, mas o q quero lhe disse é q esse mapeamento é para o acesso ao firebird é totalmente desnecessário, vc pode usar mapeamento para escolher o banco de dados como vc disse anteriormente, bom segue algumas sugestões: Estes bancos de dados ficam em um mesmo servidor? se sim padronize em todos os seus clientes o ip do servidor como 192.168.0.1 (aki trabalho com sete lojas), tb padronizei o local do banco de dados, todos os servidores tem duas partições no HD, ou seja dando problema numa instalação, pode-se formartar e reinstar o servidor sem a perda dos dados, o q geralmente ocorre com a undade C:, os bancos de dados ficam em D:\USR\BANCO-DE-DADOS, mas o meu programa permite q vc escolha qualquer maquina e qualquer pasta. Para a configuração do banco de dados tenho dois edit's um para o nome ou ip do servidor e outro para o caminho fisico do banco de dados do servidor e faço assim: if eHost.Text '' then DatabaseName := eHost.text + ':' + eCaminho.Text else DatabaseName := eCaminho.Text; Se for estação faço a união do host com o caminho acrescentando o : inves da barra, entaum no meu banco de dados fica: 192.168.0.1:D:\USR\BANCO-DE-DADOS\SISTEMA.GDB Pois no host é preenchido somente: 192.168.0.1 ou SERVIDOR01 e no caminho D:\USR\BANCO-DE-DADOS\SISTEMA.GDB, ou seja sou eu programador quem cuido de como a informação é passada para o banco de dados. Espero ter ajudado, só naum sei como pegar o nome do micro atribuído a uma unidade mapeada. Kaputz, Robson Skype: kaputz_gri Keep the Dream Alive - Mensagem original De: blcksun954 [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Segunda-feira, 3 de Dezembro de 2007 14:31:55 Assunto: Re: Res: Res: [delphi-br] Unidades Mapeadas e Firebird Você não entendeu. Não sou EU quem coloca o caminho como \\carlos-6a1ff64\ c\sistema\ sistema.fdb, é o componente pra selecionar arquivos que traz ele assim. Isso se \\carlos-6a1ff64\ c não tiver sido remapeado pra algo como J:. Nesse caso o usuário poderia selecionar J:\sistema\sistema. fdb. O que eu queria saber é como transformar J:\sistema\sistema. fdb para carlos-6a1ff64: c:\sistema\ sistema.fdb, já que converter \\carlos-6a1ff64\ c\sistema\ sistema.fdb seria fácil. --- Em [EMAIL PROTECTED] os.com.br, Robson kaputz_gri@ ... escreveu O erro está depois do nome da maquina, seu: \\carlos-6a1ff64\ c\sistema\ sistema.fdb correto: carlos-6a1ff64: c:\sistema\ sistema.fdb eu naum uso as duas barras, mas funciona tb. Kaputz, Robson Skype: kaputz_gri Não pude escolher muitas coisas que nasceram comigo, mas posso escolher meu amigo..E nessa busca empenho a minha própria alma, pois com uma Amizade Verdadeira, a vida se torna mais simples, mais rica e mais bela... Charlie Chaplin . Keep the Dream Alive Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/ [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] Unidades Mapeadas e Firebird
HKEY_USERS S-1-5-21-1957994488-1563985344-1060284298-1003 (talvez esta mude de pc para pc, preciso análisar) software microsoft windows currentVersion explorer Map Network Drive MRU vou estudar melhor hoje e posto na lista amanhã, abraço! - Original Message - From: Robson To: delphi-br@yahoogrupos.com.br Sent: Tuesday, December 04, 2007 4:21 PM Subject: Res: [delphi-br] Unidades Mapeadas e Firebird Fiz três pesquisas completas no registro do windows (uso o server 2003) e não encontrei a chave q está associada o mapeamento, caso alguém saiba qual é a chave e queira compartilhar. Kaputz, Robson Skype: kaputz_gri Keep the Dream Alive - Mensagem original De: Alcistemas Informática [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 4 de Dezembro de 2007 12:29:41 Assunto: Re: [delphi-br] Unidades Mapeadas e Firebird kra, eu tenho noção de como faz isso, sei que fica gravado no registro do windows. seria só quando o usuário setar J:\sistema\sistema. fdb buscar o que é J: entao se J: = '\\carlos-6a1ff64\ c entao o caminho do banco de dados seria carlos-6a1ff64: c:\sistema\ sistema\. fdb vou tentar escrever algo para vc, se por acaso já conseguiu me avise! - Original Message - From: Robson To: [EMAIL PROTECTED] os.com.br Sent: Monday, December 03, 2007 3:06 PM Subject: Res: [delphi-br] Unidades Mapeadas e Firebird Meu jovem, ainda sem nome, Qdo coloquei seu me referi a sua configuração, a configuração q vc coloca no seu sistema. não sei e desconheço um comando ou função q retorne o nome da maquina em q está o mapeamento, entaum não sei lhe dizer se ou como fazer essa troca, mas o q quero lhe disse é q esse mapeamento é para o acesso ao firebird é totalmente desnecessário, vc pode usar mapeamento para escolher o banco de dados como vc disse anteriormente, bom segue algumas sugestões: Estes bancos de dados ficam em um mesmo servidor? se sim padronize em todos os seus clientes o ip do servidor como 192.168.0.1 (aki trabalho com sete lojas), tb padronizei o local do banco de dados, todos os servidores tem duas partições no HD, ou seja dando problema numa instalação, pode-se formartar e reinstar o servidor sem a perda dos dados, o q geralmente ocorre com a undade C:, os bancos de dados ficam em D:\USR\BANCO- DE-DADOS, mas o meu programa permite q vc escolha qualquer maquina e qualquer pasta. Para a configuração do banco de dados tenho dois edit's um para o nome ou ip do servidor e outro para o caminho fisico do banco de dados do servidor e faço assim: if eHost.Text '' then DatabaseName := eHost.text + ':' + eCaminho.Text else DatabaseName := eCaminho.Text; Se for estação faço a união do host com o caminho acrescentando o : inves da barra, entaum no meu banco de dados fica: 192.168.0.1: D:\USR\BANCO- DE-DADOS\ SISTEMA.GDB Pois no host é preenchido somente: 192.168.0.1 ou SERVIDOR01 e no caminho D:\USR\BANCO- DE-DADOS\ SISTEMA.GDB , ou seja sou eu programador quem cuido de como a informação é passada para o banco de dados. Espero ter ajudado, só naum sei como pegar o nome do micro atribuído a uma unidade mapeada. Kaputz, Robson Skype: kaputz_gri Keep the Dream Alive - Mensagem original De: blcksun954 [EMAIL PROTECTED] com.br Para: [EMAIL PROTECTED] os.com.br Enviadas: Segunda-feira, 3 de Dezembro de 2007 14:31:55 Assunto: Re: Res: Res: [delphi-br] Unidades Mapeadas e Firebird Você não entendeu. Não sou EU quem coloca o caminho como \\carlos-6a1ff64\ c\sistema\ sistema.fdb, é o componente pra selecionar arquivos que traz ele assim. Isso se \\carlos-6a1ff64\ c não tiver sido remapeado pra algo como J:. Nesse caso o usuário poderia selecionar J:\sistema\sistema. fdb. O que eu queria saber é como transformar J:\sistema\sistema. fdb para carlos-6a1ff64: c:\sistema\ sistema.fdb, já que converter \\carlos-6a1ff64\ c\sistema\ sistema.fdb seria fácil. --- Em [EMAIL PROTECTED] os.com.br, Robson kaputz_gri@ ... escreveu O erro está depois do nome da maquina, seu: \\carlos-6a1ff64\ c\sistema\ sistema.fdb correto: carlos-6a1ff64: c:\sistema\ sistema.fdb eu naum uso as duas barras, mas funciona tb. Kaputz, Robson Skype: kaputz_gri Não pude escolher muitas coisas que nasceram comigo, mas posso escolher meu amigo..E nessa busca empenho a minha própria alma, pois com uma Amizade Verdadeira, a vida se torna mais simples, mais rica e mais bela... Charlie Chaplin . Keep the Dream Alive Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail. yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.com/ [As partes desta
Re: [delphi-br] Off - Case When com Datas no FB
Pode ser que esteja retornando alguma data nula, utilize a função COALESCE - Original Message - From: Adriano Santos (Yahoo) To: Delphi-br Sent: Wednesday, November 28, 2007 9:11 AM Subject: [delphi-br] Off - Case When com Datas no FB Galera, Tô com uma dúvida básica aqui: preciso fazer um case when numa data no Firebird 1.5 ou superior, não sei nem se funciona. Na verdade não dá erro, mas não retorna corretamente os dados. Pra resumir preciso copiar parte da string de um campo se a data for inferior a 01/07/2007. Por exemplo: DATA..OPERADOR 01/01/2007...ODAIR 12/10/2007...ODAIR 13/08/2007...DG-ADRIANO Se for menor que 01/07/2007 copia do inicio até o fim, retornando ODAIR. Se for superior a esta data copia do caracter depois do traço pra frente ficando ADRIANO. O resultado tem que ser este. DATA..OPERADOR 01/01/2007...ODAIR 12/10/2007...ODAIR 13/08/2007...ADRIANO Fiz a select abaixo, não dá erro, mas tb não respeita o CASE WHEN. Vlw SELECT LP.*, FL.NOME AS NM_FILIAL, HS.HISTORICO AS NM_OCORRENCIA, (CASE WHEN LP.DT_LANCAMENTO '07-19-2006' THEN SUBSTR(LP.OPERADOR, 1, 15) WHEN LP.DT_LANCAMENTO '07-19-2006' THEN SUBSTR(LP.OPERADOR, 4, 15) END ) AS NM_OPERADOR FROM STWCOLTLANP LP LEFT JOIN STWOPETFIL FL ON (LP.FIL_LANCAMENTO = FL.FILIAL) LEFT JOIN STWCOLTHIS HS ON (LP.OCORRENCIA = HS.CODIGO) -- Adriano Santos -- Editor Técnico Revista ClubeDelphi www.delphitodelphi.blogspot.com www.devmedia.com.br www.devmedia.com.br/clubedelphi/pagina.asp [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Alterar Caracter dentro de String
function BuscaTroca(Texto: String; pos:integer; troca:String):string; begin result := copy(texto,1,pos-1)+troca+copy(texto,pos+1,32); end; EX: Trocar o quinto caracter por X do Edit1 procedure TForm1.Button1Click(Sender: TObject); begin Edit2.text := BuscaTroca(edit1.text,5,'X'); end; kra, bolei agora é bom testar :) - Original Message - From: Ricardo Mendes To: delphi-br@yahoogrupos.com.br Sent: Wednesday, November 28, 2007 8:30 AM Subject: [delphi-br] Alterar Caracter dentro de String Galera minha duvida é o seguinte. Eu tenho um campo na minha tabela do tipo varchar(32) e preciso fazer o seguinte, ler essa string e alterar o caracter da posicao X. Tentei fazer desse jeito mas ele não aceita, pois da imcompatibilidade de types... function EditarString(sTex:String;numero: integer; sCarac: String) :string; var L : string[31]; begin L:=sTex; L[numero-1]:= sCarac; result:= L; end; Fico no aguardo, Ricardo Mendes [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 - Case When com Datas no FB
- Original Message - From: Adriano Santos (Yahoo) To: Delphi-br Sent: Wednesday, November 28, 2007 9:11 AM Subject: [delphi-br] Off - Case When com Datas no FB Galera, Tô com uma dúvida básica aqui: preciso fazer um case when numa data no Firebird 1.5 ou superior, não sei nem se funciona. Na verdade não dá erro, mas não retorna corretamente os dados. Pra resumir preciso copiar parte da string de um campo se a data for inferior a 01/07/2007. Por exemplo: DATA..OPERADOR 01/01/2007...ODAIR 12/10/2007...ODAIR 13/08/2007...DG-ADRIANO Se for menor que 01/07/2007 copia do inicio até o fim, retornando ODAIR. Se for superior a esta data copia do caracter depois do traço pra frente ficando ADRIANO. O resultado tem que ser este. DATA..OPERADOR 01/01/2007...ODAIR 12/10/2007...ODAIR 13/08/2007...ADRIANO Fiz a select abaixo, não dá erro, mas tb não respeita o CASE WHEN. Vlw SELECT LP.*, FL.NOME AS NM_FILIAL, HS.HISTORICO AS NM_OCORRENCIA, (CASE WHEN LP.DT_LANCAMENTO '07-19-2006' THEN SUBSTR(LP.OPERADOR, 1, 15) WHEN LP.DT_LANCAMENTO '07-19-2006' THEN SUBSTR(LP.OPERADOR, 4, 15) END ) AS NM_OPERADOR FROM STWCOLTLANP LP LEFT JOIN STWOPETFIL FL ON (LP.FIL_LANCAMENTO = FL.FILIAL) LEFT JOIN STWCOLTHIS HS ON (LP.OCORRENCIA = HS.CODIGO) -- Adriano Santos -- Editor Técnico Revista ClubeDelphi www.delphitodelphi.blogspot.com www.devmedia.com.br www.devmedia.com.br/clubedelphi/pagina.asp [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Impressora Fiscal
Pelo que já lí, por lei isso não pode. Leia ICMS 57-97 - Original Message - From: Leandro - Grupos To: delphi-br@yahoogrupos.com.br Sent: Tuesday, November 27, 2007 8:19 AM Subject: [delphi-br] Impressora Fiscal E ai pessoal, blz... Alguem saberia me dizer se é possível utilizar uma impressora fiscal em 2 micros pela rede ao mesmo tempo. Leandro Carbonera (54) 3343-3623 / 9977-1266 [EMAIL PROTECTED] www.sigmatecnologia.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.503 / Virus Database: 269.16.7/1151 - Release Date: 25/11/2007 16:24 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] DBGrid, DBNavigator, não permiti r exclusão.
Seria legal vc desabilitar o Ctrl+Delete do Dbgrid também... no onkeydown do dbgrid faça assim: if (Shift = [ssCtrl]) and (Key = 46) Then KEY := 0; - Original Message - From: Nilson Chagas To: delphi-br@yahoogrupos.com.br Sent: Monday, November 26, 2007 11:31 AM Subject: Re: [delphi-br] DBGrid, DBNavigator, não permitir exclusão. rsrsrs Fiquei um periodo fora da programação em delphi, achei que se eu desabilita o Confirm Delete ele excluiria sem perguntar. rsrsrs A inclusão e Editão foi sussegado. rsrs Toh usando dbnavigator por puro comodismo. rsrs Para eu melhorar meu botões, será que alguém tem um site que tenha bmp proprio para botões??? Obrigado Juliano. Em 26/11/07, Juliano Silva - Yahoo [EMAIL PROTECTED] escreveu: Vá no grid em OPÇÕES e desabilite a opção CONFIRM DELETE, e no Datasource desabilite a opção AUTO EDIT e também desabilite o botão de INCLUSÃO do DBNavigator, mas usar o DBNavigator ai ai viu.. .rsrrssr _ De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em nome de Nilson Chagas Enviada em: segunda-feira, 26 de novembro de 2007 08:55 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Assunto: [delphi-br] DBGrid, DBNavigator, não permitir exclusão. Acredito, que vou levar umas saraivadas, mas vamos lá. rsrs Estou usando DBGrid, DBNavigator, IBQuery e IBUpdateSQL (O cadastro é simples demais. rsrsrs) Agora eu coloquei um controle de nivel de acesso, opções (consulta, edita, inseri e excluir). Consegui inibir a edição e inserção, mas não estou conseguindo inibir a exclusão. Como faço para não permitir a exclusão do registro?? []s Nilson Chagas -- Visite: Fundamental: www.amados.com.-br Dúvidas:HYPERLINK http://nilsoftware.blogspot.com/http://nilsoftware.-blogspot.-com/ Obrigatório: www.saopaulofc.-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.503 / Virus Database: 269.16.7/1151 - Release Date: 25/11/2007 16:24 No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.16.7/1151 - Release Date: 25/11/2007 16:24 [As partes desta mensagem que não continham texto foram removidas] -- Visite: Fundamental: www.amados.com.br Dúvidas:http://nilsoftware.blogspot.com/ Obrigatório: www.saopaulofc.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.503 / Virus Database: 269.16.7/1151 - Release Date: 25/11/2007 16:24 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] componente que faça netstat
netstat a.txt depois é só abrir o a.txt pode utilizar o winexec no delphi para executar esse comando - Original Message - From: Evaldo To: delphi-br@yahoogrupos.com.br Sent: Wednesday, November 14, 2007 2:52 PM Subject: [delphi-br] componente que faça netstat Boa tarde, estou precisando de um componente que faça o mesmo que o comando netstat do DOS, para gravar em um arquivo. Alguém poderia me indicar algum? Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! http://br.mail.yahoo.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.5.503 / Virus Database: 269.15.30/1127 - Release Date: 12/11/2007 21:19 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [MEIO - OFF] Erro ao conectar com Firebird + dbXpress
192.168.0.1:3050:C:/Caminho/BaseDeDados.gdb ou Localhost:3050:C:/Caminho/BaseDeDados.gdb ou 192.168.0.1:3050:C:\Caminho\BaseDeDados.gdb ou Localhost:3050:C:\Caminho\BaseDeDados.gdb ou 192.168.0.1:3050:C:/Caminho/BaseDeDados.gdb ou Localhost:C:\Caminho/BaseDeDados.gdb 192.168.0.1:C:\Caminho\BaseDeDados.gdb ou Localhost:3050:C:\Caminho\BaseDeDados.gdb se todas as máquinas não estiverem acessando tanto win xp quanto 98 o BD pode estar corrompido, veja se aporta 3050 está habilitada no firewall também - Original Message - From: Adriano Santos (Devmedia) To: delphi-br@yahoogrupos.com.br Sent: Tuesday, November 13, 2007 3:51 PM Subject: Re: [delphi-br] [MEIO - OFF] Erro ao conectar com Firebird + dbXpress Tenta colocar o endereço do servidor, por exemplo: 192.168.0.1/3050:C:\Caminho\BaseDeDados.gdb ou Localhost/3050:C:\Caminho\BaseDeDados.gdb Abs -- *Boa leitura*, -- *Adriano Santos* Desenvolvedor Delphi desde 1998. Professor e programador PHP. Bacharel em Comunicação Social pela Universidade Cruzeiro do Sul, SP. Editor Técnico, Colunista e Comissão Editorial da revista ClubeDelphi. www.delphitodelphi.blogspot.com http://www.delphitodelphi.blogspot.com www.devmedia.com.br http://www.devmedia.com.br Marcos Bernardo respondeu: Boa tarde Senhores alguem ja se deparou com este erro?? I/O error for file C:caminho\BaseDeDados.gdb Error while trying to open file The process cannot access the file because it is being used by another process. Estou utilizando Delphi 7 e firebird 2.0 até o momento estava tudo correndo bem, mas com a necessidade de criarmos uma aplicação de exportação de dados, e uma nova conexão ocorreu este erro... qualquer ajuda eh bem vinda obrigado Marcos Bernardo [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.503 / Virus Database: 269.15.30/1127 - Release Date: 12/11/2007 21:19 -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.15.30/1127 - Release Date: 12/11/2007 21:19 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Erro midas.dll mas ela nao faltando
Parece bobagem mais c:\windows\system (para win 95, 98) c:\windows\system32 (para win XP,2000) e veja se a dll realmente se encontra lá.. um outro detalhe é no prompt do DOS utilize o comando PATH para ver se essa pasta se encontra no path da máquina. - Original Message - From: Nivaldo Stainle To: delphi-br@yahoogrupos.com.br Sent: Tuesday, November 13, 2007 12:03 PM Subject: Re: [delphi-br] Erro midas.dll mas ela nao faltando já tive problemas assim, em outras máquinas funciona e em outras não; resolvi assim: REGSVR32 c:\windows\system\midas.DLL Stainle Ricardo Bianchin [EMAIL PROTECTED] escreveu: Senhores, eu mesmo fiz a o meu aplicativo de instalacao trabalho com D7 e firebird 1.54 depois de instalar o firebird, meu sistema copia os dll e bpl do delphi necessarios pro sistema funcionar, e nunca tive problemas mas em uma maquina com WXP ta dando erro MIDAS.DLL sempre q vejo um erro assim é pq ta faltando esta dll só q ela com certeza esta no windows\system32 tentei até coloca-la na mesma pasta do .exe mas o erro persiste alguem ja viu algo assim? Ricardo Bianchin ps.: fugindo do assunto, aproveito pra agradecer apoio de todos naquela pergunta se tem como fazer join em tabelas de BDs distintos resolvi usando os trigers! - Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! [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.503 / Virus Database: 269.15.30/1127 - Release Date: 12/11/2007 21:19 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Versão 1.5.2 para 1.5.4
Após várias tentativas não consegui instalar o Firebird 1.5.2 no Debian Consegui apenas a versão 1.5.4 Precisa Fazer Backup Restore do Banco ? Há algum problema em deixar as estações windows com a versão 1.5.2 e server com 1.5.4 ? Alcione Guimarães [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] ERRO! cruel.
sql.Add(' :vtelfor, :vfaxfor, :vcelfor ); ');
tire a vírgula
sql.Add(' :vtelfor, :vfaxfor, :vcelfor )');
- Original Message -
From: mclpaltrin
To: delphi-br@yahoogrupos.com.br
Sent: Monday, October 29, 2007 4:48 PM
Subject: [delphi-br] ERRO! cruel.
procedure TFrmCadastro.BitBtn2Click(Sender: TObject);
begin
{ bloco try/except}
try
with Zquery do
begin
Zquery.Close;
sql.Clear;
sql.Add(' insert into fornec ( ');
sql.Add(' cpfcpj, rzofor, ftsfor, logcom, ');
sql.Add(' numcom, baicom, cepcom, cidcom, ');
sql.Add(' estfor, codfor, insfor, emlfor, ');
sql.Add(' telfor, faxfor, celfor )');
sql.Add(' values ( ');
sql.Add(' :vcpfcpj, :vrzofor, :vftsfor, :vlogcom, ');
sql.Add(' :vnumcom, :vbaicom, :vcepcom, :vcidcom, ');
sql.Add(' :vestfor, :vcodfor, :vinsfor, :vemlfor, ');
sql.Add(' :vtelfor, :vfaxfor, :vcelfor ); ');
Parambyname('vcpfcpj').Value := DBCPFCNPJ.Text ;
Parambyname('vrzofor').Value := DBRAZAO.Text ;
Parambyname('vftsfor').Value := DBNOME.Text ;
Parambyname('vlogcom').Value := DBENDERECO.Text ;
Parambyname('vnumcom').Value := DBNUMERO.Text ;
Parambyname('vbaicom').Value := DBBAIRRO.Text ;
Parambyname('vcepcom').Value := DBCEP.Text ;
Parambyname('vcidcom').Value := DBCIDADE.Text ;
Parambyname('vestfor').Value := DBUF.Text ;
Parambyname('vcodfor').Value := DBCODFORNEC.Text ;
Parambyname('vinsfor').Value := DBESTADUAL.Text ;
Parambyname('vemlfor').Value := DBEMAIL.Text ;
Parambyname('vtelfor').Value := DBTELEFONE.Text ;
Parambyname('vfaxfor').Value := DBFAX.Text ;
Parambyname('vcelfor').Value := DBCELULAR.Text ;
zquery.ExecSQL;
zConnection.Commit;
zQuery.Refresh; //faz um refresh na tabela para atualizar os dados
except
on Exc:Exception do // Esta dando erro nesta linha alguem pode
// corrigir para mim?? Fatal: Syntax error, ;
// expected but identifier ON found
begin
ShowMessage('Ocorreu um erro na tentantiva de gravar os registro: ' +
Exc.Message);
zConnection.Rollback;
zQuery.Refresh; //faz um refresh na tabela para atualizar os dados
end;
end; //final do bloco do try/except
end; Question
_
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Trava de segurança
Uso um componente chamado TEvAppProtect do Elivaldo, www.elivaldo.com.br não é propaganda mais é bom mesmo, e o legal é que vc pode comprar só esse componente, não precisa comprar todo o pacote de componentes. - Original Message - From: Luciano Reis To: delphi-br@yahoogrupos.com.br Sent: Sunday, October 28, 2007 5:44 PM Subject: [delphi-br] Trava de segurança Olá amigos, alguém pode me ajudar na criação de uma rotina para que meu sistema solicite uma senha para destravar apos 45 dias? Pois eu estou locando meu sistema, e to precisando de trava de segurança. Para evitar a pirataria. Grato, Luciano Reis [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.503 / Virus Database: 269.15.12/1098 - Release Date: 29/10/2007 09:28 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] homologação ???
Meu sistema emite cupom numa impressora bematech e digiarte, entrei no site do fabricante, baixei as Dlls, o manual e implementei. Gero o Sintegra apartir dos cupons fiscais emitidos e da nota fiscal impressa numa matricial em formulário especifíco. Existe homologação para isso ? - Original Message - From: Sérgio T. Uetanabaro To: delphi-br@yahoogrupos.com.br Sent: Monday, October 22, 2007 8:23 AM Subject: RES: [delphi-br] homologação ??? O ato de homologar um software consiste no fato de uma entidade analisar e dar o aval positivo do funcionamento do software para uma tarefa. Então depende qual tipo de homologação vc está falando. []´s Sergio Uetanabaro _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alcistemas Informática Enviada em: domingo, 21 de outubro de 2007 12:48 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] homologação ??? o que é um software homologado ? como fazer para homologar ? - Original Message - From: Davi Eduardo Borges Wall To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Thursday, October 18, 2007 10:04 AM Subject: RES: Res: [delphi-br] Off - Sonegação Fiscal Eu vi uma reportagem no Bom dia Brasil onde o repórter havia comentado que o colibri tinha uma configuração que permitia sonegar impostos. Imaginei algo do tipo crie um arquivo dentro de Windows\system32 com o nome sonegarehlegal.sonegar então o soft percebe a presença do arquivo e sai sonegando tudo! RS -Mensagem original- 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 Joel Alexandre Enviada em: quinta-feira, 18 de outubro de 2007 07:47 Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Assunto: Re: Res: [delphi-br] Off - Sonegação Fiscal Caraca Robson, E o pilantrão foi feito pela propria Colibri? []Os Joel Joel, de uma reportagem da Rederecord o jornalista disse q havia 2 programas da colibri instalado no micro, ou seja o homologado e o pilantrão, ele alternava entre os programas para emitir ou naum o cupom. LEMBRANDO Kaputz, Robson Skype: kaputz_gri Keep the Dream Alive - Mensagem original De: Joel Alexandre joel_alexandre2002@ mailto:joel_alexandre2002%40yahoo.com.br yahoo.com.br Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Enviadas: Quarta-feira, 17 de Outubro de 2007 23:16:16 Assunto: Re: [delphi-br] Off - Sonegação Fiscal Leonardo Quinino escreveu: A verdade sempre vem à tona, pois é.. então enfim a casa caiu... Eu mesmo já perdi diversos clientes para esse colibri . Hoje perdi os meus clientes, mas meu sono, esse não tem preço. Leonardo, nunca vi esse colibri, nem sei como é. Tb não sei o motivo técnico que levou à essa busca. Agora, de uma coisa eu sei com toda certeza, este software é homologado e passou por baterias de testes. É um software indicado pela Bematech. Tem milhares de clientes. Tá muito estranho isso. Ou deve ter outra coisa além por trás disso ou pode ser um soft clonado. []Os Joel [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- Internal Virus Database is out-of-date. Checked by AVG Free Edition. Version: 7.5.488 / Virus Database: 269.14.6/1061 - Release Date: 10/10/2007 08:43 [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.488 / Virus Database: 269.15.5/1085 - Release Date: 22/10/2007 10:35 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Ajuda
ipconfig a.txt depois é só abrir esse arquivo e desviar para um memo - Original Message - From: BandaLemuel To: delphi-br@yahoogrupos.com.br Sent: Thursday, October 18, 2007 3:59 PM Subject: [delphi-br] Ajuda Lista Vcs sabem como faço para dar um comando no DOS pelo Delphi e pegar o retorno.. por exemplo... dar um ipconfig e colocar o retorno em um Memo... Wesley [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.5.488 / Virus Database: 269.14.6/1061 - Release Date: 10/10/2007 08:43 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] homologação ???
o que é um software homologado ? como fazer para homologar ? - Original Message - From: Davi Eduardo Borges Wall To: delphi-br@yahoogrupos.com.br Sent: Thursday, October 18, 2007 10:04 AM Subject: RES: Res: [delphi-br] Off - Sonegação Fiscal Eu vi uma reportagem no Bom dia Brasil onde o repórter havia comentado que o colibri tinha uma configuração que permitia sonegar impostos. Imaginei algo do tipo crie um arquivo dentro de Windows\system32 com o nome sonegarehlegal.sonegar então o soft percebe a presença do arquivo e sai sonegando tudo! RS -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Joel Alexandre Enviada em: quinta-feira, 18 de outubro de 2007 07:47 Para: delphi-br@yahoogrupos.com.br Assunto: Re: Res: [delphi-br] Off - Sonegação Fiscal Caraca Robson, E o pilantrão foi feito pela propria Colibri? []Os Joel Joel, de uma reportagem da Rederecord o jornalista disse q havia 2 programas da colibri instalado no micro, ou seja o homologado e o pilantrão, ele alternava entre os programas para emitir ou naum o cupom. LEMBRANDO Kaputz, Robson Skype: kaputz_gri Keep the Dream Alive - Mensagem original De: Joel Alexandre [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 17 de Outubro de 2007 23:16:16 Assunto: Re: [delphi-br] Off - Sonegação Fiscal Leonardo Quinino escreveu: A verdade sempre vem à tona, pois é.. então enfim a casa caiu... Eu mesmo já perdi diversos clientes para esse colibri . Hoje perdi os meus clientes, mas meu sono, esse não tem preço. Leonardo, nunca vi esse colibri, nem sei como é. Tb não sei o motivo técnico que levou à essa busca. Agora, de uma coisa eu sei com toda certeza, este software é homologado e passou por baterias de testes. É um software indicado pela Bematech. Tem milhares de clientes. Tá muito estranho isso. Ou deve ter outra coisa além por trás disso ou pode ser um soft clonado. []Os Joel [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- Internal Virus Database is out-of-date. Checked by AVG Free Edition. Version: 7.5.488 / Virus Database: 269.14.6/1061 - Release Date: 10/10/2007 08:43 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] DBGrid
no dbgrid quando clicamos com a setinha para o lado (-) ele desce uma linha, como faço para ao invés de descer uma linha rolar o scroll para o lado direito, mesmo tendo a propriedade options.rowselected = True ? Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Localizar Comando SQL dentro de uma Query
tem uma ferramenta da biblioteca JEDI se não me engano que faz uma pesquisa nos .dfm algo parecido... de uma olhada - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br Sent: Tuesday, October 02, 2007 9:22 AM Subject: RE: [delphi-br] Localizar Comando SQL dentro de uma Query Explica melhor a tua dúvida. Sds. To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Tue, 2 Oct 2007 12:17:10 +Subject: [delphi-br] Localizar Comando SQL dentro de uma Query Como que eu faço para localizar um Comando SQL dentro de uma Query noDelhpi 7 sem entrar em query por query ?Guilherme __ Veja mapas e encontre as melhores rotas para fugir do trânsito com o Live Search Maps! http://www.livemaps.com.br/index.aspx?tr=true [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.488 / Virus Database: 269.13.32/1033 - Release Date: 27/9/2007 11:06 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como apagar todos os registros de uma tabela access
tabela.close; tabela.sql.clear; tabela.sql.text:='delete from tabela'; tabela.execSql; - Original Message - From: bene20032004 To: delphi-br@yahoogrupos.com.br Sent: Wednesday, September 26, 2007 11:33 AM Subject: [delphi-br] Como apagar todos os registros de uma tabela access Como eu apago todos os registros de uma tabela access via programação ? Estou fazendo assim: tabela.close; tabela.sql.clear; tabela.sql.text:='delete * from tabela'; Esta dando este erro O provedor atual não oferece suporte para retornar vários conjuntos de registros de uma única execução... Dai eu fiz assim: tabela.open; tabela.first; while not tabela.eof do begin tabela.delete; tabela.next; end; Da o erro: Informações insuficientes ou incorretas sobre a coluna-chave muitas linhas foram afetadas pela atualização na linha while; Alguém poderia me ajudar ? Muito obrigado por enqunato ! Bene Barbosa -- Internal Virus Database is out-of-date. Checked by AVG Free Edition. Version: 7.5.484 / Virus Database: 269.12.0/959 - Release Date: 17/8/2007 17:43 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Acentos DBF
Estou tentando acessar uma tabela .dbf porém quando conecto, no meu dbgrid as palavras com acento vem diferente ex: JOÃO = JO+O o que pode ser ? Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] OFF: Desabafo - Code Gear (Delphi for php)
Bruno, fique tranquilo um simples e-mail não vai tirar seus créditos aqui na lista. Abraço! Alcione Guimarães - Original Message - From: Bruno Lichot To: delphi-br@yahoogrupos.com.br Sent: Tuesday, August 28, 2007 1:45 PM Subject: RES: [delphi-br] OFF: Desabafo - Code Gear (Delphi for php) Olha Hudson, Não sei te dizer sobre a lista de Delphi For PHP, mas nem eu e nem o Andreano criamos a lista, ela foi criada por membros da comunidade e mantida pela comunidade não temos poderes de incluir ou remover ninguém da lista. Estou muito decepcionado com seu email, pois nunca neguei auxilio para ninguém e todas as vezes que vc me solicitou eu prontamente respondi e quando não sabia corri atrás pra poder te ajudar. Eu não te removi ou fiz bloqueio no skype, é muito sério expor as pessoas assim, estou demasiadamente triste e com muita raiva de você com o que você colocou, pois uma das minhas funções é servir a comunidade e prestar o melhor serviço possível. Se você não sabe o skype estava com problemas com seus servidores e fiquei mais de uma semana e final de semana passado inteiro sem ele. Eu acredito que deveria ter entrado em contato comigo antes de fazer estas acusações infundadas. Sempre te demos apoio, o Andreano fez o componente, eu te ajudei da forma que pude e nunca te negamos nada. E agora você me vem com este email completamente infundado. O que vc ganhou com isso? Por que não passou email para nós? Ou ligou diretamente, todos sabem que não deixo de atender a ninguém. Eu espero no mínimo uma retratação com pedido de desculpas, porque me lembro de ter passado inclusive o link com a thread sobre o componente e com depoimentos de como funciona. Lamentável seu email e a forma anti-ética de posicionar de forma pejorativa na comunidade, pois ninguém tem a ver com seu problema, todos podemos ajudar e contribuir, mas por conta de uma falha no skype e me desculpe a palavra, um piti de TPM seu, nos coloca numa situação desta nos acusando de algo que não fizemos e que você não tem prova. Lamentável, simplesmente lamentável, até por que não tenho obrigação nenhuma em lhe dar meu skype ou ser obrigado a lhe atender, pois suporte é um serviço pago, tudo o que fizemos foi ajudar e num ataque de raiva sem fundamento você se presta a um papel deste. Sem mais, Bruno Lichot CodeGear Product Evangelist http://www.codegear.com http://cc.codegear.com/Author/795118 De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Hudson Enviada em: terça-feira, 28 de agosto de 2007 12:52 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] OFF: Desabafo - Code Gear (Delphi for php) Ola a todos da lista, Venho através deste meio de comunicação, informar a todos a minha indignação com a postura da equipe de engenharia da Code Gaer... Sou programador a três anos, tenho muito que aprender e para ensinar por isso participo e gosto desta lista. No ultimo lançamento da Code Gear, agradei da ferramenta Delphi For PHP, ate mesmo por programar nesta liguangem, e antes usava o Dreamweaver... Por se tratar de uma ferramenta nova, precisa de alguns ajustes. Em um projeto que ainda não terminei em Delphi for php, aonde não tinha opção de fazer upload de imagens, passei esta informação para o Andreano, aonde o mesmo criou um componente EditUploadFile, baixei e instalei. Reconheço que não sobe utiliza-lo, voltei a entrar em contato com o Andreano não consegui... Atendente da Code Gaer me passou para falar com o Bruno Lichot, aonde o mesmo me forneceu o seu Skype... A indignação: Apos tudos isso feito e adquirido e pago pela ferramenta, eles me bloqueou da lista Delphi For PHP e tambem do seus Skype, e tive que fazer o projeto tudo de novo no Dreamweaver... Reconheço também que eles são muito ocupados e não podem me explicar, mas fique indignado por eles me bloquearem da lista e skype... Só queria a solução para o meu problema e ficar mais satisfeito com a compra Exponho o meu problema de forma democrático e parcial neste caso Atenciosamente Hudson Dias www.alcancedigital.com.br MSN: [EMAIL PROTECTED] mailto:hudson_bh%40hotmail.com Skype: hudson_bh Tele: (31)3434-6304 [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 2488 (20070828) __ 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] -- Internal Virus Database is out-of-date. Checked by AVG Free Edition. Version: 7.5.484 / Virus Database: 269.12.0/959 - Release Date: 17/8/2007 17:43 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] INDY
quando uso a rotina abaixo dá o seguinte erro:
[EMAIL PROTECTED]: Recipient address rejected: Access denied
o que pode ser ?
var
smtp : TIdSMTP ;
pop : TIDPop3;
Mensagem : TIdMessage ;
begin
smtp := TIdSMTP.Create( Nil );
Pop := TIdPOP3.Create(Nil);
Mensagem := TIdMessage.Create( Nil );
pop.Host := 'pop3.uol.com.br';
pop.Username := 'alcistemas';
pop.Password := 'senha' ;
pop.Port := 110;
pop.Connect() ;
pop.Disconnect; // já tentei desconectar somente depois e também não deu certo
smtp.Host := 'smtps.uol.com.br';
smtp.Username := 'alcistemas';
smtp.Password := 'senha' ;
smtp.Port := 25;
smtp.AuthenticationType := atLogin;
smtp.Connect() ;
mensagem.From.Name := '[EMAIL PROTECTED]';
mensagem.Recipients.EMailAddresses := '[EMAIL PROTECTED]';
mensagem.Subject := 'TESTE DE EMAIL...';
smtp.Send( mensagem );
showmessage('mensagem enviada');
Alcione Guimarães
e-mail: [EMAIL PROTECTED]
Cel: 11-9515-8707
SIP VOIP: 3301040
SKYPE: alcistemas
msn: [EMAIL PROTECTED]
[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.5.484 / Virus Database: 269.12.0/959 - Release Date: 17/8/2007 17:43
[As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Firebird 1.5.4
tenho um cliente com várias estáções win98, xp e agora dois pcs com windows VISTA, o servidor é XP com Firebird 1.5.4 porém só consegui fazer a estação que está com o vista conectar o servidor instalando o Firebird 2.0 nesse pc. Há problema em a estação conectar com Firebird 2.0 e o servidor está com o Firebird 1.5.4 (XP) ??? Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] teste
quando uso a rotina abaixo dá o seguinte erro:
[EMAIL PROTECTED]: Recipient address rejected: Access denied
o que pode ser ?
var
smtp : TIdSMTP ;
pop : TIDPop3;
Mensagem : TIdMessage ;
begin
smtp := TIdSMTP.Create( Nil );
Pop := TIdPOP3.Create(Nil);
Mensagem := TIdMessage.Create( Nil );
pop.Host := 'pop3.uol.com.br';
pop.Username := 'alcistemas';
pop.Password := 'senha' ;
pop.Port := 110;
pop.Connect() ;
pop.Disconnect; // já tentei desconectar somente depois e também não deu certo
smtp.Host := 'smtps.uol.com.br';
smtp.Username := 'alcistemas';
smtp.Password := 'senha' ;
smtp.Port := 25;
smtp.AuthenticationType := atLogin;
smtp.Connect() ;
mensagem.From.Name:= '[EMAIL PROTECTED]';
mensagem.Recipients.EMailAddresses := '[EMAIL PROTECTED]';
mensagem.Subject := 'TESTE DE EMAIL...';
smtp.Send( mensagem );
showmessage('mensagem enviada');
Alcione Guimarães
e-mail: [EMAIL PROTECTED]
Cel: 11-9515-8707
SIP VOIP: 3301040
SKYPE: alcistemas
msn:[EMAIL PROTECTED]
[As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Erro Firebird no Conectiva 10
192.168.1.15:/geral/alcistemas/alcistemas.fdb' Tento conectar pelol ibexpert e dá esse erro: Connecting... Failed! Unsuccessful execution caused by a system error that precludes successful execution of subsequent statements. I/O error for file /geral/alcistemas/alcistemas.fdb'. Error while trying to open file. Permission denied. o serviço do firebird está rodando perfeitamente. Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Executável. com componente codigo de barra como gerar?
se esse código de barras, for uma arquivo de fonte. tem que copiar para pasta wndows\fonts do cliente abra a fonte com um duplo click e click no botão pronto.. - Original Message - From: marcoagvillela To: delphi-br@yahoogrupos.com.br Sent: Tuesday, July 31, 2007 10:34 AM Subject: [delphi-br] Executável. com componente codigo de barra como gerar? PUBLICIDADE Bom dia, Tenho um projeto que quando o executo em minha máquina com o Delphi aberto ele roda normalmente um componente de código de barras, mas se coloco em outra máquina o se rodo na minha sem o delphi aberto o componente não funciona, gostaria de saber como gerar tudo junto, ou se preciso de copiar algo para a pasta aonde vou executar a aplicação? Muito obrigado a todos que me ajudarem. Marco Antonio Gonçalves Vilella [EMAIL PROTECTED] -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.476 / Virus Database: 269.11.0/927 - Release Date: 30/7/2007 17:02 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Subtrair Datas
Var data: TDate; begin data := date -15; end; - Original Message - From: Ricardo Ravelli To: delphi-br@yahoogrupos.com.br Sent: Monday, July 30, 2007 2:44 PM Subject: [delphi-br] Subtrair Datas Boa Tarde, Estou com seguinte problema, tenho uma data que pego direto do servidor e preciso pegar essa data e tirar quinze dias. Ex: 30/01/2007 para 15/01/2007. Alguem sabe como posso fazer isso?? Delphi 5, MySQL. Obrigado. Ricardo Ravelli. [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.476 / Virus Database: 269.10.23/924 - Release Date: 28/7/2007 15:50 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Selecionar pasta no Windows
No delphi 7 uso assim: inisira um buttom, um edit, e da Guia Dialog insira o componente opendialog no on click no buttom que vc adicionou inisira esse código: opendialog1.Execute; edit1.text := opendialog1.FileName; Espero que ajude. Abraço! - Original Message - From: Ricardo Ravelli To: delphi-br@yahoogrupos.com.br Sent: Monday, July 30, 2007 8:12 PM Subject: [delphi-br] Selecionar pasta no Windows Boa Noite, Eu estou precisando em um programa que o usuário escolha uma pasta e queria usar a caixa de selecionar pasta do windows. Como eu faço no Delphi? Delphi 5, MySQL. Obrigado. Ricardo Ravelli. [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.476 / Virus Database: 269.10.23/924 - Release Date: 28/7/2007 15:50 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Delphi X Java
Gente me desculpe, talvez não fui feliz na minha comparação, o que eu quiz foi comparar a necessidade do veículo a realidade do solo, e não comparar valores nem velocidade... Desculpe aqueles a quem magoei... rss - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br Sent: Tuesday, July 24, 2007 11:12 PM Subject: RE: [delphi-br] Delphi X Java Se estiver dizendo que o Fuscão é o Delphi, além de comprar briga comigo, vai ter que ler as mensagens da lista. Cada ferramenta teu o seu nicho de mercado. Portanto, caro Alcistemas, de que me adianta uma Ferrari de repente um Fusca Delphi 1.0 pode servir uma estrada barrenta e enlameada cheia de irregularidades? Ponto final. To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Tue, 24 Jul 2007 19:59:14 -0300Subject: Re: [delphi-br] Delphi X Java Alcistemas Informática wrote: comparar Java com Delphi é o mesmo que comparar uma Ferrari com um Fuscão...Quem é o Fuscão? =)--Joao Morais __ Conheça o Windows Live Spaces, a rede de relacionamentos conectada ao Messenger! http://spaces.live.com/signup.aspx [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] Delphi X Java
comparar Java com Delphi é o mesmo que comparar uma Ferrari com um Fuscão... cada qual tem seu terreno adequado para ser utilizado mai que o trem é bão é. - Original Message - From: Walter Alves Chagas Junior To: delphi-br@yahoogrupos.com.br Sent: Tuesday, July 24, 2007 5:12 PM Subject: RES: [delphi-br] Delphi X Java Como existe uma famosa premissa que muitos não a seguem porque com o passar do tempo se tornam dissidentes e militantes de uma ferramenta/Tecnologia, muitos quebram a cara e depois, pra mascarar o erro que cometeram lá atrás, optam por por defeito na ferramenta. Quando formos pegar um projeto, a primeira coisa que deve ser feita é ANALISAR O SUPRACITADO. Analisar ele, não é ficar pensando quais componentes vai-se usar, se vai ser JVCL ou InforPower, Se é DBExpress ou MDO, Se vai fazer Form em MDI, SDI ou o escambal dentre muitos babados que existem por aí. É preciso que se analise QUAL É A PLATAFORMA EM QUE ESTE PROJETO VAI RODAR! Se o projeto for em um ambiente Windows (Estações 98 a XP com servidores 2K ou K3) o Delphi é pra lá de adequado a este projeto. Se o ambiente lá é DOS, de repente o Clipper é o cara. Ainda mais se o cliente já agendou a data de startar o sistema operando na empresa dele e o parque tecnológico vai ser aquele lá e pronto. Se você fizer isto no Delphi ou em Clipper, dá pra você entregrar no prazo ou estourando uns 2 a 3 dias ou mesmo uma semana de atrazo, situação que está dentro do tolerável. Agora em java? Java é tudo na mão (ou pelo menos quase tudo). Java é pesado pra certas maquinas, pode ser leve pra outras. Lógico, se a corporação trabalha toda com Unix tendo estações que variam de SO´s, Tem até um portal que deverá interagir partes dele com o sistema, e a empresa tem bala na agulha pra fazer um upgrade de servidor eu não discuto. Opto pelo multiplataforma (Vou ficar sonhando que existe uma possiblidade com o Kylix?) Agora conta no dedo quantos fazem isto! De repente seu projeto (feito no J2EEZão basico) tá pronto pra ser apresentado, Senta aquele monte de cartola lá no Datashow pra ver o mesmo funcionar. E logo no começo percebe-se que ele não tem performance satisfatória nas estações, porque o desenvolvedor entendeu que iria fazer em Java porque o Java é o bambambam e pronto! Porque o Java é melhor e pronto!. Ele não parou pra fazer o estudo da viabilidade lá atrás porque acha isso pura bobagem porque sistemas se começa do código (Jamais da análise) e agora se vê envolto em problemas que poderiam ter sido evitados. E pior, o Cliente já começa a estressar com o prazo. Por isso que eu insisto em dizer que não compete a nós dizermos quem é melhor que quem. Que o Delphi é porque o Java não é e coisas do tipo. O que compete a nós é sabermos as duas (E porque não mais) pois empresas hoje querem Analistas/Desenvolvedores com conhecimento em outras plataformas e outras ferramentas. Existe sempre a possiblidade de você ter que mexer ou ser alocado em um projeto que requeira uma linguagem específica. Coisas, que muitas vezes, o Delphi se torna inviavel nestes casos. Aí que entra seu diferencial. Antigamente tinha sempre um perguntando quem era melhor, se era o Delphi ou o VB, agora mudaram o disco: Delphi ou Java? Vamos ver daqui uns 5 anos quem vai ser a bola da vez Delphi versus quem? []s Walter Alves Chagas Junior Projeto e desenvolvimento de sistemas Telemont Engenharia de telecomunicações S/A Belo Horizonte - MG - Brasil [EMAIL PROTECTED] Fone: (31) 3389-8217 Fax: (31) 3389-8215 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Andreano Lanusse Enviada em: terça-feira, 24 de julho de 2007 16:33 Para: delphi-br@yahoogrupos.com.br Assunto: RE: [delphi-br] Delphi X Java Se criou uma ilusão de que java é gratuito, que as ferramentas são gratuitas e assim vai, só que as empresas já viram o tamanho da conta que é desenvolver em Java. Só alguns exemplos: 1 - Pensam que as ferramentas são gratuitas - mas quando precisam usar gastam $$$ em consultorias e treinamento para aprender a ferramenta 2 - Quando criam aplicações J2EE - os servidores de aplicação são caros, tem open source, mas você paga por isso. 3 - Arquitetura em Java - existem dezenas de maneiras diferentes de se fazer uma aplicação, milhares de fraeworks e assim por diante, se você erra em arquitetura em um aplicação java de missão crítica, a conta vai ser bem alta. Está muito claro que ouve uma transferência de investimento de ferramenta para serviço, só que essa transferência está saindo muito cara, desenvolvimento em JAVA é muito caro. Sim é multi-plataforma, se você precisa de multi-plataforma é uma solução, mas tem seu preço. O que comentaram que um programador Delphi que vai para Java, ele volta rapidinho e se não volta por que a empresa precisar usar java ou algo assim, se perguntar ele vai te falar, Delphi
Re: Re:[delphi-br] Re: Desabilitar e Esconder o Relogio do Windows
tenho um sistema que captura a hora de entrada do funcionário.. .ele passa o crachá num P166 hehe... Utilizo a data do servidor e tem dado certo.. // pega a data e a hora do servidor qy_033.close; qy_033.sql.clear; qy_033.sql.add(select current_time as hora, current_date as data from RDB$DATABASE); qy_033.Open; - Original Message - From: Julio Cesar To: delphi-br@yahoogrupos.com.br Sent: Saturday, July 14, 2007 1:59 PM Subject: Re: Re:[delphi-br] Re: Desabilitar e Esconder o Relogio do Windows acho q a gravacao de data e hora nesse tipo de lancamento deve ser adicionada no servidor de dados, dai nao faz diferenca se o usuario alterar ou nao o horario e data da maquina Julio Cesar +353 87 2184139 +353 (0)91 630317 - Original Message - From: [EMAIL PROTECTED] To: delphi-br Sent: Saturday, July 14, 2007 5:05 PM Subject: Re:[delphi-br] Re: Desabilitar e Esconder o Relogio do Windows E se o usuario alterar Data/hora via DOS ???... como fica seu programa ? Seria interessante voce gravar em um arquivo a Data/Hora do ultimo movimento e nao deixar alguem fazer lancamentos com Data/Hora inferior ao ultimo lancamento. Amigos, consegui esconder o relogio da taskbar, porem ainda falta desabilitar o relogio no painel de controle. Alguem poderia dar uma ajuda sobre como desabilitar o painel de controle? Grato! []´ Paulo [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]
Re: [delphi-br] ORA-06502 - Ajuda URGENTE
os parâmetros monetários da procedure está passando como ?
.value ou .asFloat ?
use .asFloat
- Original Message -
From: titofeiu
To: delphi-br@yahoogrupos.com.br
Sent: Saturday, July 14, 2007 9:36 PM
Subject: [delphi-br] ORA-06502 - Ajuda URGENTE
Boa Noite Pessoal,
estou fazendo uma aplicação Delphi x Oracle, e criei uma procedure
para Inserir, Alterar e Excluir em uma tabela SIMPLES, que contem
apenas o CODIGO e NOME
e no Delphi estou utilizando o componenten SQLStoredProc, para
acessar a Procedure e enviar os dados para que seja executado a
procedure.
A procedure está funcionando corretamente, pois fiz os testes pelo
SQL Navigator, sendo que pelo Delphi dá o seguinte erro
ORA-06502: PL/SQL: erro: erro de conversão de caractere em número
numérico ou de valor
ORA-06512: em line 1'
Na procedure tem os seguintes campos...
PROCEDURE EMPRESA_IAE
( vTipo in Char,
vCodigo in EMPRESA.cod_empresa%TYPE,
vNome in EMPRESA.nome%TYPE)
AS
...
Então no DELPHI estou fazendo assim
DM.SQLProcEmpresa.ParamByName('vNome').Value := 'TESTE';
DM.SQLProcEmpresa.ParamByName('vCodigo').Value := 5;
DM.SQLProcEmpresa.ParamByName('vTipo').Value := 'I';
DM.SQLProcEmpresa.ExecProc;
Para que eu possa testar... e não funciona... da o erro que eu
mencionei acima...
Me ajudem por favor... pois não sei mais o que fazer...
Desde já agradeço
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] ORA-06502 - Delphi
tente assim
DM.SQLProcEmpresa.ParamByName('vTipo').AsString := 'I';
DM.SQLProcEmpresa.ParamByName('vNome').AsString := 'TESTE';
DM.SQLProcEmpresa.ParamByName('vCodigo').AsInteger := 5;
DM.SQLProcEmpresa.ExecProc;
- Original Message -
From: Ribamar Sousa
To: delphi-br@yahoogrupos.com.br
Sent: Saturday, July 14, 2007 9:27 PM
Subject: [delphi-br] ORA-06502 - Delphi
Boa Noite Pessoal,
estou fazendo uma aplicação Delphi x Oracle, e criei uma procedure para
Inserir, Alterar e Excluir em uma tabela SIMPLES, que contem apenas o CODIGO e
NOME
e no Delphi estou utilizando o componenten SQLStoredProc, para acessar a
Procedure e enviar os dados para que seja executado a procedure.
A procedure está funcionando corretamente, pois fiz os testes pelo SQL
Navigator, sendo que pelo Delphi dá o seguinte erro
ORA-06502: PL/SQL: erro: erro de conversão de caractere em número numérico ou
de valor
ORA-06512: em line 1'
Na procedure tem os seguintes campos...
PROCEDURE EMPRESA_IAE
( vTipo in Char,
vCodigo in EMPRESA.cod_empresa%TYPE,
vNome in EMPRESA.nome%TYPE)
AS
...
Então no DELPHI estou fazendo assim
DM.SQLProcEmpresa.ParamByName('vTipo').Value := 'I';
DM.SQLProcEmpresa.ParamByName('vNome').Value := 'TESTE';
DM.SQLProcEmpresa.ParamByName('vCodigo').Value := 5;
DM.SQLProcEmpresa.ExecProc;
Para que eu possa testar... e não funciona... da o erro que eu mencionei
acima...
Me ajudem por favor... pois não sei mais o que fazer...
Desde já agradeço
__
Novo Yahoo! Cadê? - Experimente uma nova busca.
http://yahoo.com.br/oqueeuganhocomisso
[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] Re: Novato...
se for quickreport... click no relatório mesmo, não nas bandas E Seta o Data set corretamente... - Original Message - From: Carlos Magno To: delphi-br@yahoogrupos.com.br Sent: Monday, July 16, 2007 10:52 AM Subject: Re: [delphi-br] Re: Novato... Olá pessoal, O meu caso anterior foi resolvido com ListForm.bd.campo.AsString. Estou com outro probleminha. Na minha impressao deste BD só imprime o ultimo registro. Alguém sabe porque? desde já agradeço. um gde abraço, Carlos Magno Em 02/07/07, Carlos [EMAIL PROTECTED] escreveu: Você pode converter esta string para um inteiro. ex.: if(StrToInt(mCampo.Value) = 1) then Espero ter ajudado. Fraterno abraço. Carlos --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br, Logos [EMAIL PROTECTED] escreveu pegue pelo campo copy(campo.asstring,1,1) - Original Message - From: Carlos Magno To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Monday, July 02, 2007 11:28 AM Subject: Re: [delphi-br] Novato... Coloquei este codigo, na complilação nao deu erro, mas na execução da o seguinte erro: Proj .exe raised exception Class EConverterError with message ''I' is not valid integer value. grato pela atenção, Magno Em 02/07/07, Alcistemas Informática [EMAIL PROTECTED] escreveu: VAR POS1:Char; POS2:Char; POS3:Char; etc.. BEGIN POS1:=copy(Campo.text,1,1); POS2:=copy(Campo.text,2,1); POS3:=copy(Campo.text,3,1); etc... - Original Message - From: crsmagno To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.brdelphi-br%40yahoog rupos.com.br Sent: Monday, July 02, 2007 8:30 AM Subject: [delphi-br] Novato... Olá pessoal, Estou começando a trabalhar com delphi 7, e esbarrei em varios problemas, entre eles o que me fez parar. Tenho um campo do tipo alfanumerico em BD, de tamanho 6(01). Preciso testar cada posição. se é 1 se é 2 se é 3... para isso eu preciso extrair a posição para uma variavel do tipo string. Alguém pode me ajudar? Um abraço, Magno -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.476 / Virus Database: 269.9.14/883 - Release Date: 1/7/2007 12:19 [As partes desta mensagem que não continham texto foram removidas] -- um abraço, Carlos Magno [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.476 / Virus Database: 269.9.14/883 - Release Date: 1/7/2007 12:19 [As partes desta mensagem que não continham texto foram removidas] -- um abraço, Carlos Magno [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] Ajuda
o cam studio é Free... baixe em: http://www.camstudio.org/ - Original Message - From: Ricardo César Cardoso To: delphi-br@yahoogrupos.com.br Sent: Friday, July 13, 2007 3:29 PM Subject: Re: [delphi-br] Ajuda Boa tarde, amigo Procura por Camtasia ou Camstudio. Sei que um deles é freeware, mas não me lembro qual. Sds, Ricardo Adenes I. Freire Junior [EMAIL PROTECTED] escreveu: Alguém poderia me indicar onde posso baixar gratuíto um programa tipo Auto Screen Record, possuo um mais não grava vos. -- --- avast! Antivirus: Outbound message clean. Virus Database (VPS): 000756-1, 13/07/2007 Tested on: 13/7/2007 15:09:26 avast! - copyright (c) 1988-2007 ALWIL Software. http://www.avast.com [As partes desta mensagem que não continham texto foram removidas] _ - Novo Yahoo! Cadê? - Experimente uma nova busca. [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] Ajuda
o cam studio é Free... baixe em: http://www.camstudio.org/ - Original Message - From: Adenes I. Freire Junior To: delphi-br@yahoogrupos.com.br ; FireBase ; [EMAIL PROTECTED] Sent: Friday, July 13, 2007 3:09 PM Subject: [delphi-br] Ajuda Alguém poderia me indicar onde posso baixar gratuíto um programa tipo Auto Screen Record, possuo um mais não grava vos. -- --- avast! Antivirus: Outbound message clean. Virus Database (VPS): 000756-1, 13/07/2007 Tested on: 13/7/2007 15:09:26 avast! - copyright (c) 1988-2007 ALWIL Software. http://www.avast.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] Sintegra....
Implementei no meu sistema uma rotina para gerar os registros do sintegra, está tudo ok, gera arquivo, valido pelo validador do sintegra, não encontra nenhum erro.. etc... Gostaria de saber, se para meu cliente utilizar tal recurso eu preciso levar o sistema a Receita Federal, Posto Fiscal ou coisa parecida ? A princípio entrei no site do posto fiscal e fiz um cadastro no site do meu aplicativo e mais nada. Está faltando algo legalmente falando ? Alcione Guimarães e-mail: [EMAIL PROTECTED] Cel: 11-9515-8707 SIP VOIP: 3301040 SKYPE: alcistemas msn:[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Erro de configuração regional....
Se não tiver acrescente SysUtils na uses principal
Coloque isso no oncreate do seu form principal
if DecimalSeparator = '.' then
begin
showmessage('Não é aceito o ponto como símbolo decimal! Altere as
propriedades em Painel de Controle, Configurções Regionais.');
application.Terminate;
end;
if ThousandSeparator = ',' then
begin
showmessage('Não é aceito vírgula como símbolo de agrupamento de dígitos!
Altere as propriedades em Painel de Controle, Configurções Regionais.');
application.Terminate;
end;
if uppercase(shortdateformat) 'DD/MM/' then
begin
showmessage('Formato da data inválido, mude de: '+shortdateformat + '
para: dd/mm/, em Painel de controle, configuracoes regionais e de idioma');
application.terminate;
end;
- Original Message -
From: Tatu
To: Delphi-Br
Sent: Wednesday, July 11, 2007 7:32 PM
Subject: [delphi-br] Erro de configuração regional
estou com um problema serio e nao consigo encontrar de onde está sendo
gerado o erro..
TEm vezes que sem mais o computador do usuario (nem sempre o mesmo),
muda as configurações regionais e quando vou inserir um dado o valor
234,34 se transforma em 23434 ou 234,3 se transforma em 2343. Logo
reparei que quando mostrado na tela os numeros anteriores estavão
visualmente 234.34 (sem a virgula decimal) ou 234.3 Acontece que no meu
aplicativo nao tenho nada que mude as configurações regionais, portanto
este erro fica dificil de ser encontrado, utilizo 2 dll externas, uma a
dll do sintegra.gov.br para verificar Inscrição Estadual e outra a libpq
para me conectar com o Postgresl. Este erro está me causando serios
problemas de confiabilidade no sistema.
Agradeceria se alguem teve experiencias similares e qual fora a solução.
Grato,
Santiago
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
