Uma maneira básica, existe maneiras mais rápidas e/ou mais inteligentes..
rsrs segue:
function TemIP(par_IP:String):Boolean;
var
var_Texto:TStringList;
Begin
var_Texto := TStringList.Create;
var_Texto.LoadFromFile('C:\MEULOG.TXT');
Result := (Pos(par_IP,var_Texto.Text)0);
Sim já tenho certificado do tipo A1 comprado no Serasa, ja esta obrigada a
emitir NF-e apartir de setembro e pesquisei no site do sefaz do estado e
consta o cnpj empresa já credenciada no ambiente de testes.
2009/8/5 Djean Rodrigo Miranda Figueira figue...@sinerp.com.br
Vc já tem o
Comigo aconteceu isso também após instalar a última versão,
e nunca mais conectou, ainda não sei o que é.
[]s
alexandre
- Original Message -
From: Samuel M. Basso
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, August 05, 2009 8:09 AM
Subject: Re: [delphi-br] NF-e
Cara tem um componente opensource muito bom, ACBr, tem desde componentes
para Cupom fiscal, TEF, até NFe.
http://acbr.sourceforge.net/drupal/
Vlw
2009/8/5 Heraldo Andrade heraldo_andr...@yahoo.com.br
Pessoal, tenho um programa instalado que o clientye agora vai precisar
emitir nota
De uma lida na Edição 108 da clube delphi deste mês, salvou o meu pescoço, fala
sobre o componente open source ACBrNFe Componente para Nota Fiscal Eletrônica
e como ele funciona, vale a pena, alem da legislação sobre o assunto.
Rodrigo Figueira
--- Em delphi-br@yahoogrupos.com.br, Heraldo
Ele quer saber qual a versão do Excel está instalado no computador e não como
instanciá-lo, via código, não??
[]s
Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
wchag...@bol.com.br
http://www.geocities.com/SiliconValley/Bay/1058
http://delphitocorporerm.blogspot.com/
MSN:
WinExec não se usa mais, até a Microsoft relatou que nas futuras versões
não vai dar suporte para o WinExec, o negócio é usar o ShellExecute como
você mostrou...
Silvio Clecio escreveu:
Em 5/8/2009 08:16, Carlos escreveu:
Estou desenvolvendo uma aplicação, e coloquei uns atalhos para
Filippe,
Tente algo assim:
Function Checa_IP(IP : String = '') : Boolean;
var
iPos : Integer;
aTexto : tStringList ;
begin
aTexto := tStringList.Create;
aTexto.LoadFromFile('MeuArquivodelog.txt');
iPos := aTexto.Indexof(IP);
FreeAndNil(aTexto);
Result iPos -1;
end;
Olá,
Estou fazendo um select com duas tabelas utilizando a opção UNION. Em alguns
campos faço um cast pois cada tabela tem um nome diferente no campo. Veja o
script:
SELECT CLIENTE, VENCIMENTO, CAST(SALDO_RECEBER AS FLOAT) AS VALOR_FINAL FROM
CONTASRECEBER WHERE VENCIMENTO BETWEEN :VInicio
Simples, logo após o SELECT de cada parte da instrução, insira CAST('CR' AS
VARCHAR(02)) para CR e CAST('CP' AS VARCHAR(02)) para CP.
Abs e boa sorte...
Rodinei Amorim
Programador Delphi
(11) 8208-9503
rodinei_amo...@hotmail.com rodinei.amo...@terra.com.br
From: valdirdill
Sent: Thursday,
valdirdill,
Acrescente uma coluna com o tipo:
SELECT CLIENTE, VENCIMENTO, CAST(SALDO_RECEBER AS FLOAT) AS VALOR_FINAL,
Cast('EM ABERTO' as Varchar(10)) as TIPO FROM CONTASRECEBER WHERE VENCIMENTO
BETWEEN :VInicio AND :VFim
UNION ALL
SELECT CLIENTE, VENCIMENTO, CAST(VALOR_RECEBIDO AS FLOAT) AS
Para começar você não precisa fazer cast para renomear colunas, basta usar AS,
CAST é para converter o tipo do campo.
Para identificar de qual tabela é o registro, basta colocar mais um campo
identificando, assim:
SELECT '1' AS TIPO, CLIENTE, VENCIMENTO, SALDO_RECEBER AS VALOR_FINAL FROM
Olá Pessoal
Alguém sabe como hibernar o windows 2000 via programação Delphi?
Obrigado!
ìAdilson Nunes Fernandes
(MG 55+37 9958-5087
* mailto:tur...@oficinadaimagem.com.br adil...@qiinformatica.com
8 www.qiinformatica.com http://www.qiinformatica.com/
[As partes
Obrigado.
Valdir
- Original Message -
From: Rodinei
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, August 06, 2009 8:08 AM
Subject: Re: [delphi-br] Ajuda com Select Utilizando Union All e Cast
Simples, logo após o SELECT de cada parte da instrução, insira
Obrigado.
Valdir
- Original Message -
From: Moacir - GMail
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, August 06, 2009 8:09 AM
Subject: Re: [delphi-br] Ajuda com Select Utilizando Union All e Cast
valdirdill,
Acrescente uma coluna com o tipo:
SELECT
Bom dia pessoal.
Na empresa onde trabalho, já temos um certificado A3
que fica conectado com a máquina que faz o envio
da NFe através do programa disponibilizado pela receita.
Como estou tentando implementar o envio via ACBrNFe
e não tenho outro certificado A3, gostaria de saber se
existe alguma
Olá,
Gostaria da opinião dos colegas que desenvolvam software de gestão e que nele
tenha opção de alteração e/ou opção de devolução/troca de produtos no módulo de
vendas (alguns preferem chamar de pedido. Eu acho melhor vendas).
Muito bem, a questão é a seguinte: ao se gravar uma venda, no
Sem chance!
Sds.
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de leoj...@yahoo.com.br
Enviada em: quinta-feira, 6 de agosto de 2009 04:37
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] NF-e / ACBrNFe
Bom dia pessoal.
Na empresa onde trabalho, já
Não vi nenhum erro no código, a linha 471 diz o que? o que tem nessa linha?
Marcos Abreu Ferreira escreveu:
Pessoal,
fiz uma função básica para leitura de arquivo texto e de repente não
consigo mais compilar o programa. Alguem ja passou por isso? Segue o
código fonte
if
__ Informação do ESET Smart Security, versão da vacina 4311
(20090806) __
A mensagem foi verificada pelo ESET Smart Security.
http://www.eset.com
[As partes desta mensagem que não continham texto foram removidas]
Security, versão da vacina 4311
(20090806) __
A mensagem foi verificada pelo ESET Smart Security.
http://www.eset.com
[As partes desta mensagem que não continham texto foram removidas]
--
Leandro, MuTukA
[As partes desta mensagem que não continham texto foram removidas]
Pesquise sobre NFe.
Mas vou adiantar algo, prepare o coracao rsrsrsrs !!!
Parece que o componente ACBR tem algo para isso, desenvolvi uma solucao
para uma empresa em C#, so nao mando o codigo por que foi desenvolvido
apenas para a empresa.
Eduardo
Heraldo Andrade escreveu:
Pessoal,
descobri o erro depois que tinha mandado o email. Tinha criado um TMenuItem com
o nome 'Reset' e ai o Delphi não entendia direito. Isso é o que dá criar
variaveis com nomes reservados, no fim do dia, onde você já está cansado, a
cabeça já não raciocina direito.
Att,
Marcos A. Ferreira
São
Samuel,
como eu relatei, comigo estava acontecendo a mesma coisa,
hoje instalei o certificado A1 de um cliente e configurei no monitor o numero
de série dele e funcionou corretamente,
conectou e testou positivamente.
[]s
alexandre
- Original Message -
From: Samuel M. Basso
Eu entendi que ele queria saber qual a versão para poder localizar o diretório
e depois executar a partir deste.
rsrs...
Rodinei Amorim
Programador Delphi
(11) 8208-9503
rodinei_amo...@hotmail.com rodinei.amo...@terra.com.br
From: Walter Chagas (Bol)
Sent: Wednesday, August 05, 2009 10:40
Boa noite, como faço para o DbCtrlGrid não permitir Incluir/Apagar
Antonio C. de M. Pires
Arrobba Sistemas
mailto:desenvolvime...@arrobbasistemas.com.br
desenvolvime...@arrobbasistemas.com.br
Telefones: (42) 8402-8549
(42) 9105-5120
[As partes desta mensagem que
Tem duas propriedades
AllowInsert,
AllowDelete,
seta elas para false
espero ter ajudado
falow
2009/8/6 Arrobba Sistemas del...@arrobbasistemas.com.br
Boa noite, como faço para o DbCtrlGrid não permitir Incluir/Apagar
Antonio C. de M. Pires
Arrobba Sistemas
Realmente não sei o que esta acontecendo, tem mais gente que tem o mesmo
problema, eu ainda nao descobri. Tenho o ACBrNFeMonitor na verssão 0.5.0a
PCN, e não tem jeito, uma coisa que vi que nele foi tirado é a opcao de
configurar proxy, mas como fiz testes sem proxy em casa esse nao deve ser o
28 matches
Mail list logo