coloque a programação dentro de um item de programação da banda masterdata1
como por exemplo
Selecione um memo1(Tfrxmemo), da um F11 para abrir a janela de eventos e
coloque sua programação no evento onafterdata e faça o teste!
valeu!
rod
Em Fri, 07 May 2010 08:19:12 -0300, joao_jma joao_
)
Tambem deixe este bat na area de trabalho (atalho) caso ocorra novamente.
Abraços
Rod
Em Mon, 22 Feb 2010 10:13:07 -0300, Pedro Vagner Rossi
phrossi2...@yahoo.com.br escreveu:
Olá a todos
Pessoal, nao sei se o problema esta no meu sistema, mas vou explicar o
que está acontecendo
Tenho um
']:='F';
NodeReus.ChildNodes['parte'].ChildValues['tipoParte']:='PAS';
memo1.Lines.Text := xml.GetText;
end;
finally
FreeAndNil(xmldoc2);
end;
end;
--
Rod
http://www.radiobrgospel.com Você conectado com o som do Céu!
[As partes desta mensagem que não continham texto foram removidas
.
Lembrando que o objetivo do CNJ é que seja gerado os dois dígitos
verificadores, depois validar se o número está correto, e o objetivo da
lista é colaborar uns com os outros.
Abraço a todos
Rod
Em Thu, 17 Dec 2009 10:52:38 -0200, Robson - GMail aguiar
;
End;
except
end;
End;
Você pode chamar da seguinte forma:
LimparCampos(Self);
Abraços
Rod
Em Thu, 17 Dec 2009 09:49:47 -0200, Jefferson Eduardo
je.del...@yahoo.com.br escreveu:
Pessoal, bom dia!
Tenho um programa no delphi e quando clico no botão salvar, ele limpa
os dados
Agradeço a todos pela colaboração!
Descobri uma função pronta num site francês e outro em chinês, e esse alg.
é feito também pelos bancos (dígito verificador do boleto).
Um grande abraço a todos
Rod
Em Tue, 15 Dec 2009 20:53:19 -0200, Fellipe Henrique felli...@gmail.com
escreveu:
Bom
Valeu Rubem!
Vou testar o código aqui!
Abraços
Rod
Em Wed, 16 Dec 2009 14:14:14 -0200, Rubem Rocha
rubem.ro...@dtmanaus.com.br escreveu:
Com base no documento mencionado, escrevi as seguintes funções em Object
Pascal.
function CalculaMod97(NumeroProcesso: longint; Ano, OrgaoJTR
Olá a todos
Trabalho com sistema jurídico de distribuição de processos judiciais e o
CNJ determinou que fosse gerado um único número por processo, através de
uma combinação de valores, calculando o dígito verificador através do alg.
Módulo 97 base 10 (norma iso 7064).
Alguém tem essa função
-0200, Evandro Siqueira vans...@gmail.com
escreveu:
Eh cara, acho que tu tá viajando na maionese... botaram maconha no teu
café da manhã, foi??? Oh louco!!! O Nome da menina é MARIA das Graças...
Cara... eu acho que tu tá precisando de umas férias... tá muito
estressado!!!
--
Rod
http
Cardosi, valeu pelas informações!
Creio que vou esperar mais um tempo ainda, esperar amadurecer o projeto ou
ainda uma posição da Embarcadero.
obrigado a todos!
Rod
Em Thu, 08 Oct 2009 15:56:14 -0300, cardoso_acb cardoso_...@yahoo.com.br
escreveu:
Oi Rod,
Estou convertendo as minhas
Experimente Página [Page#] de [TotalPages#]
abraços
Rod
Em Tue, 06 Oct 2009 08:43:34 -0300, Guilherme Ventura de Souza
ventur...@gmail.com escreveu:
Pessoal, alguém aí já passou por isso, o código para mostrar a numeração
de página que estou usando eh o seguinte:
Página [Page] de
procedure TF_Clientes.Button1Click(Sender: TObject);
var
chave : string;
begin
chave := f_clientes.RzDBEdit3.text;
//teste esse ou o outro
winexec (PAnsiChar('\cicero\diauni\project1.exe' +chave) ,sw_normal);
winexec (PAnsiString('\cicero\diauni\project1.exe' +chave)
Boa tarde a todos!
Alguém já conseguiu migrar de algum delphi =2007 para 2010?
Sei que tem que trocar de string para AnsiString, mas, alguém conseguiu
com sucesso?
Atenciosamente
Rod
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver
faça uma validação, e se a data for em branco, salve como Nulo
if (date '') then
dm.qyrecbto.FieldByName('UPGTO').AsDateTime := Date
else
dm.qyrecbto.FieldByName('UPGTO').value := null;
Em Mon, 28 Sep 2009 14:45:48 -0300, auriston.delphi
auriston.del...@yahoo.com.br escreveu:
Salve
Sim, este componente:
Advanced Import Component v3.1.0.7 Full Source
http://www.ccrun.com/view.asp?id=254
Advanced Export Component v4.1.0.7
http://www.ccrun.com/view.asp?id=204
Antes de compilar e instalar, entre na pasta languages de cada um deles,
escolha PortugueseBR e clique nos dois
o firebird não reconhece valoes como aspas dupla ,
mas você poderia fazer isso também:
qryConsultas.close;
qryConsultas.sql.clear;
qryConsultas.sql.add('select * from clientes where cliente=
'+QuotedStr('sim')+')');
qryConsultas.open;
ou ainda:
qryConsultas.close;
16 matches
Mail list logo