Pessoal,
Independente de tudo, mas tudo mesmo, o Douglas (que fez o anuncio que
gerou toda esta thread) foi corretissimo ao colocar o anúncio e já
informar o salário.
Não entro no mérito se é muito ou pouco, adequado ou não a região dele,
mas sim ao fato de ele ter deixado bem claro a faixa
Julio,
Eu migraria pro 7 sem nem pestanejar..
Mesmo sendo ultrapassado, descontinuado, execrado pelo pessoal da
Embarcadero, é NA MINHA OPINIÃO, a melhor versão do Delphi que já
lançaram. Alem de ter zilhoes de componentes compativeis e em permanente
atualização (esqueceram de avisar as
Walter,
Acredito que o StringReplace resolva a parada sem problemas:
MeuTextoCorrigido := StringReplace(MeuTexto,',',';',[rfReplaceAll]);
Sucesso !!
Moacir
Em 13/07/2010 17:09, Walter Chagas (Bol) escreveu:
é mas e a virgula dos valores decimais??
É um enigma essa parada daí.
[]s
Walter,
Então a Embarcadero não esta fazendo a parte dela no que tange a própria
divulgação enquanto empresa e seus produtos...
Sucesso !
Moacir
Em 08/07/2010 22:25, Walter Chagas (Bol) escreveu:
O problema maior é que não há muita divulgação do delphi atualmente. Pra voce
ter uma
Elaine,
Use o Style da view do proprio grid para isto..
ContentOdd ou ContentEven
Sucesso !!
Moacir
Em 06/07/2010 10:23, Murilo Cunha escreveu:
Elaine,
Ainda nao deu certo!!
Será que estah faltando alguma coisa?
Poderia me enviar um exemplo?
Obrigado
MuriloCunha
escreveu:
Moacir,
De-me mais detalhes (exemplos).
Nao estou conseguindo fazer este grid zebrado (de acordo com valores das
celulas, nao linhas impares ou pares).
Obrigado
MuriloCunha
On 06/07/2010 10:33, Prisma - GMAIL wrote:
Elaine,
Use o Style da view do proprio grid para isto
Levy,
Faça esta alteração, acredito que deva resolver teu problema.
if not BD.Conexao.Connected then
BD.Conexao.Connected := True;
try
if not BD.Conexao.Intransaction then
BD.Conexao.StartTransaction;
BD.Query01.Close;
BD.Query01.SQL.Clear;
BD.Query01.SQL.Add(
Levy,
Sua base esta na web, pelo que vi em sua outra mensagem.
Faça o seguinte:
- Abra a conexão
- Faça as operações desejadas
- Feche a conexão
Caso vc precise apresentar os dados do site no teu sistema:
- conecte
- faça o select desejado, transfira os dados para um clientdataset ou
para
Rubem,
Convivo com os mesmos problemas aqui em Porto Alegre.
Mas é bom saber que existem exceções.
Sucesso !
Moacir
Em 17/06/2010 11:01, Rubem Rocha escreveu:
Discordo de você quando diz que fui infeliz em meu comentário. A experiência
mostra que muitos contadores não possuem o devido
Evaldo,
Use esta que adaptei do PHP:
function Explode(delimiter:string; source:string) : TStringList;
var
c : word;
begin
Result:=TStringList.Create;
c:=0;
while source'' do
begin
if Pos(delimiter,source)0 then
begin
Bom Dia amigos da lista.
Gostaria de saber como fico sabendo os locais que promovem treinamento
Embarcadero, preferencialmente em Santa Catarina mesmo.
Só perguntei porque procurei muito e só achei em outros estados.
Obrigado
[As partes desta mensagem que não continham texto foram
www.aquasoft.com.br
From: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] On Behalf Of gmail
Sent: quarta-feira, 12 de maio de 2010 09:50
To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Opa !!
Quer dizer que pra me conectar com qualquer banco de dados utilizando
ZEOS não preciso de DLL´s ??
Acredito que vc esteja errado.
Eric, as DLL´s necessárias para a conexão com os seus respectivos bancos
de dados vc encontra no subdiretorio LIB da instalação do ZEOS.
Sucesso !!
Alessandra,
Tente assim:
SELECT NOME,SEXO FROM CLIENTE WHERE SEXO not in ('F','M')
Sucesso,
Moacir
Em 22/04/2010 22:23, alessandra porto escreveu:
Peguei um banco velho de cadastros de clientes
que possui uma serie de erros e preciso
pesquisar todos os clientes que estão cadastrados
Um pequeno comentário:
Todos aqui ajudam de maneira gratuita e dentro do tempo que dispõe para
isto.
O trabalho de moderação, acredito, seja feita nos mesmos moldes..
Portanto, sejamos pacientes.
Sucesso a todos !
Moacir
Em 19/04/2010 09:06, Walter Chagas (Bol) escreveu:
Só lembrando que
Owarruma a data do seu micro vai22/11/2009, ninguém merece...
Em 22/11/2009 01:16, Dirlei escreveu:
Eu não faço testes automatizados em Delphi, mas usaria o DUnit se
fizesse.
Para testes visuais (de interface) não se recomenda testes automatizados
e sim um testador humano.
[
Eduardo,
Coloque um painel ali e dentro do painel o teu bitmap.
Moacir
Em 04/04/2010 22:49, Eduardo Silva dos Santos escreveu:
Olá pessoal, alguém tem alguma dica de como exibir um bitmap naquela área do
PageControl? área após o última aba.
segue imagem para ilustrar:
Após enviar a nota use ACBrNFe1.NotasFiscais.Items[0].SaveToFile;
André F. Moraes
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Filippe Maymone
Enviada em: quarta-feira, 31 de março de 2010 09:00
Para: delphi-br@yahoogrupos.com.br
Dimas,
Veja se esta função escrita em Delphi te ajuda ai.
function MostraIdade(dData : tDateTime = 0 ; dDataAtual : tDateTime = 0
) : string ;
var
iAnoIdade,
iMesIdade,
iDiaIdade,
iAnoAtual,
iMesAtual,
iDiaAtual : Integer;
iAno,
iMes,
iDia : Integer;
begin
Dimas,
Mas se tens a rotina em Delphi porque não a adaptas para uso com Firebird ??
A sintaxe no firebird e praticamente a mesma..
Veja como fica o exemplo que te mandei:
SET TERM ^ ;
CREATE OR ALTER PROCEDURE CALCULAIDADE (
ddata date = current_date,
ddataatual date = current_date)
Boa tarde a todos. Estou precisando imprimir etiquetas em impressora
térmica argox. Localmente já estou com o software 100%.
Meu problema começa que meu software roda em WTS e não sei como setar a
porta que localmente é LPT1.
Já tentei a porta (Ex TS008) e o nome da impressora (Ex ArgoxPPLA em
Eduardo,
Tente usar a função QuotedStr:
QryInsert.SQL.Text := ' insert into tabela (CAMPO1, CAMPO2) values (0,
'+QuotedStr(HTML)+') ';
Sucesso !!
Moacir
Em 25/03/2010 10:13, Alemão escreveu:
Olá Eduardo.
Também não funciona desta maneira... Acho que é pq o HTML ja tem as aspas
em seu
Veja http://www.devmedia.com.br/articles/viewcomp.asp?comp=15914
André F. Moraes
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Dimas Bolognani
Enviada em: segunda-feira, 22 de março de 2010 07:49
Para: automacaoto...@yahoogrupos.com.br
Cc:
Está aí uma boa pergunta!
Pq não uma política de preços que possam ser pagos pelas pequenas
empresas? Se existisse isso, com certeza sempre me manteria minhas
versões atualizadas. Além disso, poderiam ter formas de pagamentos
amigáveis para pequenas empresas. A Embarcadero poderia lançar uma
Marcos,
Tente usar esta função para fazer o split dos dados:
function Explode(delimiter:string; source:string) : TStringList;
(*
// Name : Explode
// Purpose : each of which is a substring of string formed by splitting
it on
// boundaries formed by the string delim. It does not support PHP's
//
Ralp,
Aparentemente as aspas duplas indicam que aqueles dados são textos e os
campos sem aspas duplas são numéricos:
Veja se esta função aqui te ajuda com este teu problema:
function Explode(delimiter:string; source:string) : TStringList;
(*
// Name : Explode
// Purpose : each of which is a
Fellipe,
Humm..
Meu D7 ainda não foi notificado disto ou esqueceu de ler o blog do
Andreano, pois funciona PERFEITAMENTE no W7 32 e 64 bits.
Sucesso !
Moacir
Em 23/02/2010 20:25, Fellipe Henrique escreveu:
Bom amigos é o seguinte, como o próprio Andreano já disse, o único delphi
Bom dia a todos.
Preciso saber se alguem tem ou conhece um software (via web) para a aplicação
de autos de infração por sonegação de ISS.
O Software porecisa dessas funcionalidades mínimas.
SISTEMA DE LEVANTAMENTO DE OPERAÇÕES DE ARRENDAMENTO MERCANTIL -
FUNCIONALIDADES
CADASTRO DE
Alessandra,
O problema parece estar no teste:
if (DATA + NDIAS) = now then, pois se a soma não resultar exatamente
na data e hora atual não funciona !
troque por
procedure TDm.Cds_FinanceiroCalcFields(DataSet: TDataSet);
begin
if (Cds_FinanceiroDTA_PEDIDO.AsDateTime +
Outra opção seria o WAMP (embora seja especifico para a plataforma Windows)
www.wampserver.com/en/download.php
Sucesso !
Moacir
Em 04/02/2010 14:46, Marcos Bernardo escreveu:
Eu ja tive muitos problemas com isso... versão.. instalação entre apache e
php e mysql...
uma sugestão...
acabei
PessoALL,
Estou precisando imprimir etiquetas numa impressora ZEBRA TLP 2844 pela
porta USB.
A impressão ja ocorre 100% pela porta LPT1 e COM1, mas agora o cliente
esta trocando o desktop por NB sem porta paralela e sem porta serial,
somente USB.
Já tentei usar algumas dicas antigas aqui da
Voodoorv,
Voce precisa informar o IP EXTERNO da máquina servidora.
Caso no local aonde esta o servidor não tenha IP FIXO, use um cliente
dinâmico de IP, por exemplo o NO-IP (www.no-ip.com).
Veja como configurar o NO-IP aqui
(http://videolog.uol.com.br/video.php?id=396589)
Depois basta
Francisco,
Ajuste os nomes dos campos e o nome da tabela e acredito que deva ser o
que queres.
Select CLIENTE, sum(VALOR) as VALORTOTAL from MINHATABELA WHERE
CLIENTE=:CLIENTE AND DATA BETWEEN :DATAINICIAL AND :DATAFINAL GROUP BY
CLIENTE ORDER BY CLIENTE
Sucesso !!
Moacir
Em 25/12/2009
:13, EmbarcaDelphi escreveu:
Pessoal, responder apenas a peguntas, comentários vocês criam um blog e
coloca lá o que querem falar com relação a qualquer assunto. :(
Em 21/12/2009 08:29, dbug.eti.br - Gmail escreveu:
Ahfala sério, PARADOX é banco de dados de verdade agora? Só pela
Ahfala sério, PARADOX é banco de dados de verdade agora? Só pela
razão de que alguém não teve problemas com PARADOX não significa que ele
realmente deva ser utilizado em projetos sérios. Pessoal, por favor,
reavaliem essa situação. Utilizem um SGDB de verdade! Existem muitos
livres,
Olha, usar um bando de arquivos que contém um bando de campos que contém
um bando de dados é no mínimo uma atitude questionável de um
profissional da área de desenvolvimento de software.
Quem sabe para uma vídeo-locadora funcione, apesar de que nestes casos,
até ACCESS é MENOS RUIM!
Como disse
Tire o suspend. Ele não tem função alguma ali.
Sucesso !
Moacir
mario.pagnozzi1979 escreveu:
Amigos,
Encontro-me com o seguinte problema, preciso atualizar a base de dados
de um cliente, pra isto estou criando um aplicativo para que atualize essa
base. Até nas alterações de tabelas
Aqui guardamos o xml gerado e tbm o xml assinado, não tem como refazê-los.
Tbm guardamos o numero do recibo.
Mas ainda não uso o ACBR estou com o flexdocs, mas pretendo partir pro ACBR.
Estou trabalhando tbm no CTE, e já estou gerando na mão o xml do mesmo,
tentei reproduzir no ACBR e
If pos(stParametro262 ,'00,01,02,03,04,05,06,07,08')=0 then
Berdam escreveu:
Existe a possibilidade de realizar este teste em delphi sendo a variavel
stparametro262 uma string ??
Com char é possível, mas com string é ??
if stParametro262 ['00', '01', '02', '03', '04', '05', '06',
Veja http://br.groups.yahoo.com/group/delphi-br/message/206248
André F. Moraes
- Original Message -
From: Jose Newton Araujo jose.new...@jnewton.com.br
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, December 02, 2009 1:26 PM
Subject: [delphi-br] Pronunciamento da Active Delphi
Juliomar,
A opções do Menu popup mudam de acordo com o BorderStyle do formulário.
Veja se isto te ajuda ai.
Sucesso !!
Moacir
Juliomar Marchetti escreveu:
Boa tarde
Leandro
Valeu pela ajuda, mas ele só desabilita no form, eu gostaria de desabilitar
ele no barra de tarefas.
Quando o
Ricardo,
Acredito que o colega tem todo o direito de reclamar, comentar, etc.
Esta é uma lista voltada para o Delphi, e o assunto levantado por ele é
pertinente.
As colocações dele encontram eco na grande maioria de nós, proprietários
de uma licença de uso do Delphi, independente de versão,
. Aí complica, né?
Sem mais,
Ricardo.
1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.
2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor
compreendida.
3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!
--- Em ter, 1/12/09, Moacir - GMail
Asafe Locker:
Asafe Locker escreveu:
Claro que temos o direito de reclamar so acho que temos que reclamar no lugar
certo e com as pessoas certas. Não adianta vir um cidadão aqui e ficar
malhando o Delphi como se ele ou a Embarcadero tivessem mais defeitos do que
qualidade.
Não foi
Então, ele provavelment gerará binários estáticos e vc mesmo deverá
montar o pacote de instalação para cada distro (apt, rpm, tar.gz,
etc..), e sim, existem executáveis em linux/unix, mas não precisam ter
extensão alguma, só permissão de execução (ou seja, é um arquivo
executável).
Flws
Acho que o Delphi ainda não !
Da uma olhada no Lazarus (www.*lazarus*.freepascal.org), este com
certeza ja faz isto, compila para Windows (32 / 64), Linux e Mac.
Sucesso !!
Moacir
Ricardo César Cardoso escreveu:
Basta que o compilador seja escrito, ou melhor, dê suporte para essa
aqui quebrou as linhas, se precisar entre em contato
al...@digitalsystem.com.br que te envio a função diretamente.
berdam escreveu:
o problema daquela dll é que em debug ela solta umas msgs que atrapalham
muito.
Irei tentar ver seu código
jalosii gmail escreveu:
eu usava a dll pra
eu usava a dll pra validar os IEs, mas depois que encontrei essa função
na net, arrumei o que precisava e uso ela sem problemas.
function ConfereIE(IE, UF: String; ApenasDigitos: Boolean = True): Boolean;
const
MASCARAS_: String = ' X- NNNXY-
NNX-NX-
Veja http://www.forumweb.com.br/foruns/index.php?/topic/78912-sped-fiscal/
talvez possa te ajudar.
André F. Moraes
- Original Message -
From: Berdam
To: Delphi
Sent: Wednesday, November 18, 2009 8:17 AM
Subject: [delphi-br] Sped Fiscal
Olá Pessoal.
Alguém aqui da
Concordo plenamente. Sou de Curitiba e trabalho com desenvolvimento de
software. Todos sabem, que isso é Fexige muita dedicação... São
Paulo? Deslocamento? Tempo perdido em ônibus/avião e outros traslados?
Põe na web!
Faz a galera se registrar mas poder ver o que rolou...
Edward
Em
Ou então,
nomearquivo := 'NomeArquivo_'+formatDateTime('mmdd',Now)+'.txt'
ou
nomearquivo := 'NomeArquivo_'+formatDateTime('mmdd_hhnn',Now)+'.txt'
Andre Yahoo escreveu:
nomearquivo := 'NomeArquivo'+DatetoStr(Now)+'.txt'
Leonardo,
Definitivamente a função DaysBetween não toma conhecimento dos feriados !!
O cálculo é matemático !
Ex.:
Data Inicial: 1/11/2009
Data Final: 30/11/2009
Dias entre datas = 29 (30 - 1)
Data Inicial: 1/12/2009
Data Final: 31/12/2009
Dias entre datas = 30 (31 - 1)
Data Inicial:
Pessoal,
Alguem ja implementou alguma coisa para NFE usando a ACBR ??
Em especial para uso aqui no RS ??
Estou pensando em usar a ACBR para isto, mas queria a opinião de quem ja
esta usando
Sucesso !!
Moacir
D7 + Zeos + Firebird 2.0/MySQL
ajama_1 escreveu:
Muito Obrigado Marcelo, deu
Quando eu tiver tempo pretendo migrar pro ACBR_NFE, mas no momento estou
usando o ocx da flexdocs, muito bom tbm. Agora estou fazendo o CTE com o
componente da flexdocs, mas não descarto a possibilidade de fazer envio
direto pros httpservices(estou com mais tempo pra terminar o projeto),
mas
Marcos,
Grato pela pronta resposta.
Na verdade o que busco é a opinião de quem ja esta usando, assim como
vc, NFER com o ACBR.
Com o uso surgem novos dados e é isto que estou buscando.
Quaisquer comentários a respeito do uso da ACBR/NFE são bem vindos, pela
lista ou em pvt.
Sucesso a todos
.
De: delphi-br@yahoogrupos.com.br [delphi...@yahoogrupos.com.br] em Nome de
jalosii gmail [jalo...@gmail.com]
Enviado: segunda-feira, 26 de outubro de 2009 5:34
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] NFe usando ACBR
Quando eu tiver tempo
Grande informação Evandro, vou me cadastrar.
Grato,
Moacir
Evandro Siqueira escreveu:
Estou usando desde 01/09 e o que posso dizer é: Show de Bola!!! Tem
atualizações praticamente diárias e atende muito bem às nossas
necessidades. Existe uma lista de discussão muito prestativa e a
Substitua somente a pasta dos dados do teu cliente que esta dentro do
pasta data , algo como:
Ex.: ..mysql\mysql5.x.xx\data\meuprojeto
meuprojeto = nome da pasta de dados do teu cliente.
Sucesso !!
Moacir
Nazareno Neto escreveu:
Estou com o seguinte problema, estamos com um cliente que
Alisson,
De uma googlada e vc obterá algumas respostas.
Pelo que vi aqui, pode se tratar de virus !!
http://www.google.com.br/search?sourceid=chromeie=UTF-8q=Libeay32.dll
http://www.google.com.br/search?sourceid=chromeie=UTF-8q=Libeay32.dll
Sucesso !!
Moacir
Alisson Yahoo escreveu:
Uso
Pessoal, bom dia
Preciso de algumas dicas, é o seguinte.
Utilizamos um sistema que o exe e as bpl´s ficam em uma pasta de cada
estação, estamos querendo migrar esta aplicação para que funcione de
forma adequada para utilizar no Windows TS, hoje até funciona mas
preciso de uma pasta para cada
[Error] Unit1.pas(63): Undeclared identifier: 'Modulo'
[Error] Unit1.pas(63): Missing operator or semicolon
Modulo seria outro form, provavelmente um datamodule, onde esteja o
cdscontatos(Tclientdataset).
[Error] Unit1.pas(69): Undeclared identifier: 'TbSupSetor'
TbSupSetor é o nome de uma
Ricardo,
Use a função UPPER do firebird para isto:
sql :='select * from TB_PRODUTO where UPPER(NOME_PROD)
like'++'%'+Ansiuppercase(edtBusca.Text)+'%'+;
Sucesso !!
Moacir
ricardo_rmsr escreveu:
Bom dia ... Estou fazendo uma aplicação Delphi para meu TCC, esta aplicação
Adjalma,
me ocorreu que vc pode fazer o mesmo usando records..
Na seção 'type' declare:
tDadosCliente = record
Id : Integer;
Nome: string;
end;
Depois é só alterar a rotina do botão:
procedure TForm1.Button4Click ( Sender: TObject );
var i: InteGer;
vetor_string_ dinamico:
Adjalma,
Vc esta usando o setlength da forma incorreta. Veja como seria, no teu caso:
procedure TForm1.Button4Click ( Sender: TObject );
var i: InteGer;
vetor_string_ dinamico: array of array of string;
TamTabela: InteGer;
begin
ClientDataSet_ Clientes. Close;
ClientDataSet_ Clientes. Open;
Inno setup com certeza !!
http://www.innosetup.com
Sucesso !
Moacir
Silvio Clecio escreveu:
Hugo Vieira escreveu:
Gostaria de saber de vocês uma ferramenta rápida e fácil para a geração
de instaladores(SETUP). ...
Brother, veja isso:
Cesar,
Tente enviar os anexos separados por #13, por ex.:
MeusAnexos := 'arquivo1.txt'+#13+'arquivo2.txt' ;
Sucesso !!
Moacir
Fellipe Henrique escreveu:
Olá Ricardo,
Foi a primeira coisa que tentei mudar, porém continua a dar erro nº 2... não
adianta mudar o nFileCount, só se eu estiver
Verifique a propriedade readonly..
Jackson Gomes - ToolsComps escreveu:
So que, as linhas são adicionadas, mas podem ser alteradas.
existe algum comando que a eu adicionar as linhas no memo,
o usuario na possa alterar-las ? para nao prejudicar na impressao do cupom?
Enabled = False
Andrei,
Este artigo deve resolver teu problema.
http://delphi.about.com/od/windowsshellapi/l/aa100703a.htm
Sucesso !!
Moacir
Andrei Luís escreveu:
Olá Jackson,
Achei muitas dicas de sendmessage que maximizam a tela e/ou fazem o restore,
mas nenhuma funcionou por aqui.
Abaixo meu
Ops !!
Eu havia entendido que ele 1º adicionaria os dados e depois queria
evitar a sua edição, algo como:
memo.readonly:=false;
//-- Incluir dados;
//-- Incluir dados;
//-- Incluir dados;
//-- Incluir dados;
memo.readonly:=true;
Moacir
Jackson Gomes - ToolsComps escreveu:
Verifique a
auriston.delphi,
dm.qyrecbto.FieldByName('UPGTO').Clear ;
Sucesso !!
Moacir
auriston.delphi escreveu:
Salve Delphianos.
No comando dm.qyrecbto.FieldByName('UPGTO').AsDateTime := Date, preciso
trocar a funcao Date por uma data em branco, é possivel efetuar este processo
?
Uso
Ricardo,
Estou usando o Zeos no Dephi 7 e no Lazarus.
E estou 100% satisfeito..
Até agora tenho conseguido converter satisfatoriamente todas as minhas
aplicações desenvolvidas em D7 para o Lazarus, e recomendo o uso do mesmo.
Sucesso !!
Moacir
Ricardo César Cardoso escreveu:
Quanto as
aqui na empresa.
Moacir - GMail escreveu:
Jose,
Da uma olhada com carinho no lazarus..
Dependendo das tuas necessidades ele ate pode te suprir, e é 0800 ;)
www.*lazarus*.freepascal.org
Sucesso !!
Moacir
Jose Newton Araujo escreveu:
Caro Ricardo
Eu nunca tive versão
Jose,
Da uma olhada com carinho no lazarus..
Dependendo das tuas necessidades ele ate pode te suprir, e é 0800 ;)
www.*lazarus*.freepascal.org
Sucesso !!
Moacir
Jose Newton Araujo escreveu:
Caro Ricardo
Eu nunca tive versão nenhuma versão do Delphi, porque sempre usei a da
empresa onde
Cleiton,
No evento OnKeyDown acrescente esta linha:
if (key =VK_F10) then
begin
//-- AQUI
key :=0 ;
btConsultaClick(Self);
end;
Sucesso !
Moacir
Cleiton Maciel Reis da Silva escreveu:
Galera delphiana, eu sei que na programação tudo tem um
lógica. Mas
sinceramente não estou
Walter,
Vejo que não estou só !!
Neste instante estou debruçado no Lazarus...
Não, ele não é páreo nem pro D7 (eita Delphizinho que deu baum sô !!),
mas funciona que é uma belezinha...
To até pegando gosto pelo bichinho.
Nem bem dei uma googlada e la estava: zeos, rxlib, e mais uma meia duzia
Rafael,
Qual é exatamente o problema que ocorre ??
Moacir
Rafael Marques escreveu:
Alguem na lista que trabalha com este componente está conseguindo utiliza-lo
no Delphi2009???
eu uso ele desde a versao 7 (tenho alguns sistemas utilizando-o em varias
telas) e no delphi 2009 ele n
Alex,
Use o evento OnCellClick para isto:
procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
Edit1.Text := Column.Field.AsString;
end;
ou o evento OnDblClick:
procedure TForm1.DBGrid1DblClick(Sender: TObject);
begin
Edit1.Text := DBGrid1.Columns[1].Field.AsString; //-- Indique
Fabiano,
Após uma breve consulta:
VS 2008 PRO - R$ 2.485,00
Sucesso !!
Moacir
Fabiano Moura escreveu:
Boa tarde!
Um dos motivos na minha opinião do Delphi perder o mercado é o alto valor
das licenças. Fiz um orçamento com umas das empresas conveniadas da
Embarcadero e que vende o
Simoesluciano,
Não me parece que este teste tenha sido o suficiente para determinar se
o EXE gerado faz algum tipo de comunicação !
Ele pode estar fazendo este contato a cada X execuções, a cada X dias,
ou de uma forma aleatória.
O comportamento seria algo como o de um virus, acredito eu.
Guilherme,
Pelo que pude entender do teu email vc precisaria de uma coluna com o
numeração sequencial dos registros, algo como:
1 Campo1 Campo2 Campo3
2 Campo1 Campo2 Campo3
3 Campo1 Campo2 Campo3
4 Campo1 Campo2 Campo3
Faça uma
Luiz,
Recebi minha confirmação sem problemas.
Sucesso !!
Moacir
Luiz Carlos escreveu:
Pessoal, alguma posição sobre esse evento?
Efetuei a inscrição, porem não recebi nenhuma confirmação por e-mail!
Abraços...
a inscrição consta como já efetuada.
Vlw!!!
De: Moacir - GMail prism...@gmail.com
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 28 de Agosto de 2009 11:31:21
Assunto: Re: [delphi-br] Meio Off - Apresentação Delphi 2010
Luiz,
Recebi minha
Só complementando. Nem sempre vai resolver o problema baixar esta cadeia. Vocês
devem baixar a cadeia da fornecedora do certificado de vocês. No meu caso
http://www.certisign.com.br/suporte/utilitarios-criptograficos/hierarquias-de-certificacao/icp-brasil/hierarquia-completa-icp-brasil.
Além
Se o ambiente é win2003 server a unica solução encontrada até agora é utilizar
o aspack. Eu tb tinha este problema e resolvi assim.
- Original Message -
From: Marcos Douglas
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, August 27, 2009 8:06 PM
Subject: Re: [delphi-br]
Concordo com o colega, Willian Jhonnes.
A todos do fórum, acho importante a pessoa ser graduador, Pós-Graduado,
Mestre ou Doutor, Parabéns aos que conseguiram o seu diploma, mais não posso
dizer que a pessoa que não tem graduação mas que tem conhecimento e anos de
experiência não seja um
Rodrigo,
Que tipo de servidores vc quer monitorar ??
Abraços,
Moacir
ps.: Espero que voce não se importe de ser ajudado por um semi-analfabeto...
Gmail - Sharplinux escreveu:
Pessoal, boa noite
Estou tentando desenvolver uma aplicação onde ele irá ficar monitorando
os servidores a idéia
Pessoal, boa noite
Estou tentando desenvolver uma aplicação onde ele irá ficar monitorando
os servidores a idéia e ele ficar pingando o ip e porta do servidor se
estiver ativo ele retorna com o ok e fica verde se estiver off fica
vermelho.
Alguém já fez alguma coisa assim
Abraços
Rodrigo
A lei não vai tirar ninguém do mercado. Veja os artigos abaixo:
Veja o q diz os artigos 3 e 4:
Art. 2º Poderão exercer a profissão de Analista de Sistemas no país:
I - os possuidores de diploma de nível superior em Análise de
Sistemas, Ciência da Computação ou Processamento de Dados, expedido
Marcelo,
O avg(0) AS DIAS pode, e deve, ser substituido por:
Cast(0 as integer) ou Cast(0 as numeric(12,2)) ou de acordo com o campo
correspondente ao union
Sucesso !!
Moacir
Marcelo Luiz Onhate escreveu:
Para fazer um GROUP BY... nos campos que vai fazer beleza, mas nos
outros vc vai
Hugo,
Uma solução simples e rapida e trocar a fonte do teu memo por courier.
Sucesso !!
Moacir
Hugo Vieira escreveu:
Meus amigos delphianos,
Estou em fase final de desenvolvimento de um PDV.
Tudo funciona perfeitamente, porem ainda possuo algumas broncas p resolver.
Uso
Seu certificado é válido(comprado)? Onde vc adquiriu seu certificado? Com
qual estado vc está tentando se comunicar?
André F. Moraes
- Original Message -
From: Thiago Menon thime...@yahoo.com.br
To: delphi-br@yahoogrupos.com.br
Sent: Monday, August 17, 2009 1:56 PM
Subject: Re:
E eu ainda perco meu tempo lendo isto..
Rubem Rocha escreveu:
http://www.ramonduraes.net/post/Voce-ainda-lembra-do-Clipper-Vamos-migrar-pa
ra-NET!.aspx
[As partes desta mensagem que não continham texto foram removidas]
E se vc usar um no-ip da vida ??
Ai a liberação se daria para a tua url.
[ ]´s
Moacir
Marcos Abreu Ferreira escreveu:
Mas o acesso externo é sempre liberado a um determinado IP, e como estou
usando conexao por modem 3G, o IP muda a cada conexao.
Att,
Marcos A. Ferreira
São Paulo
GPL obriga a liberar o código, LGPL não, por isso que os componentes pra
Delphi usam esta licença para não obrigar q quem utilize o componente tenha
q liberar o código do programa.
André F. Moraes
- Original Message -
From: Joao Morais jcmorai...@gmail.com
To:
Crie seu XML com a tag cPais e xPais que será validada com sucesso pelo
ACBrNFeMonitor.
André F. Moraes
- Original Message -
From: Samuel M. Basso
To: delphi-br@yahoogrupos.com.br
Sent: Monday, August 10, 2009 10:58 AM
Subject: [delphi-br] ACBrNFeMonitor problema validação
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;
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
EmbarcaDelphi,
Uma ótima opção é o curso da bbs, totalmente 0800
http://www.bbc.co.uk/portuguese/learningenglish/
Sucesso !!
Moacir
EmbarcaDelphi escreveu:
Aproveitando o tópico (coloquei um OFF).
Alguém sabe informar se aquele curso on-line de inglês é bom, realmente
dá para aprender
Fernando,
o SDK deste finger print tem o que vc precisa.
Olhe neste diretório:
C:\Arquivos de programas\NITGEN eNBSP\SDK\Samples\DLL\Delphi\UITestDP
Caso vc tenha instalado em outro diretório que não o padrão, olhe no
subdiretorio SDK\Samples\DLL\Delphi\UITestDP
Sucesso !!
Moacir
Fiz o procedimento abaixo para tratar as exceptions e gostaria de saber como
faço para que a aplicação grave o log mas continue executando o restante do
código.
procedure TForm1.TrataErros(Sender: TObject; E: Exception);
begin
GravaLog;
end ;
[As partes desta mensagem que não continham
1 - 100 de 800 matches
Mail list logo