[delphi-br] URGENTE - CVomo reiniciar um aplicativo.
Olá pessoal, Alguém sabe como fechar um aplicativo após uma atualização e abri-lo novamente ? Eu estou usando o Application.Termined para finalizar, mas preciso abrir-lo novamente. Grato, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE - CVomo reiniciar um aplicativo.
eu gero um .bat para isto. 2008/5/19 Jorge Ericsson [EMAIL PROTECTED]: Olá pessoal, Alguém sabe como fechar um aplicativo após uma atualização e abri-lo novamente ? Eu estou usando o Application.Termined para finalizar, mas preciso abrir-lo novamente. Grato, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- /* * Edson Marco Ferrari Junior * [EMAIL PROTECTED] * [EMAIL PROTECTED](in memorium) */ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE - CVomo reiniciar um aplicativo.
Eu resolvi o problema usando a função ExecuteFileWait. Valew file:/srvdf161/nasdf04/CAIVS/EXPORTACAO%20E%20IMPORTACAO/An%C3%A1lise%20e%20Projetos/ 2008/5/19 Edson Marco [EMAIL PROTECTED]: eu gero um .bat para isto. 2008/5/19 Jorge Ericsson [EMAIL PROTECTED]jericssonsup%40gmail.com : Olá pessoal, Alguém sabe como fechar um aplicativo após uma atualização e abri-lo novamente ? Eu estou usando o Application.Termined para finalizar, mas preciso abrir-lo novamente. Grato, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] -- /* * Edson Marco Ferrari Junior * [EMAIL PROTECTED] edmafer%40gmail.com * [EMAIL PROTECTED] edmafer%40sicesumar.org(in memorium) */ [As partes desta mensagem que não continham texto foram removidas] -- Att, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Como localizar o diretório do IIS e sua versão.
Obrigado pelas dicas Ricardo, mas só a parte do IE funcionou, ainda não consegui localizar o diretório de todas as instalações do IIS caso tenha mais de uma na máquina. Estou pesquisando... Valew 2008/5/14 Ricardo César Cardoso [EMAIL PROTECTED]: Boa tarde Jorge! A parte de saber a versão do IE vc pode olhar aqui: * http://www.swissdelphicenter.ch/torry/printcode.php?id=1252 Agora quanto ao local de instalação do IIS, dá uma olhada nisso aqui que acho que é por aí: * http://www.delphi3000.com/printarticle.asp?ArticleID=2742 Atte, Ricardo. Jorge Ericsson [EMAIL PROTECTED] jericssonsup%40gmail.com escreveu: Saudações amigos Delphianos, Estou desenvolvendo um instalador em Delphi e preciso localizar na registry o local de instalação do IIS (\Inetpub\wwwroot), qual a versão e qual o IExplorer instalado. Tenho alguns usuários que possuem até duas instalações em suas máquinas e só vi solução localizando na registry essas informações. Alguém teria a solução para tal problema ? Abraços a todos. Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [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] -- Att, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Como localizar o dire tório do IIS e sua versão.
Boa tarde Jorge! A parte de saber a versão do IE vc pode olhar aqui: * http://www.swissdelphicenter.ch/torry/printcode.php?id=1252 Agora quanto ao local de instalação do IIS, dá uma olhada nisso aqui que acho que é por aí: * http://www.delphi3000.com/printarticle.asp?ArticleID=2742 Atte, Ricardo. Jorge Ericsson [EMAIL PROTECTED] escreveu: Saudações amigos Delphianos, Estou desenvolvendo um instalador em Delphi e preciso localizar na registry o local de instalação do IIS (\Inetpub\wwwroot), qual a versão e qual o IExplorer instalado. Tenho alguns usuários que possuem até duas instalações em suas máquinas e só vi solução localizando na registry essas informações. Alguém teria a solução para tal problema ? Abraços a todos. Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [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]
[delphi-br] URGENTE: Consulta incremental LIKE
Olá amigos delphianos, Meio confuso meu problema, mas crio que a solução está apenas na monstagem da minha instrução SQL. Bom, eu estou com um problema de pesquisa incremental genérica pois utilizo uma aplicação que pode retorna informções de 3 bancos Firebird, PostgreeSql e Oracle ao mesmo tempo. Na minha tabela eu possuo campos da seguinte forma: CO_AGRUPADO A124|B545|C785|D999|E478 *A334|B767|C333|D354|E809 B786|A792|D654|C333|E668 * Eu gostaria de ao pesquisar por um código tipo E668A334D654C333 - sem informa a barra de divisão - ele me retornasse por exemplo a *2ª e 3ª linhas de registro apenas*, ignorando a 1ª linha pois não existem nenhuma informação nela que atenda a solicitação do usuário. Eu tentei da seguinte forma: Select co_agrupado from tabela where upper(co_agrupado) like upper(E668) or upper(co_agrupado) like upper(A668) or upper(co_agrupado) like upper(D654) or upper(co_agrupado) like upper(C333) Mas, apresenta problemas na montagem do FILTER nos componentes usando Zeos(Firebird), ADO(Oarcle) e DBExpress(PostgreSql) dando erro. Alguém poderia dar uma dica ? Valew pessoal Att, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE: Consulta incremental LIKE
upper(co_agrupado) like upper(E668) or upper(co_agrupado) like upper(%E668%) or 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]
Re: [delphi-br] URGENTE - Como retornar Campos Primário do DataSet
Valew pelas dicas, mas o André entendeu me deu a solução que precisava.
Vou testar e posto aqui a solução pq estou criando um registro de log e
gravando todas as ações do banco que o usuário fizer.
Qdo o administrador quiser verificar quem, quando, qual valor e etc um
determinado usuário gravou ou alterou no banco, ele terá em uma tela com
consultas parametrizada.
Se alguém já pensou e fez algo semelhante, me contate em PVT.
Obs.: Por enquanto estou usando BDE e acessando Firebird.
Obrigado pessoal.
2008/4/11 Andre Luis Silveria [EMAIL PROTECTED]:
O que vc pode fazer é o seguinte:
RCampo : TRecord
Campo : String;
procedure chamarLog(DS : Dataset);
var Tabela : TTable;
Campo : Array of RCampo;
begin
if (DS.State in [dsInsert, dsEdit) then
begin
for i := 0 to Ds.FieldsCount - 1 do
begin
if pfInKey in DS.Fields[i].ProviderFlags then
begin
SetLength(Campo, Length(Campo)+1);
Campo[Length(Campo)-1].Campo := DS.Fields[0] .FieldName; //retornar o
campo chave
end;
end;
Tabela := (DS as TTable).TableName) ; //retornar o nome da tabela
end;
end;
- Mensagem original
De: Jorge Ericsson [EMAIL PROTECTED] jericssonsup%40gmail.com
Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
Enviadas: Quinta-feira, 10 de Abril de 2008 19:06:39
Assunto: [delphi-br] URGENTE - Como retornar Campos Primário do DataSet
Olá amigos Delphianos,
Preciso enviar para minha tela de pesquisa os campos chaves e o nome da
tabela de Datasource.
Tentei o seguinte:
procedure chamarLog(DS : Dataset);
var Tabela : TTable;
Campo: String;
begin
if (DS.State in [dsInsert, dsEdit) then
begin
Campo := DS.Fields[0] .FieldName; //retornar o campo chave
Tabela := (DS as TTable).TableName) ; //retornar o nome da tabela
end;
end;
Só que dessa forma o o campo chave poderá ser mais de um e poderá estar em
qq posição da tabela.
Alguém poderia ajudar-me nesse problema ?
Agradeço,
Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsso n.com.br
61 9227.4785 / 3967.6172
Brasília - DF
[As partes desta mensagem que não continham texto foram removidas]
!--
#ygrp-mkp{
border:1px solid #d8d8d8;font-family:Arial;margin:14px 0px;padding:0px
14px;}
#ygrp-mkp hr{
border:1px solid #d8d8d8;}
#ygrp-mkp #hd{
color:#628c2a;font-size:85%;font-weight:bold;line-height:122%;margin:10px
0px;}
#ygrp-mkp #ads{
margin-bottom:10px;}
#ygrp-mkp .ad{
padding:0 0;}
#ygrp-mkp .ad a{
color:#ff;text-decoration:none;}
--
!--
#ygrp-sponsor #ygrp-lc{
font-family:Arial;}
#ygrp-sponsor #ygrp-lc #hd{
margin:10px 0px;font-weight:bold;font-size:78%;line-height:122%;}
#ygrp-sponsor #ygrp-lc .ad{
margin-bottom:10px;padding:0 0;}
--
!--
#ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg table {font-size:inherit;font:100%;}
#ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height:1.22em;}
#ygrp-text{
font-family:Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;}
#ygrp-tpmsgs{
font-family:Arial;
clear:both;}
#ygrp-vitnav{
padding-top:10px;font-family:Verdana;font-size:77%;margin:0;}
#ygrp-vitnav a{
padding:0 1px;}
#ygrp-actbar{
clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;}
#ygrp-actbar .left{
float:left;white-space:nowrap;}
.bld{font-weight:bold;}
#ygrp-grft{
font-family:Verdana;font-size:77%;padding:15px 0;}
#ygrp-ft{
font-family:verdana;font-size:77%;border-top:1px solid #666;
padding:5px 0;
}
#ygrp-mlmsg #logo{
padding-bottom:10px;}
#ygrp-reco {
margin-bottom:20px;padding:0px;}
#ygrp-reco #reco-head {
font-weight:bold;color:#ff7900;}
#reco-grpname{
font-weight:bold;margin-top:10px;}
#reco-category{
font-size:77%;}
#reco-desc{
font-size:77%;}
#ygrp-vital{
background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;}
#ygrp-vital #vithd{
font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;}
#ygrp-vital ul{
padding:0;margin:2px 0;}
#ygrp-vital ul li{
list-style-type:none;clear:both;border:1px solid #e0ecee;
}
#ygrp-vital ul li .ct{
font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;}
#ygrp-vital ul li .cat{
font-weight:bold;}
#ygrp-vital a{
text-decoration:none;}
#ygrp-vital a:hover{
text-decoration:underline;}
#ygrp-sponsor #hd{
color:#999;font-size:77%;}
#ygrp-sponsor #ov{
padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;}
#ygrp-sponsor #ov ul{
padding:0 0 0 8px;margin:0;}
#ygrp-sponsor #ov li{
list-style-type:square;padding:6px 0;font-size:77%;}
#ygrp-sponsor #ov li a{
text-decoration:none;font-size:130%;}
#ygrp-sponsor #nc{
background-color:#eee;margin-bottom:20px;padding:0 8px;}
#ygrp-sponsor .ad{
padding:8px 0;}
#ygrp-sponsor .ad #hd1{
font-family:Arial;font-weight:bold;color:#628c2a;font-size
[delphi-br] URGENTE - Como retornar Campos Primário do DataSet
Olá amigos Delphianos, Preciso enviar para minha tela de pesquisa os campos chaves e o nome da tabela de Datasource. Tentei o seguinte: procedure chamarLog(DS : Dataset); var Tabela : TTable; Campo: String; begin if (DS.State in [dsInsert, dsEdit) then begin Campo := DS.Fields[0].FieldName; //retornar o campo chave Tabela := (DS as TTable).TableName); //retornar o nome da tabela end; end; Só que dessa forma o o campo chave poderá ser mais de um e poderá estar em qq posição da tabela. Alguém poderia ajudar-me nesse problema ? Agradeço, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] URGENTE - Como retornar Campos Primário do DataSet
Percorra todos os campos do dataset e verifique, para cada campo, se a opção pfInKey está definida na propriedade ProviderFlags. Se estiver, é pq o campo faz parte da chave. Essa é a maneira verificando via dataset. Agora verificando via banco, vc tem que checar no SGBD que vc usa qual(is) é(são) a(s) tabela(s) do catálogo que armazena(m) essa informação pra vc consultar. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Thu, 10 Apr 2008 19:06:39 -0300 Subject: [delphi-br] URGENTE - Como retornar Campos Primário do DataSet Olá amigos Delphianos, Preciso enviar para minha tela de pesquisa os campos chaves e o nome da tabela de Datasource. Tentei o seguinte: procedure chamarLog(DS : Dataset); var Tabela : TTable; Campo: String; begin if (DS.State in [dsInsert, dsEdit) then begin Campo := DS.Fields[0].FieldName; //retornar o campo chave Tabela := (DS as TTable).TableName); //retornar o nome da tabela end; end; Só que dessa forma o o campo chave poderá ser mais de um e poderá estar em qq posição da tabela. Alguém poderia ajudar-me nesse problema ? Agradeço, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 Brasília - DF [As partes desta mensagem que não continham texto foram removidas] _ Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS para o Messenger! É GRÁTIS! http://www.msn.com.br/emoticonpack
Re: [delphi-br] URGENTE - Como retornar Campos Primá rio do DataSet
vc quer saber quais campos são chave primária ? Use as tabelas de sistema do seu SGBD... Vinicius dos Santos Analista de Desenvolvimento Júnior MSI SOLUÇÕES Av. Dr. Altino Arantes, 131 Sala 145 - 146 Centro - Ourinhos/Sp - Brasil Fone/Fax: +55 (14) 3324-8181 www.msisolucoes.com.br - Original Message - From: Jorge Ericsson To: delphi-br@yahoogrupos.com.br Sent: Thursday, April 10, 2008 7:06 PM Subject: [delphi-br] URGENTE - Como retornar Campos Primário do DataSet Olá amigos Delphianos, Preciso enviar para minha tela de pesquisa os campos chaves e o nome da tabela de Datasource. Tentei o seguinte: procedure chamarLog(DS : Dataset); var Tabela : TTable; Campo: String; begin if (DS.State in [dsInsert, dsEdit) then begin Campo := DS.Fields[0].FieldName; //retornar o campo chave Tabela := (DS as TTable).TableName); //retornar o nome da tabela end; end; Só que dessa forma o o campo chave poderá ser mais de um e poderá estar em qq posição da tabela. Alguém poderia ajudar-me nesse problema ? Agradeço, Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 61 9227.4785 / 3967.6172 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]
Res: [delphi-br] URGENTE - Como retornar Campos Prim ário do DataSet
O que vc pode fazer é o seguinte:
RCampo : TRecord
Campo : String;
procedure chamarLog(DS : Dataset);
var Tabela : TTable;
Campo : Array of RCampo;
begin
if (DS.State in [dsInsert, dsEdit) then
begin
for i := 0 to Ds.FieldsCount - 1 do
begin
if pfInKey in DS.Fields[i].ProviderFlags then
begin
SetLength(Campo, Length(Campo)+1);
Campo[Length(Campo)-1].Campo := DS.Fields[0] .FieldName; //retornar o
campo chave
end;
end;
Tabela := (DS as TTable).TableName) ; //retornar o nome da tabela
end;
end;
- Mensagem original
De: Jorge Ericsson [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 10 de Abril de 2008 19:06:39
Assunto: [delphi-br] URGENTE - Como retornar Campos Primário do DataSet
Olá amigos Delphianos,
Preciso enviar para minha tela de pesquisa os campos chaves e o nome da
tabela de Datasource.
Tentei o seguinte:
procedure chamarLog(DS : Dataset);
var Tabela : TTable;
Campo: String;
begin
if (DS.State in [dsInsert, dsEdit) then
begin
Campo := DS.Fields[0] .FieldName; //retornar o campo chave
Tabela := (DS as TTable).TableName) ; //retornar o nome da tabela
end;
end;
Só que dessa forma o o campo chave poderá ser mais de um e poderá estar em
qq posição da tabela.
Alguém poderia ajudar-me nesse problema ?
Agradeço,
Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsso n.com.br
61 9227.4785 / 3967.6172
Brasília - DF
[As partes desta mensagem que não continham texto foram removidas]
!--
#ygrp-mkp{
border:1px solid #d8d8d8;font-family:Arial;margin:14px 0px;padding:0px 14px;}
#ygrp-mkp hr{
border:1px solid #d8d8d8;}
#ygrp-mkp #hd{
color:#628c2a;font-size:85%;font-weight:bold;line-height:122%;margin:10px 0px;}
#ygrp-mkp #ads{
margin-bottom:10px;}
#ygrp-mkp .ad{
padding:0 0;}
#ygrp-mkp .ad a{
color:#ff;text-decoration:none;}
--
!--
#ygrp-sponsor #ygrp-lc{
font-family:Arial;}
#ygrp-sponsor #ygrp-lc #hd{
margin:10px 0px;font-weight:bold;font-size:78%;line-height:122%;}
#ygrp-sponsor #ygrp-lc .ad{
margin-bottom:10px;padding:0 0;}
--
!--
#ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg table {font-size:inherit;font:100%;}
#ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height:1.22em;}
#ygrp-text{
font-family:Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;}
#ygrp-tpmsgs{
font-family:Arial;
clear:both;}
#ygrp-vitnav{
padding-top:10px;font-family:Verdana;font-size:77%;margin:0;}
#ygrp-vitnav a{
padding:0 1px;}
#ygrp-actbar{
clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;}
#ygrp-actbar .left{
float:left;white-space:nowrap;}
.bld{font-weight:bold;}
#ygrp-grft{
font-family:Verdana;font-size:77%;padding:15px 0;}
#ygrp-ft{
font-family:verdana;font-size:77%;border-top:1px solid #666;
padding:5px 0;
}
#ygrp-mlmsg #logo{
padding-bottom:10px;}
#ygrp-reco {
margin-bottom:20px;padding:0px;}
#ygrp-reco #reco-head {
font-weight:bold;color:#ff7900;}
#reco-grpname{
font-weight:bold;margin-top:10px;}
#reco-category{
font-size:77%;}
#reco-desc{
font-size:77%;}
#ygrp-vital{
background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;}
#ygrp-vital #vithd{
font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;}
#ygrp-vital ul{
padding:0;margin:2px 0;}
#ygrp-vital ul li{
list-style-type:none;clear:both;border:1px solid #e0ecee;
}
#ygrp-vital ul li .ct{
font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;}
#ygrp-vital ul li .cat{
font-weight:bold;}
#ygrp-vital a{
text-decoration:none;}
#ygrp-vital a:hover{
text-decoration:underline;}
#ygrp-sponsor #hd{
color:#999;font-size:77%;}
#ygrp-sponsor #ov{
padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;}
#ygrp-sponsor #ov ul{
padding:0 0 0 8px;margin:0;}
#ygrp-sponsor #ov li{
list-style-type:square;padding:6px 0;font-size:77%;}
#ygrp-sponsor #ov li a{
text-decoration:none;font-size:130%;}
#ygrp-sponsor #nc{
background-color:#eee;margin-bottom:20px;padding:0 8px;}
#ygrp-sponsor .ad{
padding:8px 0;}
#ygrp-sponsor .ad #hd1{
font-family:Arial;font-weight:bold;color:#628c2a;font-size:100%;line-height:122%;}
#ygrp-sponsor .ad a{
text-decoration:none;}
#ygrp-sponsor .ad a:hover{
text-decoration:underline;}
#ygrp-sponsor .ad p{
margin:0;}
o{font-size:0;}
.MsoNormal{
margin:0 0 0 0;}
#ygrp-text tt{
font-size:120%;}
blockquote{margin:0 0 0 4px;}
.replbq{margin:4;}
--
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] Urgente - Ajuda no programa para emissão de Nota Fiscal Eletrônica
Olá pessoal, Eu adiquirir a pouco tempo o meu certificado e-CNPJ e gostaria de começar a emitir nota fiscal eletrônica da minha empresa utilizando e-Nota Fiscal. Não sei nem por onde comecar na programação, já baixei e instalei a libxml2 libxslt e etc junto com vários exemplos. Futuramente vou ter que implantar a e-Nota em um sistema que estou desenvolvendo para um cliente, mas antes gostaria de desenvolver algo para minha própria empresa emitir não só para o Cliente como tbém para os órgão fiscalizadores. Alguém já desenvolveu algo que posso me dá uma luz ou até mesmo informa aonde eu encontro matérial de estudo sobre o assunto ? Obs: Não vale o livro assinatura digital delphi e capcom... rsrsrs Ele não me serve. Valew pessoal... -- 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]
[delphi-br] Urgente - Tabelas com todos os sindicatos
Pessoal, alguém possui ou indicaria um lugar onde posso encontrar o cadastros de todos os sindicatos ? Problema: Eu estou desenvolvendo em meu sistema uma rotina de folha de pagamento e tem uma tabela de sindicatos então eu gostaria de popular essa tabela para facilitar a associação do funcionário ao sindicatos de sua área. 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]
Re: [delphi-br] Urgente - Tabelas com todos os sindicatos
Caro amigo Jorge, Este cadastro, nem mesmo o Ministério do Trabalho tem, infelizmente. Trabalho numa entidade sindical e há anos procuro algo do tipo. Só encontrei uma vez (cerca de 12 anos atrás) uma publicação impressa vinda do próprio ministério, mas já está desatualizada. Na Caixa Econômica Federal têm um cadastro devido às contribuições sindicais, mas não garante que a entidade está 100% legalizada com o Ministério do Trabalho. Grande abraço... Marcus Vinicius Scarpelli Informática FECESP - Original Message - From: Jorge Ericsson Sent: Thursday, January 31, 2008 7:25 PM Subject: [delphi-br] Urgente - Tabelas com todos os sindicatos Pessoal, alguém possui ou indicaria um lugar onde posso encontrar o cadastros de todos os sindicatos ? Problema: Eu estou desenvolvendo em meu sistema uma rotina de folha de pagamento e tem uma tabela de sindicatos então eu gostaria de popular essa tabela para facilitar a associação do funcionário ao sindicatos de sua área. 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] Urgente - Tabelas com todos os sindicatos
Eu também não encontrei nada Marcus então eu estou procurando pelas siglas, acessando os sites e cadastrando na unha msmo. Valew ... Em 01/02/08, Marcus Vinicius Scarpelli [EMAIL PROTECTED] escreveu: Caro amigo Jorge, Este cadastro, nem mesmo o Ministério do Trabalho tem, infelizmente. Trabalho numa entidade sindical e há anos procuro algo do tipo. Só encontrei uma vez (cerca de 12 anos atrás) uma publicação impressa vinda do próprio ministério, mas já está desatualizada. Na Caixa Econômica Federal têm um cadastro devido às contribuições sindicais, mas não garante que a entidade está 100% legalizada com o Ministério do Trabalho. Grande abraço... Marcus Vinicius Scarpelli Informática FECESP - Original Message - From: Jorge Ericsson Sent: Thursday, January 31, 2008 7:25 PM Subject: [delphi-br] Urgente - Tabelas com todos os sindicatos Pessoal, alguém possui ou indicaria um lugar onde posso encontrar o cadastros de todos os sindicatos ? Problema: Eu estou desenvolvendo em meu sistema uma rotina de folha de pagamento e tem uma tabela de sindicatos então eu gostaria de popular essa tabela para facilitar a associação do funcionário ao sindicatos de sua área. 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] -- 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]
Re: [delphi-br] Urgente!!!!!!!!! Itens da Nota - DBGRID
Boa Noite, acredito q isso possa estar acontecendo por vc não ter definido
alguns pontos chaves, mas vamos rever eles agora.
No cabeçalho vc está usando um um TDataSource ligado a um TIBQuery e os
TEdits ou outros elemententos do cabeçalho ligados a essa DataSource, até aki
tudo OK, se vc usar um DBNavigaitor ligado a esse Datasource_Cabecalho ele está
trocando entre os cabeçalhos, correto?
com nos itens tem que fazer o seguinte
1º no TIBQuery ou TIBDataSet vc tem a propiedade Datasource aqui vc deve
coloca o DataSource do Cabeçalho.
2º no SQL vc deve ter um código tipo:
SELECT CODIGO,DESCRICAO,COD_CABECALHO
FROM ITN_NOTAFISCAL
WHERE COD_CABECALHO=:CODIGO -- ESSE EH O CODIGO DO CABEÇALHO
3º agora eh sow vc ligar o TDatasouce_itens com um DBGrid + DBNavigaitor
ativar as Query's
Percebera que agora o seu Form tem 2 DBNav 1 ligado com o
Datasource_cabecalho e outro ligado com Datasource_Itens.
Att Rafael.
Guilherme Alves [EMAIL PROTECTED] escreveu:
Olá amigos, preciso de uma ajuda urgente.
Estou desenvolvendo uma aplicação básica de cadastro de notas com seus
determinados itens da nota.
Quando eu abro o formulário já mostra o cabeçalho da nota com suas
respectivas informações e logo abaixo no mesmo form tem um grid, que mostra os
itens dessa nota.
Não sei o que está acontecendo que eu abro o formulário ele mostra tanto o
cabeçalho quanto os itens normal, mas quando eu clico no botão de navegação
(próximo, anterior, primeiro e último) o grid (itens da nota) não estão
acompanhando o cabeçalho da nota...
No botão próximo por exemplo está assim:
datamodule.sql4.Next;
mostra_cabecalho;
datamodule.sql5.next;
mostra_itens;
Em vez do mostra_itens mostrar os itens que é se refere ao cabeçalho da nota, o
datamodule.sql5 está andando no grid, como se ele tivesse andando nos itens
daquela nota, e não indo para o próximo registro.
OBS: o mostra_itens é uma consulta sql que mostra os itens no grid conforme é o
código do cabeçalho da nota
..sql.add('and');
sql.add('via.cod_via=:cod');
ParamByName('cod').Value:=edt_cod.text;
Resumindo...
Quando mostrar o cabeçalho da nota e seus respectivos itens, quero que cada vez
que eu for utilizando os botões de navegação, o grid (os itens) acompanha o
cabeçalho, e não ir de item a item.
obrigado
-
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]
[delphi-br] Urgente!!!!!!!!! Itens da Nota - DBGRID
Olá amigos, preciso de uma ajuda urgente.
Estou desenvolvendo uma aplicação básica de cadastro de notas com seus
determinados itens da nota.
Quando eu abro o formulário já mostra o cabeçalho da nota com suas
respectivas informações e logo abaixo no mesmo form tem um grid, que mostra os
itens dessa nota.
Não sei o que está acontecendo que eu abro o formulário ele mostra tanto o
cabeçalho quanto os itens normal, mas quando eu clico no botão de navegação
(próximo, anterior, primeiro e último) o grid (itens da nota) não estão
acompanhando o cabeçalho da nota...
No botão próximo por exemplo está assim:
datamodule.sql4.Next;
mostra_cabecalho;
datamodule.sql5.next;
mostra_itens;
Em vez do mostra_itens mostrar os itens que é se refere ao cabeçalho da nota,
o datamodule.sql5 está andando no grid, como se ele tivesse andando nos itens
daquela nota, e não indo para o próximo registro.
OBS: o mostra_itens é uma consulta sql que mostra os itens no grid conforme é
o código do cabeçalho da nota
.sql.add('and');
sql.add('via.cod_via=:cod');
ParamByName('cod').Value:=edt_cod.text;
Resumindo...
Quando mostrar o cabeçalho da nota e seus respectivos itens, quero que cada vez
que eu for utilizando os botões de navegação, o grid (os itens) acompanha o
cabeçalho, e não ir de item a item.
obrigado
-
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]
RES: [delphi-br] Urgente!!!!!!!!! Itens da Nota - DBGRID
O estimado,
Boa noite. Não vai rolar mesmo. Faz o seguinte: no evento AFTERSCROLL do
SQL4 fecha o SQL5 e coloca uma nova instrução SQL nela tendo como parâmetro
o registro rolado no SQL4, sacou ?
SQL4 - propriedade/comando NEXT sendo executado (suponha que tenha no texto
sql do SQL4 : select nota, cliente, valor FROM notas)
- no afterscroll do SQL4 coloca:
SQL5.Close;
SQL5.SQL.Clear;
SQL5.Add('SELECT nota, item, codpro, descricao, qtde, unitario FROM
itensnota WHERE nota = ' + SQL4.FieldByName('nota').AsString);
SQL5.Open;
Dispensa o :
datamodule.sql5.next;
mostra_itens;
Ou monta um mestre/detalhe.
Saudações.
Alexandre.
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Guilherme Alves
Enviada em: segunda-feira, 28 de janeiro de 2008 17:44
Para: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED]
Assunto: [delphi-br] Urgente! Itens da Nota - DBGRID
Olá amigos, preciso de uma ajuda urgente.
Estou desenvolvendo uma aplicação básica de cadastro de notas com seus
determinados itens da nota.
Quando eu abro o formulário já mostra o cabeçalho da nota com suas
respectivas informações e logo abaixo no mesmo form tem um grid, que mostra
os itens dessa nota.
Não sei o que está acontecendo que eu abro o formulário ele mostra tanto o
cabeçalho quanto os itens normal, mas quando eu clico no botão de navegação
(próximo, anterior, primeiro e último) o grid (itens da nota) não estão
acompanhando o cabeçalho da nota...
No botão próximo por exemplo está assim:
datamodule.sql4.Next;
mostra_cabecalho;
datamodule.sql5.next;
mostra_itens;
Em vez do mostra_itens mostrar os itens que é se refere ao cabeçalho da
nota, o datamodule.sql5 está andando no grid, como se ele tivesse andando
nos itens daquela nota, e não indo para o próximo registro.
OBS: o mostra_itens é uma consulta sql que mostra os itens no grid
conforme é o código do cabeçalho da nota
.sql.add('and');
sql.add('via.cod_via=:cod');
ParamByName('cod').Value:=edt_cod.text;
Resumindo...
Quando mostrar o cabeçalho da nota e seus respectivos itens, quero que cada
vez que eu for utilizando os botões de navegação, o grid (os itens)
acompanha o cabeçalho, e não ir de item a item.
obrigado
Re: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry
Bom dia! Vc poderia usar um arquivo XML que tivesse essas configurações. Substituiria um arquivo INI, de uma maneira um pouco mais elegante. Ou então gerar um arquivo com uma extensão aleatória (por exemplo .IP) que somente seu programa trabalhasse e nela gravaria as informações que vc precisa no seu aplicativo, como por exemplo o IP dinâmico gerado pela rede. Atenciosamente, Ricardo. Jorge Ericsson [EMAIL PROTECTED] escreveu: Olá amigos, Eu tenho um sistema instalado em um cliente a muito muito tempo que vinha funcionando corretamente, mas o administrador da empresa resolveu adotada uma politica de segurança devido a quantidade de vírus que esta infestando a rede. Uma dessas medidas foi a proibição da escrita na registry e retirando todos os usuários da rede como administrador da máquina. Bom eu avisei a ele que o meu programa precisa escrever na registry o IP local dá máquina, pois utilizo mysql e como a rede sempre gera IP dinâmico eu tinha problemas na permissão de usuário no banco. Bom eu gostaria de saber se alguém já passou por isso ou tem uma sujestão para que eu possa continua gravando na registry do windows sem que os usuários não precisem de administração total na máquina. Espero ter sido claro no meu problema. Obs: Não gostaria de usar arquivo INI pois já tive sério problemas de exclusão de arquivos. 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] _ - 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]
Re: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry
Olá pessoal, eu acho que o Eduardo matou a charada eu vou colocar no servidor um range 192.168.%.% que talvez resolva. Mas deixa eu explicar o pq de usar o ip completo das máquina na rede. Antes eu estava usando o nome da máquina no mysql e ao tentar uma conexão com ODBC eu recebia um retorno informando que a máquina tal não tinha permissão de acesso ao banco. Bom então depois de muito pesquisa eu resolvi colocar o IP da máquina na tabela USER e funcionou de cara, eu pensei se eu alterar o arquivo host acrescentar o IP do servidor (Ex.: 192.168.1.1) e um alias por exemplo Servidor não precisaria ficar precisando re-configurar acesso caso o servidor mudasse. Eu pensei em usar registry antes devido a mudança nesse cliente de range de IP um tempo esta 10.10.0.1 outra hora esta 192.168.1.1 e assim por diante, dessa forma eu pegaria o ip da máquina, verificaria se o mesmo estava cadastrado na tabela USER do mysql e se não adicionaria... será que entenderam o motivo... Mas creio que a minha pouco experiência com o MySql não me possibilitou pensar nessa hipotese. E agora sim não precisarei mais gravar nada da registry. Valew pessoal.. Em 24/01/08, Joao Morais [EMAIL PROTECTED] escreveu: Jorge Ericsson wrote: Bom eu avisei a ele que o meu programa precisa escrever na registry o IP local dá máquina, pois utilizo mysql e como a rede sempre gera IP dinâmico eu tinha problemas na permissão de usuário no banco. Bom eu gostaria de saber se alguém já passou por isso ou tem uma sujestão para que eu possa continua gravando na registry do windows sem que os usuários não precisem de administração total na máquina. Não é todo o registro que fica bloqueado, as chaves de usuário são leitura e escrita. Mas o melhor mesmo é permitir que o banco receba conexão de toda sua rede local, tal qual foi recomendado. O que eu fiquei sem entender é em que gravar no registro vai te ajudar. -- Joao Morais -- 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]
Re: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry
Que bom Jorge que eu pude ajudar, sucesso ai com o mysql, eu uso ha mais de 3 anos e to muito satisfeito. Em 25/01/08, Jorge Ericsson [EMAIL PROTECTED] escreveu: Olá pessoal, eu acho que o Eduardo matou a charada eu vou colocar no servidor um range 192.168.%.% que talvez resolva. Mas deixa eu explicar o pq de usar o ip completo das máquina na rede. Antes eu estava usando o nome da máquina no mysql e ao tentar uma conexão com ODBC eu recebia um retorno informando que a máquina tal não tinha permissão de acesso ao banco. Bom então depois de muito pesquisa eu resolvi colocar o IP da máquina na tabela USER e funcionou de cara, eu pensei se eu alterar o arquivo host acrescentar o IP do servidor (Ex.: 192.168.1.1) e um alias por exemplo Servidor não precisaria ficar precisando re-configurar acesso caso o servidor mudasse. Eu pensei em usar registry antes devido a mudança nesse cliente de range de IP um tempo esta 10.10.0.1 outra hora esta 192.168.1.1 e assim por diante, dessa forma eu pegaria o ip da máquina, verificaria se o mesmo estava cadastrado na tabela USER do mysql e se não adicionaria... será que entenderam o motivo... Mas creio que a minha pouco experiência com o MySql não me possibilitou pensar nessa hipotese. E agora sim não precisarei mais gravar nada da registry. Valew pessoal.. Em 24/01/08, Joao Morais [EMAIL PROTECTED]post%40joaomorais.com.br escreveu: Jorge Ericsson wrote: Bom eu avisei a ele que o meu programa precisa escrever na registry o IP local dá máquina, pois utilizo mysql e como a rede sempre gera IP dinâmico eu tinha problemas na permissão de usuário no banco. Bom eu gostaria de saber se alguém já passou por isso ou tem uma sujestão para que eu possa continua gravando na registry do windows sem que os usuários não precisem de administração total na máquina. Não é todo o registro que fica bloqueado, as chaves de usuário são leitura e escrita. Mas o melhor mesmo é permitir que o banco receba conexão de toda sua rede local, tal qual foi recomendado. O que eu fiquei sem entender é em que gravar no registro vai te ajudar. -- Joao Morais -- 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] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry
Olá amigos, Eu tenho um sistema instalado em um cliente a muito muito tempo que vinha funcionando corretamente, mas o administrador da empresa resolveu adotada uma politica de segurança devido a quantidade de vírus que esta infestando a rede. Uma dessas medidas foi a proibição da escrita na registry e retirando todos os usuários da rede como administrador da máquina. Bom eu avisei a ele que o meu programa precisa escrever na registry o IP local dá máquina, pois utilizo mysql e como a rede sempre gera IP dinâmico eu tinha problemas na permissão de usuário no banco. Bom eu gostaria de saber se alguém já passou por isso ou tem uma sujestão para que eu possa continua gravando na registry do windows sem que os usuários não precisem de administração total na máquina. Espero ter sido claro no meu problema. Obs: Não gostaria de usar arquivo INI pois já tive sério problemas de exclusão de arquivos. 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]
RES: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry
Não conheço MySQL tão bem assim, mas presumo que o IP do cliente não tenha nada a ver com a conexão estabelecida, se tivesse, nenhum site usaria, certo? É esse mesmo o problema? Os outros bancos de dados, com os quais já tive experiência, não dependiam do IP do cliente, pelo menos... Mas se o Registry está bloqueado, escreva o arquivo necessário em alguma pasta escondida... é um solução mais simples do que passar pelo bloqueio do windows. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Jorge Ericsson Enviada em: quinta-feira, 24 de janeiro de 2008 14:39 Assunto: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry Olá amigos, Eu tenho um sistema instalado em um cliente a muito muito tempo que vinha funcionando corretamente, mas o administrador da empresa resolveu adotada uma politica de segurança devido a quantidade de vírus que esta infestando a rede. Uma dessas medidas foi a proibição da escrita na registry e retirando todos os usuários da rede como administrador da máquina. Bom eu avisei a ele que o meu programa precisa escrever na registry o IP local dá máquina, pois utilizo mysql e como a rede sempre gera IP dinâmico eu tinha problemas na permissão de usuário no banco. Bom eu gostaria de saber se alguém já passou por isso ou tem uma sujestão para que eu possa continua gravando na registry do windows sem que os usuários não precisem de administração total na máquina. Espero ter sido claro no meu problema. Obs: Não gostaria de usar arquivo INI pois já tive sério problemas de exclusão de arquivos. Valew !!! -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsso http://www.jericsson.com.br n.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] URGENTE!!! Problemas com bloqueio de escrita na registry
Vitor, no Mysql ao criar um usuário vc pode determinar uma faixa de IP que o servidor vai aceitar;;; tipo se vc definir no campo host o valor 192.168.%.% o mysql so vai deixar o cliente conectar caso o IP dele seja 192.168.X.X para permitir que qualquer IP conecte ao servidor basta colocar % no campo Host.. Em 24/01/08, Vitor Redes [EMAIL PROTECTED] escreveu: Não conheço MySQL tão bem assim, mas presumo que o IP do cliente não tenha nada a ver com a conexão estabelecida, se tivesse, nenhum site usaria, certo? É esse mesmo o problema? Os outros bancos de dados, com os quais já tive experiência, não dependiam do IP do cliente, pelo menos... Mas se o Registry está bloqueado, escreva o arquivo necessário em alguma pasta escondida... é um solução mais simples do que passar pelo bloqueio do windows. Vitor. _ 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 Jorge Ericsson Enviada em: quinta-feira, 24 de janeiro de 2008 14:39 Assunto: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry Olá amigos, Eu tenho um sistema instalado em um cliente a muito muito tempo que vinha funcionando corretamente, mas o administrador da empresa resolveu adotada uma politica de segurança devido a quantidade de vírus que esta infestando a rede. Uma dessas medidas foi a proibição da escrita na registry e retirando todos os usuários da rede como administrador da máquina. Bom eu avisei a ele que o meu programa precisa escrever na registry o IP local dá máquina, pois utilizo mysql e como a rede sempre gera IP dinâmico eu tinha problemas na permissão de usuário no banco. Bom eu gostaria de saber se alguém já passou por isso ou tem uma sujestão para que eu possa continua gravando na registry do windows sem que os usuários não precisem de administração total na máquina. Espero ter sido claro no meu problema. Obs: Não gostaria de usar arquivo INI pois já tive sério problemas de exclusão de arquivos. Valew !!! -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsso http://www.jericsson.com.br n.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] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry
Certo, legal. Então acho que a resposta do nosso amigo esta aí. Vitor. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Eduardo Silva dos Santos Enviada em: quinta-feira, 24 de janeiro de 2008 20:37 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry Vitor, no Mysql ao criar um usuário vc pode determinar uma faixa de IP que o servidor vai aceitar;;; tipo se vc definir no campo host o valor 192.168.%.% o mysql so vai deixar o cliente conectar caso o IP dele seja 192.168.X.X para permitir que qualquer IP conecte ao servidor basta colocar % no campo Host.. Em 24/01/08, Vitor Redes vredesredsystem@ mailto:vredesredsystem%40yahoo.com.br yahoo.com.br escreveu: Não conheço MySQL tão bem assim, mas presumo que o IP do cliente não tenha nada a ver com a conexão estabelecida, se tivesse, nenhum site usaria, certo? É esse mesmo o problema? Os outros bancos de dados, com os quais já tive experiência, não dependiam do IP do cliente, pelo menos... Mas se o Registry está bloqueado, escreva o arquivo necessário em alguma pasta escondida... é um solução mais simples do que passar pelo bloqueio do windows. Vitor. _ De: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br [mailto: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br delphi-br%40yahoogrupos.com.br] Em nome de Jorge Ericsson Enviada em: quinta-feira, 24 de janeiro de 2008 14:39 Assunto: [delphi-br] URGENTE!!! Problemas com bloqueio de escrita na registry Olá amigos, Eu tenho um sistema instalado em um cliente a muito muito tempo que vinha funcionando corretamente, mas o administrador da empresa resolveu adotada uma politica de segurança devido a quantidade de vírus que esta infestando a rede. Uma dessas medidas foi a proibição da escrita na registry e retirando todos os usuários da rede como administrador da máquina. Bom eu avisei a ele que o meu programa precisa escrever na registry o IP local dá máquina, pois utilizo mysql e como a rede sempre gera IP dinâmico eu tinha problemas na permissão de usuário no banco. Bom eu gostaria de saber se alguém já passou por isso ou tem uma sujestão para que eu possa continua gravando na registry do windows sem que os usuários não precisem de administração total na máquina. Espero ter sido claro no meu problema. Obs: Não gostaria de usar arquivo INI pois já tive sério problemas de exclusão de arquivos. Valew !!! -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsso http://www.jericsso http://www.jericsson.com.br n.com.br n.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] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: eduardo.drd@ mailto:eduardo.drd%40gmail.com gmail.com Site: http://www.drdsiste http://www.drdsistemas.com/ mas.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!!! Problemas com bloqueio de escrita na registry
Jorge Ericsson wrote: Bom eu avisei a ele que o meu programa precisa escrever na registry o IP local dá máquina, pois utilizo mysql e como a rede sempre gera IP dinâmico eu tinha problemas na permissão de usuário no banco. Bom eu gostaria de saber se alguém já passou por isso ou tem uma sujestão para que eu possa continua gravando na registry do windows sem que os usuários não precisem de administração total na máquina. Não é todo o registro que fica bloqueado, as chaves de usuário são leitura e escrita. Mas o melhor mesmo é permitir que o banco receba conexão de toda sua rede local, tal qual foi recomendado. O que eu fiquei sem entender é em que gravar no registro vai te ajudar. -- Joao Morais
Re: [delphi-br] URGENTE - Inserir uma imagem na planilha Excel
Valew amigos pelas dicas, mas não deu certo para o que eu quero. Estou utilizando um componente DevExpress para resolver o problema. Obrigado. Em 18/01/08, Adriano Santos (Yahoo) [EMAIL PROTECTED] escreveu: Dê uma olhada nesse artigo que publiquei e veja se ajuda. http://www.devmedia.com.br/articles/viewcomp.asp?comp=1298 Adriano Santos -- Editor Técnico Revista ClubeDelphi www.delphitodelphi.blogspot.com www.devmedia.com.br www.devmedia.com.br/clubedelphi/pagina.asp fabio giro respondeu: Peguei estas duas dicas na lista. try xlws.Shapes.AddPicture(logofname, LinkToFile, SaveWithDocument, 1, 1, 143, 32); except end; Onde: xlws é um objeto do tipo TExcelWorksheet logofname é uma variável que contem o path + o nome do jpg LinkToFile pode ser setado para 0 SaveWithDocument informa se a imagem deve ser salva no local de destino, sete ela para 1 os dois ultimos parametros, 143 e 32, correspondem as medidas que você quer que a imagem tenha na planilha ** www.devmedia.com.br/articles/viewcomp.asp?comp=1298hl= Espero ter ajudado. Jorge Ericsson [EMAIL PROTECTED] jericssonsup%40gmail.com mailto:jericssonsup%40gmail.com escreveu: Olá amigos delphianos, Primeiramente desejo a todos do grupo um 2008 repleto de desafios e mais conhecimentos. Que o desejo de todos se realizem neste ano que se inicia. Pessoal, através de OleContainer eu atribuir dados em uma planinha e formatei os campos do jeito que precisava, mas não consegui acrescentar na primeira linha da primeira coluna a logo do meu cliente. Alguém tem uma idéia de como faço isso automaticamente sem ter que ir na opção INSERIR IMAGEM ?: Obs.: Alguém utiliza o componente DevExpress cxSpreadBook ? []´s Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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] - 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.516 / Virus Database: 269.19.6/1230 - Release Date: 17/01/2008 16:59 -- 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]
Re: [delphi-br] URGENTE - Inserir uma imagem na planilha Excel
Peguei estas duas dicas na lista. try xlws.Shapes.AddPicture(logofname, LinkToFile, SaveWithDocument, 1, 1, 143, 32); except end; Onde: xlws é um objeto do tipo TExcelWorksheet logofname é uma variável que contem o path + o nome do jpg LinkToFile pode ser setado para 0 SaveWithDocument informa se a imagem deve ser salva no local de destino, sete ela para 1 os dois ultimos parametros, 143 e 32, correspondem as medidas que você quer que a imagem tenha na planilha ** www.devmedia.com.br/articles/viewcomp.asp?comp=1298hl= Espero ter ajudado. Jorge Ericsson [EMAIL PROTECTED] escreveu: Olá amigos delphianos, Primeiramente desejo a todos do grupo um 2008 repleto de desafios e mais conhecimentos. Que o desejo de todos se realizem neste ano que se inicia. Pessoal, através de OleContainer eu atribuir dados em uma planinha e formatei os campos do jeito que precisava, mas não consegui acrescentar na primeira linha da primeira coluna a logo do meu cliente. Alguém tem uma idéia de como faço isso automaticamente sem ter que ir na opção INSERIR IMAGEM ?: Obs.: Alguém utiliza o componente DevExpress cxSpreadBook ? []´s 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] - 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]
Re: [delphi-br] URGENTE - Inserir uma imagem na planilha Excel
Dê uma olhada nesse artigo que publiquei e veja se ajuda. http://www.devmedia.com.br/articles/viewcomp.asp?comp=1298 Adriano Santos - Editor Técnico Revista ClubeDelphi www.delphitodelphi.blogspot.com www.devmedia.com.br www.devmedia.com.br/clubedelphi/pagina.asp fabio giro respondeu: Peguei estas duas dicas na lista. try xlws.Shapes.AddPicture(logofname, LinkToFile, SaveWithDocument, 1, 1, 143, 32); except end; Onde: xlws é um objeto do tipo TExcelWorksheet logofname é uma variável que contem o path + o nome do jpg LinkToFile pode ser setado para 0 SaveWithDocument informa se a imagem deve ser salva no local de destino, sete ela para 1 os dois ultimos parametros, 143 e 32, correspondem as medidas que você quer que a imagem tenha na planilha ** www.devmedia.com.br/articles/viewcomp.asp?comp=1298hl= Espero ter ajudado. Jorge Ericsson [EMAIL PROTECTED] mailto:jericssonsup%40gmail.com escreveu: Olá amigos delphianos, Primeiramente desejo a todos do grupo um 2008 repleto de desafios e mais conhecimentos. Que o desejo de todos se realizem neste ano que se inicia. Pessoal, através de OleContainer eu atribuir dados em uma planinha e formatei os campos do jeito que precisava, mas não consegui acrescentar na primeira linha da primeira coluna a logo do meu cliente. Alguém tem uma idéia de como faço isso automaticamente sem ter que ir na opção INSERIR IMAGEM ?: Obs.: Alguém utiliza o componente DevExpress cxSpreadBook ? []´s Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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] - 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.516 / Virus Database: 269.19.6/1230 - Release Date: 17/01/2008 16:59
[delphi-br] URGENTE - Inserir uma imagem na planilha Excel
Olá amigos delphianos, Primeiramente desejo a todos do grupo um 2008 repleto de desafios e mais conhecimentos. Que o desejo de todos se realizem neste ano que se inicia. Pessoal, através de OleContainer eu atribuir dados em uma planinha e formatei os campos do jeito que precisava, mas não consegui acrescentar na primeira linha da primeira coluna a logo do meu cliente. Alguém tem uma idéia de como faço isso automaticamente sem ter que ir na opção INSERIR IMAGEM ?: Obs.: Alguém utiliza o componente DevExpress cxSpreadBook ? []´s 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]
Re: [delphi-br] URGENTE- win98 esconde as telas....
Olá Rafael, me diga uma coisa.. compilando seu projeto no Delphi 7 ou 2006 ele roda no Win98? digo isso pq a tendência daqui pra frente é do Delphi so dar suporte do XP pra frente.. exemplo prático, o exe gerado no D2007 não roda no NT4, só são lembro qual service pack tinha o NT que testei. vou compilar um projeto aqui no 2007 e testar no Win98 pra ver.. depois de falo alguma coisa. ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... - Original Message - From: Rafael Jorge To: delphi-br Sent: Thursday, January 03, 2008 6:42 PM Subject: [delphi-br] URGENTE- win98 esconde as telas Já postei antes sobre isso mas não obtive resposta, então como meu problema ainda persiste e acho que alguém pode ter esse mesmo problema vou explicar de novo ele aqui.. (obs. Não to reclamando não, sei que aqui é uma lista ninguém tem dever de responder a ninguém não... não me entendam mal). Tenho um aplicativo desenvolvido em delphi 2007, ele roda normalmente em maquinas win xp, windows 2000 e assim vai. Mas em windows 98 ele roda.. so que escondendo as janelas.. tipo.. ao iniciar meu sistema ele cria o form principal e chama a tela de login (no evento onactive) pro usuário passar seus dados para poder logar no sistema. Se meu sistema rodar num windows 98 simplesmente o form principal aparece. E a tela de login não.. mas se vc digitar o login.. apertar enter e digitar a senha e apertar entre ele loga.. e como se o focu tivesse na tela de login e tudo o mais. Só que ela esta atraz do form principal.. Outra coisa. Tem telas que ficam cortadas no meio.. com barra de rolagem e tudo o mais. Aquém já passou por isso? Ou sabe o que eu tenho que fazer pra evitar esses erros? Porque tem um novo cliente e lá é uma rede só com windows 98. e ele não vai atualizar pra xp nem nada disso. Ou eu resolvo essa bronca ou infelizmente vou perde-lo.. Obrigado quem puder me ajudar.. t+ -- Rafael jorge alves (Analista/desenvolvedor) www.sistemafocus.com.br sistema focus de gestão comercial e serviços em informatica. -- [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] URGENTE- win98 esconde as telas....
Mas D2007 é compatível com win95/win98??? De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Rafael Jorge Enviada em: quinta-feira, 3 de janeiro de 2008 19:43 Para: delphi-br Assunto: [delphi-br] URGENTE- win98 esconde as telas Já postei antes sobre isso mas não obtive resposta, então como meu problema ainda persiste e acho que alguém pode ter esse mesmo problema vou explicar de novo ele aqui.. (obs. Não to reclamando não, sei que aqui é uma lista ninguém tem dever de responder a ninguém não... não me entendam mal). Tenho um aplicativo desenvolvido em delphi 2007, ele roda normalmente em maquinas win xp, windows 2000 e assim vai. Mas em windows 98 ele roda.. so que escondendo as janelas.. tipo.. ao iniciar meu sistema ele cria o form principal e chama a tela de login (no evento onactive) pro usuário passar seus dados para poder logar no sistema. Se meu sistema rodar num windows 98 simplesmente o form principal aparece. E a tela de login não.. mas se vc digitar o login.. apertar enter e digitar a senha e apertar entre ele loga.. e como se o focu tivesse na tela de login e tudo o mais. Só que ela esta atraz do form principal.. Outra coisa. Tem telas que ficam cortadas no meio.. com barra de rolagem e tudo o mais. Aquém já passou por isso? Ou sabe o que eu tenho que fazer pra evitar esses erros? Porque tem um novo cliente e lá é uma rede só com windows 98. e ele não vai atualizar pra xp nem nada disso. Ou eu resolvo essa bronca ou infelizmente vou perde-lo.. Obrigado quem puder me ajudar.. t+ -- Rafael jorge alves (Analista/desenvolvedor) www.sistemafocus.com.br sistema focus de gestão comercial e serviços em informatica. -- [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 Aniversariante no QuickReport)
Eu já fiz isso amigo, o problema esta na ordenação, pois ele ordena o data 01/01/2000 e não 01/11. Mas valew pela dica... Em 12/12/07, Alcistemas Informática [EMAIL PROTECTED] escreveu: 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] -- 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]
Re: [delphi-br] Urgente (Exibir Dia e Mês do Aniversariante no QuickReport)
Problema Resolvido:
Apenas coloquei um Componente TQRExpr e Atribui o valor da Query ao mesmo.
Segue instrução adicionada ao ONPrint
Procedure TForm.QRExpr1Print(sender: TObject; var Value: String);
begin
Value := ADOQueryTemplate.FieldbyName('Nascimento').AsString;
if Value = Copy(DateToStr(Now),1,5) Then
begin
QRExpr1.Font.Style := [fsBold];
QRExpr1.Font.Color := clBlue;
end else
begin
QRExpr1.Font.Style := [];
QRExpr1.Font.Color := clBlack;
end;
end;
Em 12/12/07, Jorge Ericsson [EMAIL PROTECTED] escreveu:
Eu já fiz isso amigo, o problema esta na ordenação, pois ele ordena o data
01/01/2000 e não 01/11.
Mas valew pela dica...
Em 12/12/07, Alcistemas Informática [EMAIL PROTECTED] escreveu:
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]
--
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
--
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]
Re: [delphi-br] Urgente (Exibir Dia e Mês do Anive rsariante no QuickReport)
quando for assim é so vc ir no field da data e configurar em displayformat =
dd/mm
ou query.fieldbyname('data').displayformat = 'dd/mm';
qualquer data em formato dd/mm/ é tranformado como vc quiser no display
nesse caso dd/mm
funciona , simples e limpo.
- Original Message -
From: Jorge Ericsson
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, December 13, 2007 12:26 AM
Subject: Re: [delphi-br] Urgente (Exibir Dia e Mês do Aniversariante no
QuickReport)
Problema Resolvido:
Apenas coloquei um Componente TQRExpr e Atribui o valor da Query ao mesmo.
Segue instrução adicionada ao ONPrint
Procedure TForm.QRExpr1Print(sender: TObject; var Value: String);
begin
Value := ADOQueryTemplate.FieldbyName('Nascimento').AsString;
if Value = Copy(DateToStr(Now),1,5) Then
begin
QRExpr1.Font.Style := [fsBold];
QRExpr1.Font.Color := clBlue;
end else
begin
QRExpr1.Font.Style := [];
QRExpr1.Font.Color := clBlack;
end;
end;
Em 12/12/07, Jorge Ericsson [EMAIL PROTECTED] escreveu:
Eu já fiz isso amigo, o problema esta na ordenação, pois ele ordena o data
01/01/2000 e não 01/11.
Mas valew pela dica...
Em 12/12/07, Alcistemas Informática [EMAIL PROTECTED] escreveu:
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]
--
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
--
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] 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]
[delphi-br] URGENTE : Salvando dados no BD
tenho os seguintes componentes em um Data module, um SQLConection,
um SQLDataSet{SQLcadLista}, um DataSetProvider{DSPcadLista} e um
ClientDataset{CDScadLista}
Criei um formulario a partir dos campos do meu ClienteDataset...
e Criei um botão para Salvar e coloque o seguinte código no Onclick
do botão..
if DNNConexao.CDScadListaProgCOD.IsNull then
begin
DNNConexao.CDScadListaProgCOD.Value := 0;
DNNConexao.CDScadListaProg.ApplyUpdates(-1);
DNNConexao.CDScadListaProg.Open;
DNNConexao.CDScadListaProg.Close;
end
else
DNNConexao.CDScadListaProg.ApplyUpdates(-1);
Fechar:=true;
Close;
O primeiro registro ele salva normal...mas quando tenho cadastrar um
novo registro ele dá a seguinte mensagem...
Project NomeProjeto.exe raised exception class EDBClient with
message 'KeyViolation.'. Process stop. Use step or run to continue.
Será que alguem pode me ajudar onde eu estou errando...
Re: [delphi-br] URGENTE : Salvando dados no BD
ProgCOD deve ser a chave primária da tabela, não?
Por isso, vc não pode criar duas linhas com o mesmo valor na chave primária.
Se o campo for autoinc, então, vc não precisa dar um valor pra ele
na hora de incluir.
Em 06/12/07, william.designer [EMAIL PROTECTED] escreveu:
tenho os seguintes componentes em um Data module, um SQLConection,
um SQLDataSet{SQLcadLista}, um DataSetProvider{DSPcadLista} e um
ClientDataset{CDScadLista}
Criei um formulario a partir dos campos do meu ClienteDataset...
e Criei um botão para Salvar e coloque o seguinte código no Onclick
do botão..
if DNNConexao.CDScadListaProgCOD.IsNull then
begin
DNNConexao.CDScadListaProgCOD.Value := 0;
DNNConexao.CDScadListaProg.ApplyUpdates(-1);
DNNConexao.CDScadListaProg.Open;
DNNConexao.CDScadListaProg.Close;
end
else
DNNConexao.CDScadListaProg.ApplyUpdates(-1);
Fechar:=true;
Close;
O primeiro registro ele salva normal...mas quando tenho cadastrar um
novo registro ele dá a seguinte mensagem...
Project NomeProjeto.exe raised exception class EDBClient with
message 'KeyViolation.'. Process stop. Use step or run to continue.
--
Timeo hominem unius libri
Cogito ergo sum - Carpe diem
[]s
Guionardo Furlan
http://guionardo.blogspot.com
Re: [delphi-br] URGENTE POR FAVOR
Na Paleta ADDITIONAL, tem um componente chamado ApplicationEvents. Vc pode adicioná-lo no seu projeto, no DATA MODULE, por exemplo. Dê uma pesquisada sobre o mesmo. Vc vai encontra mta coisa pela net inclusive a forma de tratar cada erro. Vc vai adicionar os tratamentos no evento dele chamado onException. Att, Sérgio On Sun, 25 Nov 2007 16:59:40 -0200, Diego Seleguim wrote Preciso de tratar alguns erros no meu sistema e um deles é... violação de chave estrangeira. Isso acontece quando vou tentar deletar algo... e está sendo usado..! (claro) Alguem poderia me ajudar!? Abraçosss Em 17/11/07, Jumper [EMAIL PROTECTED] escreveu: Voce não precisa citar o nome da tabela novamente no join tente assim: select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, x.nome as destinatario from rota_viagem r inner join empresa e on (r.id_remet = e.idemp) and (r.id_destino = x.idemp) [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] Sérgio Tecnologia da Informação - TI Tel.: 16 3810 1060 e-mail: [EMAIL PROTECTED] Usina Alta Mogiana S/A - Acucar e Alcool [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE POR FAVOR
Eita..olha só quem eu encontro aqui.. rs rs... Blza parceiro??? Então.. já fiz isso e declarei as mensagensde acordo com os erros.. mas tá passando direto... vou dar uma olhada com calma depois...e posto se ñ conseguir sucesso! Vlw... Em 26/11/07, Sérgio [EMAIL PROTECTED] escreveu: Na Paleta ADDITIONAL, tem um componente chamado ApplicationEvents. Vc pode adicioná-lo no seu projeto, no DATA MODULE, por exemplo. Dê uma pesquisada sobre o mesmo. Vc vai encontra mta coisa pela net inclusive a forma de tratar cada erro. Vc vai adicionar os tratamentos no evento dele chamado onException. Att, Sérgio On Sun, 25 Nov 2007 16:59:40 -0200, Diego Seleguim wrote Preciso de tratar alguns erros no meu sistema e um deles é... violação de chave estrangeira. Isso acontece quando vou tentar deletar algo... e está sendo usado..! (claro) Alguem poderia me ajudar!? Abraçosss Em 17/11/07, Jumper [EMAIL PROTECTED] joaopaulo.jpo%40gmail.com escreveu: Voce não precisa citar o nome da tabela novamente no join tente assim: select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, x.nome as destinatario from rota_viagem r inner join empresa e on (r.id_remet = e.idemp) and (r.id_destino = x.idemp) [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] Sérgio Tecnologia da Informação - TI Tel.: 16 3810 1060 e-mail: [EMAIL PROTECTED] sergio%40altamogiana.com.br Usina Alta Mogiana S/A - Acucar e Alcool [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 POR FAVOR
Preciso de tratar alguns erros no meu sistema e um deles é... violação de chave estrangeira. Isso acontece quando vou tentar deletar algo... e está sendo usado..! (claro) Alguem poderia me ajudar!? Abraçosss Em 17/11/07, Jumper [EMAIL PROTECTED] escreveu: Voce não precisa citar o nome da tabela novamente no join tente assim: select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, x.nome as destinatario from rota_viagem r inner join empresa e on (r.id_remet = e.idemp) and (r.id_destino = x.idemp) [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] [urgente] Delphi 2006 X win98
minhas aplicações desenvolvidas em delphi 2005/2006 simplesmente dao bronca ao rodar num windows 98. a tela de menu fica por traz da tela principal impedindo que o usuario faça login. tambem da varios outros erros desse tipo alquem ja passou por isso? tenho 3 clientes novos e todos usam win98 e nao to vendo solução para isso. se alquem souber como contornar isso obrigado. t+ -- Rafael jorge alves Analista/desenvolvedor www.sistemafocus.com.br -- ERP completo www.acinformatica.org -- Empresa [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE POR FAVOR
Voce não precisa citar o nome da tabela novamente no join tente assim: select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, x.nome as destinatario from rota_viagem r inner join empresa e on (r.id_remet = e.idemp) and (r.id_destino = x.idemp) [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE POR FAVOR
Tente assim : === Aqui a parte alterada = select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, x.nome as destinatario from rota_viagem r join empresa e on r.id_remet = e.idemp join empresa x on r.id_destino = x.idemp [ ]´s Moacir = Diego Seleguim escreveu: CREATE TABLE EMPRESA ( IDEMP INTEGER NOT NULL, IDLOGRADOURO INTEGER, NOME VARCHAR(50), CGC VARCHAR(14), INSCEST VARCHAR(14), TELEFONE VARCHAR(10), FAX VARCHAR(10), EMAIL VARCHAR(50), CONTATO VARCHAR(50), DT_CADASTRO DATE, CELULAR VARCHAR(10), NUM_END INTEGER ); CREATE TABLE ROTA_VIAGEM ( IDROTA NUMERIC(9,0) NOT NULL, ID_REMETINTEGER NOT NULL, ID_DESTINO INTEGER NOT NULL, FRETE_TON NUMERIC(9,2), ICMSNUMERIC(9,2), DISTANCIA INTEGER, PEDAGIO NUMERIC(9,2) /**/ / Primary Keys / /**/ ALTER TABLE EMPRESA ADD CONSTRAINT EMPRESA PRIMARY KEY (IDEMP); ALTER TABLE ROTA_VIAGEM ADD CONSTRAINT ROTA_VIAGEM PRIMARY KEY (IDROTA); /**/ / Foreign Keys / /**/ ALTER TABLE EMPRESA ADD FOREIGN KEY (IDLOGRADOURO) REFERENCES LOGRADOURO (IDLOGRADOURO); ALTER TABLE ROTA_VIAGEM ADD FOREIGN KEY (ID_REMET) REFERENCES EMPRESA (IDEMP); ALTER TABLE ROTA_VIAGEM ADD FOREIGN KEY (ID_DESTINO) REFERENCES EMPRESA (IDEMP); Função da query: Retornar os nomes das empresas remetente e destinatario. select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, e.nome as destinatario from rota_viagem r join empresa e on r.id_remet = e.idemp join empresa e on r.id_destino = e.idemp Erro: alias E conflicts with an alias in the same statemente. Alguem pode me ajudar com esse erro? [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE POR FAVOR
Obrigado Moacir, era exatamente isso que eu precisava Abraços Em 15/11/07, Moacir - GMail [EMAIL PROTECTED] escreveu: Tente assim : === Aqui a parte alterada = select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, x.nome as destinatario from rota_viagem r join empresa e on r.id_remet = e.idemp join empresa x on r.id_destino = x.idemp [ ]´s Moacir = Diego Seleguim escreveu: CREATE TABLE EMPRESA ( IDEMP INTEGER NOT NULL, IDLOGRADOURO INTEGER, NOME VARCHAR(50), CGC VARCHAR(14), INSCEST VARCHAR(14), TELEFONE VARCHAR(10), FAX VARCHAR(10), EMAIL VARCHAR(50), CONTATO VARCHAR(50), DT_CADASTRO DATE, CELULAR VARCHAR(10), NUM_END INTEGER ); CREATE TABLE ROTA_VIAGEM ( IDROTA NUMERIC(9,0) NOT NULL, ID_REMET INTEGER NOT NULL, ID_DESTINO INTEGER NOT NULL, FRETE_TON NUMERIC(9,2), ICMS NUMERIC(9,2), DISTANCIA INTEGER, PEDAGIO NUMERIC(9,2) /**/ / Primary Keys / /**/ ALTER TABLE EMPRESA ADD CONSTRAINT EMPRESA PRIMARY KEY (IDEMP); ALTER TABLE ROTA_VIAGEM ADD CONSTRAINT ROTA_VIAGEM PRIMARY KEY (IDROTA); /**/ / Foreign Keys / /**/ ALTER TABLE EMPRESA ADD FOREIGN KEY (IDLOGRADOURO) REFERENCES LOGRADOURO (IDLOGRADOURO); ALTER TABLE ROTA_VIAGEM ADD FOREIGN KEY (ID_REMET) REFERENCES EMPRESA (IDEMP); ALTER TABLE ROTA_VIAGEM ADD FOREIGN KEY (ID_DESTINO) REFERENCES EMPRESA (IDEMP); Função da query: Retornar os nomes das empresas remetente e destinatario. select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, e.nome as destinatario from rota_viagem r join empresa e on r.id_remet = e.idemp join empresa e on r.id_destino = e.idemp Erro: alias E conflicts with an alias in the same statemente. Alguem pode me ajudar com esse erro? [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] URGENTE POR FAVOR
CREATE TABLE EMPRESA ( IDEMP INTEGER NOT NULL, IDLOGRADOURO INTEGER, NOME VARCHAR(50), CGC VARCHAR(14), INSCEST VARCHAR(14), TELEFONE VARCHAR(10), FAX VARCHAR(10), EMAIL VARCHAR(50), CONTATO VARCHAR(50), DT_CADASTRO DATE, CELULAR VARCHAR(10), NUM_END INTEGER ); CREATE TABLE ROTA_VIAGEM ( IDROTA NUMERIC(9,0) NOT NULL, ID_REMETINTEGER NOT NULL, ID_DESTINO INTEGER NOT NULL, FRETE_TON NUMERIC(9,2), ICMSNUMERIC(9,2), DISTANCIA INTEGER, PEDAGIO NUMERIC(9,2) /**/ / Primary Keys / /**/ ALTER TABLE EMPRESA ADD CONSTRAINT EMPRESA PRIMARY KEY (IDEMP); ALTER TABLE ROTA_VIAGEM ADD CONSTRAINT ROTA_VIAGEM PRIMARY KEY (IDROTA); /**/ / Foreign Keys / /**/ ALTER TABLE EMPRESA ADD FOREIGN KEY (IDLOGRADOURO) REFERENCES LOGRADOURO (IDLOGRADOURO); ALTER TABLE ROTA_VIAGEM ADD FOREIGN KEY (ID_REMET) REFERENCES EMPRESA (IDEMP); ALTER TABLE ROTA_VIAGEM ADD FOREIGN KEY (ID_DESTINO) REFERENCES EMPRESA (IDEMP); Função da query: Retornar os nomes das empresas remetente e destinatario. select r.idrota, r.id_remet, r.id_destino, e.nome as remetente, e.nome as destinatario from rota_viagem r join empresa e on r.id_remet = e.idemp join empresa e on r.id_destino = e.idemp Erro: alias E conflicts with an alias in the same statemente. Alguem pode me ajudar com esse erro? [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes
http://www.radix.net/~bziegler/Delphi/Source.html Sds. To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Tue, 30 Oct 2007 00:18:10 -0200Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Pode ser, mais todos as buscas que fiz em outros sites que apontão para estelink não funcionou e tbém entrei no própio site do Ben e nada, apenas estelink dá problema. Provavelmente é um link quebrado ou removeram os arquivos.Se vc tiver o remotecontrol.zip ou consegui baixar vc me envia em PVT ?Preciso estudar o código dele.Obrigado.Em 30/10/07, Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu: Mestre, vc deve ter alguma restrição de acesso a esse link, pq tanto na faculdade como em casa eu consigo acessar normalmente este link. Sds. To: [EMAIL PROTECTED] delphi-br%40yahoogrupos.com.brFrom: [EMAIL PROTECTED] jericssonsup%40gmail.comDate: Mon, 29 Oct 2007 22:59:08 -0200Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Este link não existe mais, estão todos quebrados qdo se refere ao BenZieglers.Mas vou continua meu garimpo... heheheEm 29/10/07, Rubem Nascimento da Rocha [EMAIL PROTECTED]djpardalrocha%40hotmail.com escreveu: Minha outra sugestão: http://www.radix.net/~bziegler/Delphi/http://www.radix.net/%7Ebziegler/Delphi/ http://www.radix.net/%7Ebziegler/Delphi/ (Procure pelo projeto Remote Control) Sds. To: [EMAIL PROTECTED]delphi-br%40yahoogrupos.com.brFromdelphi-br%40yahoogrupos.com.brFrom: [EMAIL PROTECTED] o2tecnologia%40ajato.com.brDateo2tecnologia%40ajato.com.brDate: Mon, 29 Oct 2007 20:03:13 -0300Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80.JorgeEricsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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] __ 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] -- Jorge Ericsson S. PinheiroAnalista/Projetista de SistemasEricsson Sistemas e Soluçõ eshttp://www.jericsson.com.br61 9227.4785 / 3965.2992 / 3039.1768Brasília- DF[As partes desta mensagem que não continham texto foram removidas] __ 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] -- Jorge Ericsson S. PinheiroAnalista/Projetista de SistemasEricsson Sistemas e Soluçõeshttp://www.jericsson.com.br61 9227.4785 / 3965.2992 / 3039.1768Brasília - DF[As partes desta mensagem que não continham texto foram removidas] _ 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]
Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes
Tem uma empresa de SP, não sei se vc é de SP, que desenvolve o WinConnection, bom na verdade a empresa é do Rio. Que não sei bem como eles personalizaram o ultravnc, e é interessante, vc não instala nada. Eles te mandam um arquivo, e quando precisa de suporte vc abre este arquivo e eles entram na sua maquina, depois que terminar vc fecha o executavel, nada no registro, nada na memoria. E eles tem um programa para cada atendente do suporte. Se tivesse como descobrir o q eles fizeram. Em 29/10/07, Jorge Ericsson [EMAIL PROTECTED] escreveu: Nunca usei, mas eu preciso mesmo é implementar um cliente no meu programa para depois usar o LogMeIn de qq lugar. Meu problema é desenvolver um Client funcional. Mas valeu pela diga e me parecer ser muito bom mesmo. Em 29/10/07, O2 Tecnologia (aJato) [EMAIL PROTECTED]o2tecnologia%40ajato.com.br escreveu: Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80. Jorge Ericsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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] -- 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]
Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes
Provavelmente eles usaram isso: http://sc.uvnc.com/cgi-bin/upload3.pl O UltraVNC personalizado, voce cria um EXE, informa quais serão os usuários, configura nas máquinas dos atendentes, e pronto... envia para o cliente, o cara clica no nome e o atendente recebe uma mensagem, e entra na maquina do cara... so precisa de um ip fixo na empresa sua, e nao no cliente, eu por exemplo uso o no-ip por causa de usar o Velox. []s Em 30/10/07, Nilson Chagas [EMAIL PROTECTED] escreveu: Tem uma empresa de SP, não sei se vc é de SP, que desenvolve o WinConnection, bom na verdade a empresa é do Rio. Que não sei bem como eles personalizaram o ultravnc, e é interessante, vc não instala nada. Eles te mandam um arquivo, e quando precisa de suporte vc abre este arquivo e eles entram na sua maquina, depois que terminar vc fecha o executavel, nada no registro, nada na memoria. E eles tem um programa para cada atendente do suporte. Se tivesse como descobrir o q eles fizeram. Em 29/10/07, Jorge Ericsson [EMAIL PROTECTED]jericssonsup%40gmail.com escreveu: Nunca usei, mas eu preciso mesmo é implementar um cliente no meu programa para depois usar o LogMeIn de qq lugar. Meu problema é desenvolver um Client funcional. Mas valeu pela diga e me parecer ser muito bom mesmo. Em 29/10/07, O2 Tecnologia (aJato) [EMAIL PROTECTED]o2tecnologia%40ajato.com.br o2tecnologia%40ajato.com.br escreveu: Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80. Jorge Ericsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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] -- 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] -- _ T.·.F.·.A.·. Fellipe Henrique [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Componente para Comunica ção Remota Free com fontes
Eles devem usar o UltraVNC Single Click... http://www.uvnc.com/addons/singleclick.html Com ele você pode personalizar tudo. Aqui também usamos. E nada impede que você o abra pelo seu sistema. Abraço _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Maringá - Paraná www.n2solutions.com.br - Original Message - From: Nilson Chagas To: delphi-br@yahoogrupos.com.br Sent: Tuesday, October 30, 2007 7:28 AM Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Tem uma empresa de SP, não sei se vc é de SP, que desenvolve o WinConnection, bom na verdade a empresa é do Rio. Que não sei bem como eles personalizaram o ultravnc, e é interessante, vc não instala nada. Eles te mandam um arquivo, e quando precisa de suporte vc abre este arquivo e eles entram na sua maquina, depois que terminar vc fecha o executavel, nada no registro, nada na memoria. E eles tem um programa para cada atendente do suporte. Se tivesse como descobrir o q eles fizeram. Em 29/10/07, Jorge Ericsson [EMAIL PROTECTED] escreveu: Nunca usei, mas eu preciso mesmo é implementar um cliente no meu programa para depois usar o LogMeIn de qq lugar. Meu problema é desenvolver um Client funcional. Mas valeu pela diga e me parecer ser muito bom mesmo. Em 29/10/07, O2 Tecnologia (aJato) [EMAIL PROTECTED]o2tecnologia%40ajato.com.br escreveu: Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80. Jorge Ericsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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] -- 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] __ NOD32 2626 (20071030) Information __ This message was checked by NOD32 antivirus system. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Componente para Comunica ção Remota Free com fontes
aqui eu acesso pelo speedy da telefonica e da pagina ñao encontrada tb... acho que é algum pau da telefonica se alguem conseguir puxar e me enviar em pvt.. agradeço - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br Sent: Monday, October 29, 2007 11:37 PM Subject: RE: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes http://www.radix.net/~bziegler/Delphi/Source.html Sds. To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Tue, 30 Oct 2007 00:18:10 -0200Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Pode ser, mais todos as buscas que fiz em outros sites que apontão para estelink não funcionou e tbém entrei no própio site do Ben e nada, apenas estelink dá problema. Provavelmente é um link quebrado ou removeram os arquivos.Se vc tiver o remotecontrol.zip ou consegui baixar vc me envia em PVT ?Preciso estudar o código dele.Obrigado.Em 30/10/07, Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu: Mestre, vc deve ter alguma restrição de acesso a esse link, pq tanto na faculdade como em casa eu consigo acessar normalmente este link. Sds. To: [EMAIL PROTECTED] delphi-br%40yahoogrupos.com.brFrom: [EMAIL PROTECTED] jericssonsup%40gmail.comDate: Mon, 29 Oct 2007 22:59:08 -0200Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Este link não existe mais, estão todos quebrados qdo se refere ao BenZieglers.Mas vou continua meu garimpo... heheheEm 29/10/07, Rubem Nascimento da Rocha [EMAIL PROTECTED]djpardalrocha%40hotmail.com escreveu: Minha outra sugestão: http://www.radix.net/~bziegler/Delphi/http://www.radix.net/%7Ebziegler/Delphi/ http://www.radix.net/%7Ebziegler/Delphi/ (Procure pelo projeto Remote Control) Sds. To: [EMAIL PROTECTED]delphi-br%40yahoogrupos.com.brFromdelphi-br%40yahoogrupos.com.brFrom: [EMAIL PROTECTED] o2tecnologia%40ajato.com.brDateo2tecnologia%40ajato.com.brDate: Mon, 29 Oct 2007 20:03:13 -0300Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80.JorgeEricsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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] __ 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] -- Jorge Ericsson S. PinheiroAnalista/Projetista de SistemasEricsson Sistemas e Soluçõ eshttp://www.jericsson.com.br61 9227.4785 / 3965.2992 / 3039.1768Brasília- DF[As partes desta mensagem que não continham texto foram removidas] __ 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] -- Jorge Ericsson S. PinheiroAnalista/Projetista de SistemasEricsson Sistemas e Soluçõeshttp://www.jericsson.com.br61 9227.4785 / 3965.2992 / 3039.1768Brasília - DF[As partes desta mensagem que não continham texto foram removidas] __ 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] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Componente para Comunica ção Remota Free com fontes
O VNC pode ser configurado para rodar na porta 80 também Luiz Escobar - Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/ASSEMBLY/MySQL/xBase SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse10.2), Windows 2K/XP - Original Message - From: O2 Tecnologia (aJato) To: delphi-br@yahoogrupos.com.br Sent: Monday, October 29, 2007 9:03 PM Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80. Jorge Ericsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Urgente - Component e para Comunicação Remota Free com fontes
Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80. Jorge Ericsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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] Urgente - Componente para Comunicação Remota Free com fontes
Minha outra sugestão: http://www.radix.net/~bziegler/Delphi/ (Procure pelo projeto Remote Control) Sds. To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Mon, 29 Oct 2007 20:03:13 -0300Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80.Jorge Ericsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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] _ 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]
RE: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes
Mestre, vc deve ter alguma restrição de acesso a esse link, pq tanto na faculdade como em casa eu consigo acessar normalmente este link. Sds. To: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Mon, 29 Oct 2007 22:59:08 -0200Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Este link não existe mais, estão todos quebrados qdo se refere ao BenZieglers.Mas vou continua meu garimpo... heheheEm 29/10/07, Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu: Minha outra sugestão: http://www.radix.net/~bziegler/Delphi/http://www.radix.net/%7Ebziegler/Delphi/ (Procure pelo projeto Remote Control) Sds. To: [EMAIL PROTECTED] delphi-br%40yahoogrupos.com.brFrom: [EMAIL PROTECTED] o2tecnologia%40ajato.com.brDate: Mon, 29 Oct 2007 20:03:13 -0300Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80.JorgeEricsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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] __ 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] -- Jorge Ericsson S. PinheiroAnalista/Projetista de SistemasEricsson Sistemas e Soluçõeshttp://www.jericsson.com.br61 9227.4785 / 3965.2992 / 3039.1768Brasília - DF[As partes desta mensagem que não continham texto foram removidas] _ 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]
Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes
Pode ser, mais todos as buscas que fiz em outros sites que apontão para este link não funcionou e tbém entrei no própio site do Ben e nada, apenas este link dá problema. Provavelmente é um link quebrado ou removeram os arquivos. Se vc tiver o remotecontrol.zip ou consegui baixar vc me envia em PVT ? Preciso estudar o código dele. Obrigado. Em 30/10/07, Rubem Nascimento da Rocha [EMAIL PROTECTED] escreveu: Mestre, vc deve ter alguma restrição de acesso a esse link, pq tanto na faculdade como em casa eu consigo acessar normalmente este link. Sds. To: [EMAIL PROTECTED] delphi-br%40yahoogrupos.com.brFrom: [EMAIL PROTECTED] jericssonsup%40gmail.comDate: Mon, 29 Oct 2007 22:59:08 -0200Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Este link não existe mais, estão todos quebrados qdo se refere ao BenZieglers.Mas vou continua meu garimpo... heheheEm 29/10/07, Rubem Nascimento da Rocha [EMAIL PROTECTED]djpardalrocha%40hotmail.com escreveu: Minha outra sugestão: http://www.radix.net/~bziegler/Delphi/http://www.radix.net/%7Ebziegler/Delphi/ http://www.radix.net/%7Ebziegler/Delphi/ (Procure pelo projeto Remote Control) Sds. To: [EMAIL PROTECTED]delphi-br%40yahoogrupos.com.brFromdelphi-br%40yahoogrupos.com.brFrom: [EMAIL PROTECTED] o2tecnologia%40ajato.com.brDateo2tecnologia%40ajato.com.brDate: Mon, 29 Oct 2007 20:03:13 -0300Subject: Re: [delphi-br] Urgente - Componente para Comunicação Remota Free com fontes Companheiro já tentou usar o LogMeIn (www.logmein.com) é free e funciona melhor impossivel, um verdadeiro pcAnywhere via browser na versão paga, fora que fura tudo que bloqueio de acesso, pois trafega pela porta 80.JorgeEricsson escreveu: Olá pessoal, Gostaria de implementar em minha aplicação um controle de acesso remoto, para dár suporte a distância aos meus clientes. Alguém poderia dar-me alguma informação a respeito de algum componente ou mesmo como utilizar o Indy ou JEDI (VCL) para esta finalizade ? Não posso e não quero usar VNC, UltraVNC, RealVNC e etc, pois tenho alguns clientes com certas restrições de uso desses programas e que não possuem permissão para tal procedimento. Andei pesquisa na rede e encontrei o DelphiVNC e VNCServer e VNCClient para delphi, mas ao compilar essas aplicações são gerados vários problemas com a versão nova do Indy(10 e 9) que possuo. Alguém poderia daar-me a direção das pedras ? Value -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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] __ 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] -- Jorge Ericsson S. PinheiroAnalista/Projetista de SistemasEricsson Sistemas e Soluçõ eshttp://www.jericsson.com.br61 9227.4785 / 3965.2992 / 3039.1768Brasília- DF[As partes desta mensagem que não continham texto foram removidas] __ 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] -- 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]
Re: [delphi-br] Urgente - Digitalização de documentos
Oi Jorge, Que erro deu? Qual o modelo do scannner? Qdo escrevi o artigo testei na minha Lexmark 1185 Multifuncional. Abs -- 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. http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: O Exemplo do Adriano é muito bom, cai como uma luva no que preciso, mas não esta funcionando bem, apresenta um erro ao capturar a imagem do scanner. Funcionou com vc Luciano ?? Em 25/10/07, Luciano Angelini [EMAIL PROTECTED] mailto:luciano.angelini%40uol.com.br escreveu: Bom dia Jorge Acesse o Site da www.devmedia.com.br tem uma edição da revista ClubeDelphi n° 83 que mostra passo a passo como fazer Espero ter ajudado Luciano Angelini Prefeitura de Lupionópolis-Pr Jorge Ericsson escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br 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] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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] No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.15.11/1094 - Release Date: 26/10/2007 08:50
Re: [delphi-br] Urgente - Digitalização de documentos
Boa Tarde Jorge Eu ainda não usei ... eu apenas me lembrei que tinha lido na Revista ClubeDelphi Luciano Angelini Prefeitura de Lupionópolis-Pr Jorge Ericsson escreveu: O Exemplo do Adriano é muito bom, cai como uma luva no que preciso, mas não esta funcionando bem, apresenta um erro ao capturar a imagem do scanner. Funcionou com vc Luciano ?? Em 25/10/07, Luciano Angelini [EMAIL PROTECTED] mailto:luciano.angelini%40uol.com.br escreveu: Bom dia Jorge Acesse o Site da www.devmedia.com.br tem uma edição da revista ClubeDelphi n° 83 que mostra passo a passo como fazer Espero ter ajudado Luciano Angelini Prefeitura de Lupionópolis-Pr Jorge Ericsson escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br 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] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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]
Re: [delphi-br] Urgente - Digitalização de documentos
Entendi. A única coisa que me deixou um pouco desconte com este componente foi o fato de dar um erro meio horrível quando vc cancela o escaneamento. Precisa fazer um tratamento de erro pra não aparecer mensaens feias demais ao usuário, se não assusta. Qq coisa tenta com TWain que deve funcionar tb. Esse componente que menciono no artigo é um pouco antigo. -- 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. http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: Oi Adriano eu uso o ColorPage-Slim 1200 da Genius e o erro apresentado é: Error from state: 4. Error type: 1. Eu acho que deve ser alhum problema com a unit TAcquireImage pq testei com outros exemplos que usam esta unit e apresentou o mesmo erro. Vou tentar com o Scanner da minha multifuncional e verificar se acontece o mesmo. Em 26/10/07, Adriano Santos [EMAIL PROTECTED] mailto:artes%40doiscliques.com escreveu: Oi Jorge, Que erro deu? Qual o modelo do scannner? Qdo escrevi o artigo testei na minha Lexmark 1185 Multifuncional. Abs -- 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. http://www.delphitodelphi.blogspot.com http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: O Exemplo do Adriano é muito bom, cai como uma luva no que preciso, mas não esta funcionando bem, apresenta um erro ao capturar a imagem do scanner. Funcionou com vc Luciano ?? Em 25/10/07, Luciano Angelini [EMAIL PROTECTED] mailto:luciano.angelini%40uol.com.brluciano.angelini%40uol.com.br mailto:luciano.angelini%40uol.com.br escreveu: Bom dia Jorge Acesse o Site da www.devmedia.com.br tem uma edição da revista ClubeDelphi n° 83 que mostra passo a passo como fazer Espero ter ajudado Luciano Angelini Prefeitura de Lupionópolis-Pr Jorge Ericsson escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br 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] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br 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] -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.15.11/1094 - Release Date: 26/10/2007 08:50 -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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] No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.15.11/1094 - Release Date: 26/10/2007 08:50 -- *Adriano Santos*
Re: [delphi-br] Urgente - Digitalização de documentos
Exatamente o que eu imaginava Adriano, funcionou com outro scanner (multifuncional da hp). Eu já tratei os erros malucos que apareceram, mas gostaria de desenvolver algum que servisse para qq scanner. Vou tentar trabalhar com o Twain agora... Obrigado pelo retorno. Em 26/10/07, Adriano Santos [EMAIL PROTECTED] escreveu: Entendi. A única coisa que me deixou um pouco desconte com este componente foi o fato de dar um erro meio horrível quando vc cancela o escaneamento. Precisa fazer um tratamento de erro pra não aparecer mensaens feias demais ao usuário, se não assusta. Qq coisa tenta com TWain que deve funcionar tb. Esse componente que menciono no artigo é um pouco antigo. -- 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. http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: Oi Adriano eu uso o ColorPage-Slim 1200 da Genius e o erro apresentado é: Error from state: 4. Error type: 1. Eu acho que deve ser alhum problema com a unit TAcquireImage pq testei com outros exemplos que usam esta unit e apresentou o mesmo erro. Vou tentar com o Scanner da minha multifuncional e verificar se acontece o mesmo. Em 26/10/07, Adriano Santos [EMAIL PROTECTED]artes%40doiscliques.com mailto:artes%40doiscliques.com escreveu: Oi Jorge, Que erro deu? Qual o modelo do scannner? Qdo escrevi o artigo testei na minha Lexmark 1185 Multifuncional. Abs -- 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. http://www.delphitodelphi.blogspot.com http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: O Exemplo do Adriano é muito bom, cai como uma luva no que preciso, mas não esta funcionando bem, apresenta um erro ao capturar a imagem do scanner. Funcionou com vc Luciano ?? Em 25/10/07, Luciano Angelini [EMAIL PROTECTED]luciano.angelini%40uol.com.br mailto:luciano.angelini%40uol.com.brluciano.angelini%40uol.com.br mailto:luciano.angelini%40uol.com.br escreveu: Bom dia Jorge Acesse o Site da www.devmedia.com.br tem uma edição da revista ClubeDelphi n° 83 que mostra passo a passo como fazer Espero ter ajudado Luciano Angelini Prefeitura de Lupionópolis-Pr Jorge Ericsson escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br 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] -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br 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] -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.503 / Virus Database: 269.15.11/1094 - Release Date: 26/10/2007 08:50 -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br 61 9227.4785 / 3965.2992 / 3039.1768 Brasília - DF [As partes desta
Re: [delphi-br] Urgente - Digitalização de documentos
Por nada meu velho, sempre as ordens. -- 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. http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: Exatamente o que eu imaginava Adriano, funcionou com outro scanner (multifuncional da hp). Eu já tratei os erros malucos que apareceram, mas gostaria de desenvolver algum que servisse para qq scanner. Vou tentar trabalhar com o Twain agora... Obrigado pelo retorno. Em 26/10/07, Adriano Santos [EMAIL PROTECTED] mailto:artes%40doiscliques.com escreveu: Entendi. A única coisa que me deixou um pouco desconte com este componente foi o fato de dar um erro meio horrível quando vc cancela o escaneamento. Precisa fazer um tratamento de erro pra não aparecer mensaens feias demais ao usuário, se não assusta. Qq coisa tenta com TWain que deve funcionar tb. Esse componente que menciono no artigo é um pouco antigo. -- 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. http://www.delphitodelphi.blogspot.com http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: Oi Adriano eu uso o ColorPage-Slim 1200 da Genius e o erro apresentado é: Error from state: 4. Error type: 1. Eu acho que deve ser alhum problema com a unit TAcquireImage pq testei com outros exemplos que usam esta unit e apresentou o mesmo erro. Vou tentar com o Scanner da minha multifuncional e verificar se acontece o mesmo. Em 26/10/07, Adriano Santos [EMAIL PROTECTED] mailto:artes%40doiscliques.comartes%40doiscliques.com mailto:artes%40doiscliques.com escreveu: Oi Jorge, Que erro deu? Qual o modelo do scannner? Qdo escrevi o artigo testei na minha Lexmark 1185 Multifuncional. Abs -- 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. http://www.delphitodelphi.blogspot.com http://www.delphitodelphi.blogspot.com http://www.delphitodelphi.blogspot.com http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br http://www.devmedia.com.br http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp http://www.devmedia.com.br/clubedelphi/pagina.asp http://www.devmedia.com.br/clubedelphi/pagina.asp http://www.devmedia.com.br/clubedelphi/pagina.asp Jorge Ericsson respondeu: O Exemplo do Adriano é muito bom, cai como uma luva no que preciso, mas não esta funcionando bem, apresenta um erro ao capturar a imagem do scanner. Funcionou com vc Luciano ?? Em 25/10/07, Luciano Angelini [EMAIL PROTECTED] mailto:luciano.angelini%40uol.com.brluciano.angelini%40uol.com.br mailto:luciano.angelini%40uol.com.brluciano.angelini%40uol.com.br mailto:luciano.angelini%40uol.com.br escreveu: Bom dia Jorge Acesse o Site da www.devmedia.com.br tem uma edição da revista ClubeDelphi n° 83 que mostra passo a passo como fazer Espero ter ajudado Luciano Angelini Prefeitura de Lupionópolis-Pr Jorge Ericsson escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br http://www.jericsson.com.br
Re: [delphi-br] Urgente - Digitalização de documentos
Fiz uma busca rápida no torry.net por TWAIN e achei este componente: * MultiTWAIN v0.5 (free com fontes) porém o componente foi desenvolvido em 1998 e é compatível até o D4. Se lhe servir está no link [ http://www.torry.net/vcl/mmedia/twain/multwain.zip ] No mesmo site, pesquisando dicas de Scanner achei esta dica: * http://www.swissdelphicenter.ch/torry/showcode.php?id=971 Talvez seja um bom ponto de partida. Sds, Ricardo. Jorge Ericsson [EMAIL PROTECTED] escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- 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] 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]
Re: [delphi-br] Urgente - Digitalização de documentos
Oi Jorge Ericsson, Se precisar de um help, tem um artigo meu publicado na revista ClubeDelphi 83. Tem exemplo no meu blog e na página da Devmedia. Blog: http://www.delphitodelphi.blogspot.com Devmedia http://www.devmedia.com.br/resumo/download.asp?site=3 Abs -- 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. http://www.delphitodelphi.blogspot.com http://www.devmedia.com.br http://www.devmedia.com.br/clubedelphi/pagina.asp Ricardo César Cardoso respondeu: Fiz uma busca rápida no torry.net por TWAIN e achei este componente: * MultiTWAIN v0.5 (free com fontes) porém o componente foi desenvolvido em 1998 e é compatível até o D4. Se lhe servir está no link [ http://www.torry.net/vcl/mmedia/twain/multwain.zip http://www.torry.net/vcl/mmedia/twain/multwain.zip ] No mesmo site, pesquisando dicas de Scanner achei esta dica: * http://www.swissdelphicenter.ch/torry/showcode.php?id=971 http://www.swissdelphicenter.ch/torry/showcode.php?id=971 Talvez seja um bom ponto de partida. Sds, Ricardo. Jorge Ericsson [EMAIL PROTECTED] mailto:jericssonsup%40gmail.com escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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] 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.9/1090 - Release Date: 24/10/2007 08:48
Re: [delphi-br] Urgente - Digitalização de documentos
Bom dia Jorge Acesse o Site da www.devmedia.com.br tem uma edição da revista ClubeDelphi n° 83 que mostra passo a passo como fazer Espero ter ajudado Luciano Angelini Prefeitura de Lupionópolis-Pr Jorge Ericsson escreveu: Olá amigos, Estou com o desafio de implementar em meu sistema de gerenciamento de igrejas, um modúlo para digitalização de imagens e gravação do mesmo em um banco de dados mySql. Já estou com as tabelas prontas mais não consegui uma forma de ler as imagens de qq scanner e jogar a mesma para dentro do campo BLOB. Alguém tem idéia de componente free ou rotina onde possa trabalhar com diversos tipos de Scanner registrando apenas a DLL dos mesmos ? Agradeço. -- Jorge Ericsson S. Pinheiro Analista/Projetista de Sistemas Ericsson Sistemas e Soluções http://www.jericsson.com.br 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]
Re: [delphi-br] URGENTE - Dúvidas sobre como informa r as atualizações do sistema
Olá Jorge. Hoje eu faço isso de uma forma bem simples. Usando ftp. Eu crio um arquivo zip com a última versão e disponibilizo no ftp. Quando o cliente loga no sistema eu verifico a versão que está guardada em uma tabela de configurações e comparo com a versão do arquivo no ftp. Eu uso como versão a data do arquivo zip. Dessa maneira sempre que tem um arquivo mais recente eu sei que houve atualização e informo ao usuário que existe, perguntando se quer atualizar no momento. Se sim, baixo usando ftp e descompacto na pasta do sistema. No próximo login, abro um form com um histórico das atualizações disponíveis em cada versão, inclusive a que acabou de baixar, com opção de não abrir mais, ou continuar abrindo toda vez que iniciar o sistema. Porém não faço verificação se o usuário é administrador do sistema, mas é possível fazer, pois a atualização só acontece depois do login. Também ainda não uso threads pra isso, mas vou adicionar isso ao sistema com certeza, pois o que fica ruim nesse caso é que sempre na entrada do sistema ele fica alguns segundos parados esperando a resposta do site ftp. Quanto as threads é bem simples de implementar. Tenho alguns exemplos bem fáceis de entender. Caso queira me avise que envio. Abraço _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Maringá - Paraná www.n2solutions.com.br - Original Message - From: Jorge Ericsson Sent: Wednesday, October 17, 2007 2:25 AM Subject: [delphi-br] URGENTE - Dúvidas sobre como informar as atualizações do sistema Olá Amigos, Estou com o problema de definir uma forma eficiente de meus usuários visualizarem as novas atualizações do meu sistema. Bom eu criei um arquivo no meu servidor onde informo as novas atualizações do meu sistema e preciso que o meu usuário visualize essas informações assim que o mesmo loga no sistema. Mas não estou encontrando a forma correta de informar essas atualizações. Preciso testar se o usuário é o administrador, preciso checar as suas conexões com a internet e tbém busca as novas atualizações depois de um certo tempo de logado no sistema. Como fazer de forma rápida e eficiente este processo. Alguém usa Threeds ? 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] __ NOD32 2596 (20071017) Information __ This message was checked by NOD32 antivirus system. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE - Dúvidas sobre como informar as atualizações do sistema
Olá amigos, O controle de versão por mim está tranquilo pq eu coloco o meu executavel no meu servidor ftp e sempre q a nova versão eu tenho que ligar para o meu cliente ou enviar um e-mail solicitando q o mesmo clique em checar novas atualizações pelo próprio programa. Nesse ponto ele já faz todas as verificações possíveis. Para controla a versão do programa eu tbém já gravo em uma tabela o realese gerada pelo delphi. O meu problema é criar ou não um serviço q fique checando as informações no site ou se coloco no programa para que o próprio usuário ao executar programa tome a decisão de instalar ou não. Hj eu usso o idHTTP para checar se existe ou não atualizações... Em 17/10/07, Claudiney Cogo [EMAIL PROTECTED] escreveu: Olá Jorge. Hoje eu faço isso de uma forma bem simples. Usando ftp. Eu crio um arquivo zip com a última versão e disponibilizo no ftp. Quando o cliente loga no sistema eu verifico a versão que está guardada em uma tabela de configurações e comparo com a versão do arquivo no ftp. Eu uso como versão a data do arquivo zip. Dessa maneira sempre que tem um arquivo mais recente eu sei que houve atualização e informo ao usuário que existe, perguntando se quer atualizar no momento. Se sim, baixo usando ftp e descompacto na pasta do sistema. No próximo login, abro um form com um histórico das atualizações disponíveis em cada versão, inclusive a que acabou de baixar, com opção de não abrir mais, ou continuar abrindo toda vez que iniciar o sistema. Porém não faço verificação se o usuário é administrador do sistema, mas é possível fazer, pois a atualização só acontece depois do login. Também ainda não uso threads pra isso, mas vou adicionar isso ao sistema com certeza, pois o que fica ruim nesse caso é que sempre na entrada do sistema ele fica alguns segundos parados esperando a resposta do site ftp. Quanto as threads é bem simples de implementar. Tenho alguns exemplos bem fáceis de entender. Caso queira me avise que envio. Abraço _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Maringá - Paraná www.n2solutions.com.br - Original Message - From: Jorge Ericsson Sent: Wednesday, October 17, 2007 2:25 AM Subject: [delphi-br] URGENTE - Dúvidas sobre como informar as atualizações do sistema Olá Amigos, Estou com o problema de definir uma forma eficiente de meus usuários visualizarem as novas atualizações do meu sistema. Bom eu criei um arquivo no meu servidor onde informo as novas atualizações do meu sistema e preciso que o meu usuário visualize essas informações assim que o mesmo loga no sistema. Mas não estou encontrando a forma correta de informar essas atualizações. Preciso testar se o usuário é o administrador, preciso checar as suas conexões com a internet e tbém busca as novas atualizações depois de um certo tempo de logado no sistema. Como fazer de forma rápida e eficiente este processo. Alguém usa Threeds ? 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] __ NOD32 2596 (20071017) Information __ This message was checked by NOD32 antivirus system. http://www.eset.com [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]
Re: [delphi-br] URGENTE - Dúvidas sobre como informar as atualizações do sistema
No meu sistema eu coloquei para verificar se tem atualização assim que o usuário executa o sistema, caso tenha atualização ele avisa que existe uma e faz o download em seguida... colocar para confirmar ou não é complicado, tinha clientes que nao atualizavam a muito tempo. Em 17/10/07, Jorge Ericsson [EMAIL PROTECTED] escreveu: Olá amigos, O controle de versão por mim está tranquilo pq eu coloco o meu executavel no meu servidor ftp e sempre q a nova versão eu tenho que ligar para o meu cliente ou enviar um e-mail solicitando q o mesmo clique em checar novas atualizações pelo próprio programa. Nesse ponto ele já faz todas as verificações possíveis. Para controla a versão do programa eu tbém já gravo em uma tabela o realese gerada pelo delphi. O meu problema é criar ou não um serviço q fique checando as informações no site ou se coloco no programa para que o próprio usuário ao executar programa tome a decisão de instalar ou não. Hj eu usso o idHTTP para checar se existe ou não atualizações... Em 17/10/07, Claudiney Cogo [EMAIL PROTECTED]claudiney-listas%40n2solutions.com.br escreveu: Olá Jorge. Hoje eu faço isso de uma forma bem simples. Usando ftp. Eu crio um arquivo zip com a última versão e disponibilizo no ftp. Quando o cliente loga no sistema eu verifico a versão que está guardada em uma tabela de configurações e comparo com a versão do arquivo no ftp. Eu uso como versão a data do arquivo zip. Dessa maneira sempre que tem um arquivo mais recente eu sei que houve atualização e informo ao usuário que existe, perguntando se quer atualizar no momento. Se sim, baixo usando ftp e descompacto na pasta do sistema. No próximo login, abro um form com um histórico das atualizações disponíveis em cada versão, inclusive a que acabou de baixar, com opção de não abrir mais, ou continuar abrindo toda vez que iniciar o sistema. Porém não faço verificação se o usuário é administrador do sistema, mas é possível fazer, pois a atualização só acontece depois do login. Também ainda não uso threads pra isso, mas vou adicionar isso ao sistema com certeza, pois o que fica ruim nesse caso é que sempre na entrada do sistema ele fica alguns segundos parados esperando a resposta do site ftp. Quanto as threads é bem simples de implementar. Tenho alguns exemplos bem fáceis de entender. Caso queira me avise que envio. Abraço _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Maringá - Paraná www.n2solutions.com.br - Original Message - From: Jorge Ericsson Sent: Wednesday, October 17, 2007 2:25 AM Subject: [delphi-br] URGENTE - Dúvidas sobre como informar as atualizações do sistema Olá Amigos, Estou com o problema de definir uma forma eficiente de meus usuários visualizarem as novas atualizações do meu sistema. Bom eu criei um arquivo no meu servidor onde informo as novas atualizações do meu sistema e preciso que o meu usuário visualize essas informações assim que o mesmo loga no sistema. Mas não estou encontrando a forma correta de informar essas atualizações. Preciso testar se o usuário é o administrador, preciso checar as suas conexões com a internet e tbém busca as novas atualizações depois de um certo tempo de logado no sistema. Como fazer de forma rápida e eficiente este processo. Alguém usa Threeds ? 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] __ NOD32 2596 (20071017) Information __ This message was checked by NOD32 antivirus system. http://www.eset.com [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] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE - Dúvidas sobre como informar as atualizações do sistema
so pra complementar, o meu atualizador ainda verifica o MD5 do arquivo baixado pra saber se esta igual ao que ta no site.. se diver diferente é sinal que teve algum problema com o arquivo. a atualização é cancelada. Em 17/10/07, Jorge Ericsson [EMAIL PROTECTED] escreveu: Olá amigos, O controle de versão por mim está tranquilo pq eu coloco o meu executavel no meu servidor ftp e sempre q a nova versão eu tenho que ligar para o meu cliente ou enviar um e-mail solicitando q o mesmo clique em checar novas atualizações pelo próprio programa. Nesse ponto ele já faz todas as verificações possíveis. Para controla a versão do programa eu tbém já gravo em uma tabela o realese gerada pelo delphi. O meu problema é criar ou não um serviço q fique checando as informações no site ou se coloco no programa para que o próprio usuário ao executar programa tome a decisão de instalar ou não. Hj eu usso o idHTTP para checar se existe ou não atualizações... Em 17/10/07, Claudiney Cogo [EMAIL PROTECTED]claudiney-listas%40n2solutions.com.br escreveu: Olá Jorge. Hoje eu faço isso de uma forma bem simples. Usando ftp. Eu crio um arquivo zip com a última versão e disponibilizo no ftp. Quando o cliente loga no sistema eu verifico a versão que está guardada em uma tabela de configurações e comparo com a versão do arquivo no ftp. Eu uso como versão a data do arquivo zip. Dessa maneira sempre que tem um arquivo mais recente eu sei que houve atualização e informo ao usuário que existe, perguntando se quer atualizar no momento. Se sim, baixo usando ftp e descompacto na pasta do sistema. No próximo login, abro um form com um histórico das atualizações disponíveis em cada versão, inclusive a que acabou de baixar, com opção de não abrir mais, ou continuar abrindo toda vez que iniciar o sistema. Porém não faço verificação se o usuário é administrador do sistema, mas é possível fazer, pois a atualização só acontece depois do login. Também ainda não uso threads pra isso, mas vou adicionar isso ao sistema com certeza, pois o que fica ruim nesse caso é que sempre na entrada do sistema ele fica alguns segundos parados esperando a resposta do site ftp. Quanto as threads é bem simples de implementar. Tenho alguns exemplos bem fáceis de entender. Caso queira me avise que envio. Abraço _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Maringá - Paraná www.n2solutions.com.br - Original Message - From: Jorge Ericsson Sent: Wednesday, October 17, 2007 2:25 AM Subject: [delphi-br] URGENTE - Dúvidas sobre como informar as atualizações do sistema Olá Amigos, Estou com o problema de definir uma forma eficiente de meus usuários visualizarem as novas atualizações do meu sistema. Bom eu criei um arquivo no meu servidor onde informo as novas atualizações do meu sistema e preciso que o meu usuário visualize essas informações assim que o mesmo loga no sistema. Mas não estou encontrando a forma correta de informar essas atualizações. Preciso testar se o usuário é o administrador, preciso checar as suas conexões com a internet e tbém busca as novas atualizações depois de um certo tempo de logado no sistema. Como fazer de forma rápida e eficiente este processo. Alguém usa Threeds ? 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] __ NOD32 2596 (20071017) Information __ This message was checked by NOD32 antivirus system. http://www.eset.com [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] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE - Dúvidas sobre como informa r as atualizações do sistema
Aqui no meu sistema também fiz assim... na entrada do sistema sempre verifico e informo que existe.. ele tem opção de não fazer no momento, mas caso não faça a mensagem vai ficar incomodando toda hora que entrar no sistema.. até ele atualizar. Mas ainda existe um botão na interface do sistema pra executar essa verificação, caso ele queira verificar em qualquer outro momento. _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Maringá - Paraná www.n2solutions.com.br - Original Message - From: Eduardo Silva dos Santos To: delphi-br@yahoogrupos.com.br Sent: Wednesday, October 17, 2007 10:13 AM Subject: Re: [delphi-br] URGENTE - Dúvidas sobre como informar as atualizações do sistema No meu sistema eu coloquei para verificar se tem atualização assim que o usuário executa o sistema, caso tenha atualização ele avisa que existe uma e faz o download em seguida... colocar para confirmar ou não é complicado, tinha clientes que nao atualizavam a muito tempo. Em 17/10/07, Jorge Ericsson [EMAIL PROTECTED] escreveu: Olá amigos, O controle de versão por mim está tranquilo pq eu coloco o meu executavel no meu servidor ftp e sempre q a nova versão eu tenho que ligar para o meu cliente ou enviar um e-mail solicitando q o mesmo clique em checar novas atualizações pelo próprio programa. Nesse ponto ele já faz todas as verificações possíveis. Para controla a versão do programa eu tbém já gravo em uma tabela o realese gerada pelo delphi. O meu problema é criar ou não um serviço q fique checando as informações no site ou se coloco no programa para que o próprio usuário ao executar programa tome a decisão de instalar ou não. Hj eu usso o idHTTP para checar se existe ou não atualizações... Em 17/10/07, Claudiney Cogo [EMAIL PROTECTED]claudiney-listas%40n2solutions.com.br escreveu: Olá Jorge. Hoje eu faço isso de uma forma bem simples. Usando ftp. Eu crio um arquivo zip com a última versão e disponibilizo no ftp. Quando o cliente loga no sistema eu verifico a versão que está guardada em uma tabela de configurações e comparo com a versão do arquivo no ftp. Eu uso como versão a data do arquivo zip. Dessa maneira sempre que tem um arquivo mais recente eu sei que houve atualização e informo ao usuário que existe, perguntando se quer atualizar no momento. Se sim, baixo usando ftp e descompacto na pasta do sistema. No próximo login, abro um form com um histórico das atualizações disponíveis em cada versão, inclusive a que acabou de baixar, com opção de não abrir mais, ou continuar abrindo toda vez que iniciar o sistema. Porém não faço verificação se o usuário é administrador do sistema, mas é possível fazer, pois a atualização só acontece depois do login. Também ainda não uso threads pra isso, mas vou adicionar isso ao sistema com certeza, pois o que fica ruim nesse caso é que sempre na entrada do sistema ele fica alguns segundos parados esperando a resposta do site ftp. Quanto as threads é bem simples de implementar. Tenho alguns exemplos bem fáceis de entender. Caso queira me avise que envio. Abraço _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Maringá - Paraná www.n2solutions.com.br - Original Message - From: Jorge Ericsson Sent: Wednesday, October 17, 2007 2:25 AM Subject: [delphi-br] URGENTE - Dúvidas sobre como informar as atualizações do sistema Olá Amigos, Estou com o problema de definir uma forma eficiente de meus usuários visualizarem as novas atualizações do meu sistema. Bom eu criei um arquivo no meu servidor onde informo as novas atualizações do meu sistema e preciso que o meu usuário visualize essas informações assim que o mesmo loga no sistema. Mas não estou encontrando a forma correta de informar essas atualizações. Preciso testar se o usuário é o administrador, preciso checar as suas conexões com a internet e tbém busca as novas atualizações depois de um certo tempo de logado no sistema. Como fazer de forma rápida e eficiente este processo. Alguém usa Threeds ? 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] __ NOD32 2596 (20071017) Information __ This message was checked by NOD32 antivirus system. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas
Re: [delphi-br] URGENTE - Dúvidas sobre como informar as atualizações do sistema
Eu achei interessante a idéia do Claudiney e do Eduardo, mas eu gostaria saber como implementar no meu código a checagem na entrada e o MD5. Hoje eu apenas coloco um arquivo executavél q baixo via FTP pelo próprio programa, mas informo ao usúário q ele deve iniciar o processo. Se tiver como vcs me enviarem um pedaço do código por e-mail em PVT para eu ter uma idéia, eu agradeço. Valew pessoal. Em 17/10/07, Claudiney Cogo [EMAIL PROTECTED] escreveu: Aqui no meu sistema também fiz assim... na entrada do sistema sempre verifico e informo que existe.. ele tem opção de não fazer no momento, mas caso não faça a mensagem vai ficar incomodando toda hora que entrar no sistema.. até ele atualizar. Mas ainda existe um botão na interface do sistema pra executar essa verificação, caso ele queira verificar em qualquer outro momento. _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Maringá - Paraná www.n2solutions.com.br - Original Message - From: Eduardo Silva dos Santos To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Wednesday, October 17, 2007 10:13 AM Subject: Re: [delphi-br] URGENTE - Dúvidas sobre como informar as atualizações do sistema No meu sistema eu coloquei para verificar se tem atualização assim que o usuário executa o sistema, caso tenha atualização ele avisa que existe uma e faz o download em seguida... colocar para confirmar ou não é complicado, tinha clientes que nao atualizavam a muito tempo. Em 17/10/07, Jorge Ericsson [EMAIL PROTECTED]jericssonsup%40gmail.com escreveu: Olá amigos, O controle de versão por mim está tranquilo pq eu coloco o meu executavel no meu servidor ftp e sempre q a nova versão eu tenho que ligar para o meu cliente ou enviar um e-mail solicitando q o mesmo clique em checar novas atualizações pelo próprio programa. Nesse ponto ele já faz todas as verificações possíveis. Para controla a versão do programa eu tbém já gravo em uma tabela o realese gerada pelo delphi. O meu problema é criar ou não um serviço q fique checando as informações no site ou se coloco no programa para que o próprio usuário ao executar programa tome a decisão de instalar ou não. Hj eu usso o idHTTP para checar se existe ou não atualizações... Em 17/10/07, Claudiney Cogo [EMAIL PROTECTED]claudiney-listas%40n2solutions.com.br claudiney-listas%40n2solutions.com.br escreveu: Olá Jorge. Hoje eu faço isso de uma forma bem simples. Usando ftp. Eu crio um arquivo zip com a última versão e disponibilizo no ftp. Quando o cliente loga no sistema eu verifico a versão que está guardada em uma tabela de configurações e comparo com a versão do arquivo no ftp. Eu uso como versão a data do arquivo zip. Dessa maneira sempre que tem um arquivo mais recente eu sei que houve atualização e informo ao usuário que existe, perguntando se quer atualizar no momento. Se sim, baixo usando ftp e descompacto na pasta do sistema. No próximo login, abro um form com um histórico das atualizações disponíveis em cada versão, inclusive a que acabou de baixar, com opção de não abrir mais, ou continuar abrindo toda vez que iniciar o sistema. Porém não faço verificação se o usuário é administrador do sistema, mas é possível fazer, pois a atualização só acontece depois do login. Também ainda não uso threads pra isso, mas vou adicionar isso ao sistema com certeza, pois o que fica ruim nesse caso é que sempre na entrada do sistema ele fica alguns segundos parados esperando a resposta do site ftp. Quanto as threads é bem simples de implementar. Tenho alguns exemplos bem fáceis de entender. Caso queira me avise que envio. Abraço _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Maringá - Paraná www.n2solutions.com.br - Original Message - From: Jorge Ericsson Sent: Wednesday, October 17, 2007 2:25 AM Subject: [delphi-br] URGENTE - Dúvidas sobre como informar as atualizações do sistema Olá Amigos, Estou com o problema de definir uma forma eficiente de meus usuários visualizarem as novas atualizações do meu sistema. Bom eu criei um arquivo no meu servidor onde informo as novas atualizações do meu sistema e preciso que o meu usuário visualize essas informações assim que o mesmo loga no sistema. Mas não estou encontrando a forma correta de informar essas atualizações. Preciso testar se o usuário é o administrador, preciso checar as suas conexões com a internet e tbém busca as novas atualizações depois de um certo tempo de logado no sistema. Como fazer de forma rápida e eficiente este processo. Alguém usa Threeds ? Valew, Jorge Ericsson S. Pinheiro Analista
Re: [delphi-br] URGENTE - Dúvidas sobre com o informar as atualizações do sistema
Nossa, Vixi o meu esquema tah meio complexo então. Primeiro atualização Off-Line. 1.0. Consiste em atualizar automaticamente todas as estações da rede. Como é feito? 1.1. Eu tenho uma tabela no banco chamada Atualizacoes com os campos ID, MODULO, VERSAO, ARQUIVO (BLOB); Nela eu guardo o executável própriamente dito. Qdo o usuário entra no sistema ele é conectado ao banco e a versão atual é checada com a versão que está no banco. Se a dele for inferior eu chamo um outro programa pequeno que fecha o módulo que o chamou. Esse programa se conecta com o banco e usa o método SaveToFile do DataSet para salvar o arquivo do Banco na pasta local. Se a versão que o cara está abrindo é maior que a do banco então uso LoadFromFile pra subir o arquivo executável para dentro da tabela e atualizo a versão. Desta forma garanto que todas as máquinas na rede esteja com a mesma versão. Blz, morreu. 2.0. A atualização on-line é feita por meio de dois arquivos idênticos que ficam na pasta de instalação do executável e na pasta de ftp do meu site. Os arquivos são Versoes.amk (pasta local) e Atualizacoes.amk (pasta remota). Ambos tem a seguinte estrutura: [Atualizacoes] Modulo1=Operacao.exe Versao=6.1.28 Titulo=Operacao Modulo2=Cobranca.exe Versao=6.1.26 Titulo=Cobranca Tenho um programa chamado Atualizador.exe que faz o download do Atualizacoes.amk e compara com o Versoes.amk preenchendo um ListView com os módulos que precisam ser atualizados. O arquivo Atualizacoes.amk é atualizado meus meus programadores toda vez que uma versão nova é enviada ao servidor. Na verdade são arquivos .INI com extensão alterada. O cara clica em um botão Now. Os módulos são fechados automaticamente - já que o programa faz o download na mesma pasta dos módulos - por fim os downloads são efetuados na pasta de instalação dos módulos como mencionei e boas. Agora estamos em processo de hiper-automatização. On-line temos uma tabela em um banco Firebird com o nome dos clientes, DLL, vesão de DLL e caminho fisico remoto dos arquivos. Esse mesmo programa será chamado do executável principal automaticamente e em background, ou seja, ficará rodando no relógio. Ao abrir o programa ele conectará ao banco de dados online pra ver se existem novas atualizações. Fará as atualizações necessárias em uma pasta de diferente do diretório de instalação, pra evitar que o módulo não seja atualizado porque está aberto. Feito isso (os downloads) o meu Atualizador vai jogar os arquivos dentro do banco de dados na tabela chamada Atualizacoes que já existe hoje. Desta forma a próxima vez que o cliente abrir o módulo está atualizado e não vai nem perceber. Temos um programa gerenciador e troca e envia a nova versão dos módulos para nosso servidor FTP. Além disso toda vez que o sistema é aberto uma nova verificação é feita, uma vez por dia. Acabaram meus problemas. Desculpem a biblia. -- 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. http://www.devmedia.com.br http://www.clubedelphi.net http://www.delphitodelphi.blogspot.com Jorge Ericsson respondeu: Eu achei interessante a idéia do Claudiney e do Eduardo, mas eu gostaria saber como implementar no meu código a checagem na entrada e o MD5. Hoje eu apenas coloco um arquivo executavél q baixo via FTP pelo próprio programa, mas informo ao usúário q ele deve iniciar o processo. Se tiver como vcs me enviarem um pedaço do código por e-mail em PVT para eu ter uma idéia, eu agradeço. Valew pessoal. Em 17/10/07, Claudiney Cogo [EMAIL PROTECTED] mailto:claudiney-listas%40n2solutions.com.br escreveu: Aqui no meu sistema também fiz assim... na entrada do sistema sempre verifico e informo que existe.. ele tem opção de não fazer no momento, mas caso não faça a mensagem vai ficar incomodando toda hora que entrar no sistema.. até ele atualizar. Mas ainda existe um botão na interface do sistema pra executar essa verificação, caso ele queira verificar em qualquer outro momento. _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Maringá - Paraná www.n2solutions.com.br - Original Message - From: Eduardo Silva dos Santos To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Wednesday, October 17, 2007 10:13 AM Subject: Re: [delphi-br] URGENTE - Dúvidas sobre como informar as atualizações do sistema No meu sistema eu coloquei para verificar se tem atualização assim que o usuário executa o sistema, caso tenha atualização ele avisa que existe uma e faz o download em seguida... colocar para confirmar ou não é complicado, tinha clientes que nao atualizavam a muito tempo. Em 17/10/07, Jorge Ericsson [EMAIL
Re: [delphi-br] Urgente: Captura via serial - Balanç a TOLEDO
componentes/protocolos prontos com/sem fontes olhe no site: http://www.igara.com.br/ - Original Message - From: Ricardo César Cardoso To: delphi-br@yahoogrupos.com.br Sent: Tuesday, May 29, 2007 10:29 AM Subject: Re: [delphi-br] Urgente: Captura via serial - Balança TOLEDO Vc chegou a abrir a porta de conexão? Algo como vacomm1.Open? E se tiver com a conexão aberta, verifique se a balança não precisa receber uma string (comando) para poder devolver a leitura. Alguns dispositivos só enviam dados quando recebem um comando de solicitação. Sds, Ricardo. marcio_faria11 [EMAIL PROTECTED] escreveu: Olá, Estou tentando fazer o delphi receber os dados de uma balança Toledo modelo rodoviário 9091, porém quando clico em receber não me vem nada na tela. Eu utilizei o componente Async32 inserindo um objeto TVaComm, em seguida configurei as propriedades DataRate, DataBits, Parity, PortNum e StopBits. Em seguida usei o Evento OnRXChar para exibir os dados num objeto EditBox do Form mas mesmo assim não vem nada. Alguém saberia me dizer se estou esquecendo de algo? Segue o código do evento onRXChar que estou usando: procedure TForm1.VaComm1RxChar(Sender: TObject; Count: Integer); begin edit1.Text:= edit1.Text + vacomm1.ReadText; end; Obrigado desde já, Marcio __ __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.467 / Virus Database: 269.7.6/815 - Release Date: 22/5/2007 15:49 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Urgente Zeos + Postgres me ajudem - informacao de performance.
Colegas Tenho uma tabela que necessariamente precisa ter 111 campos. No Zeos + Postgres estou conseguindo inserir instantaneamente (computo horafinal - horainicial e deu zero ou 1 segundo para inserçao), porém, no update nesta tabela (que contém na sua maioria campos texto de tamanho entre 50 e 200 caracteres) leva em torno de 3 segundos. Isso é normal? Digo, o insert bem mais rapido que o update? E esse tempo é normal? Ou ta demorado? Por que para o usuario que esta na frente do pc 03 segundos da impressão que o programa travou. Qualquer comentario é bem-vindo. Muito obrigado. []'s Nunes
Re: [delphi-br] Urgente Zeos + Postgres me ajudem - informacao de performance.
Interessante esta questão. Imagino que o Insert seja rápido pois é adcionado uma linha ao final da tabela. Enquanto que o Update certamente deve ter uma ou mais cláusulas where, o que passa necessariamente por uma boa indexação. [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] URGENTE: Problemas com quickreport
Olá pessoal, Estou com um problema com o quickreport com relação a impressão em matricual com mais de uma folha em tamanho personalizado. Tenho uma folha de boleto bancário que tem as seguintes dimensões: largura 19,4cm e altura 10,2cm. Configurei essas medidas no meu quickreport, portanto, no momento da impressão ele continua entendendo como se fosse uma folha de tamanho A4. Tentei modificar esse tamanho nas configurações da impressora e realmente não obtenho êxito pois mesmo que eu configure pra um tamanho de envelope, o quickreport continua imprimindo em tamanho A4. Já havia detectado este problema em outra ocasião porém, no Windows 98 isso não ocorre, somente ocorre no Windows XP. Agradeço a todos e quem possa me ajudar. Abraços, Lili
[delphi-br] [urgente] ongettext em runTime?
estou criando clientdataset´s em tempo em run-time e agora tenho que gerar o evento ongettext para poder rodar certas rotinas.. ja tentei criar uma procedure iqual, ja tente fazer de tudo e nao deu certo. alquem sabe como fazer isso? obrigado.. t+ -- Rafael jorge alves www.acinformatica.org [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Urgente: Captura via serial - Balança TOLEDO
Olá, Estou tentando fazer o delphi receber os dados de uma balança Toledo modelo rodoviário 9091, porém quando clico em receber não me vem nada na tela. Eu utilizei o componente Async32 inserindo um objeto TVaComm, em seguida configurei as propriedades DataRate, DataBits, Parity, PortNum e StopBits. Em seguida usei o Evento OnRXChar para exibir os dados num objeto EditBox do Form mas mesmo assim não vem nada. Alguém saberia me dizer se estou esquecendo de algo? Segue o código do evento onRXChar que estou usando: procedure TForm1.VaComm1RxChar(Sender: TObject; Count: Integer); begin edit1.Text:= edit1.Text + vacomm1.ReadText; end; Obrigado desde já, Marcio
Re: [delphi-br] Urgente: Captura via serial - Balança TOLEDO
Vc chegou a abrir a porta de conexão? Algo como vacomm1.Open? E se tiver com a conexão aberta, verifique se a balança não precisa receber uma string (comando) para poder devolver a leitura. Alguns dispositivos só enviam dados quando recebem um comando de solicitação. Sds, Ricardo. marcio_faria11 [EMAIL PROTECTED] escreveu: Olá, Estou tentando fazer o delphi receber os dados de uma balança Toledo modelo rodoviário 9091, porém quando clico em receber não me vem nada na tela. Eu utilizei o componente Async32 inserindo um objeto TVaComm, em seguida configurei as propriedades DataRate, DataBits, Parity, PortNum e StopBits. Em seguida usei o Evento OnRXChar para exibir os dados num objeto EditBox do Form mas mesmo assim não vem nada. Alguém saberia me dizer se estou esquecendo de algo? Segue o código do evento onRXChar que estou usando: procedure TForm1.VaComm1RxChar(Sender: TObject; Count: Integer); begin edit1.Text:= edit1.Text + vacomm1.ReadText; end; Obrigado desde já, Marcio __ __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Urgente TLP 2742
Pessoal, estou com problemas e pouco tempo, alguem tem um exmplo de impressao de etiquetas (pode ser so codigo(texto)) na impressora TLP 2743. Se tiver o fonte melhor ainda. Estou tentando com o zebradesigner e nao ta dando certo (sao 4 etiqueas na linha 2 X 1,2), impreme uma linha e para e a luz vermelha ascende. Agradeço muito
RES: [delphi-br] Urgente TLP 2742
Espero que ajude TLP2742/2844
{Modo formulário
N
O
FK0002
FK0002
FK*
FS0002
V00,29,N,Nome
V01,06,N,NrPedido
V02,13,N,NrPack
V03,30,N,Descricao
V04,10,N,Quant
V05,05,N,Local
V06,14,N,Nrident
V07,16,N,Codigo
V08,29,N,Nome
V09,06,N,NrPedido
V10,13,N,NrPack
V11,30,N,Descricao
V12,10,N,Quant
V13,05,N,Local
V14,14,N,Nrident
V15,16,N,Codigo
q800
Q800,24+0
S2
D8
ZT
TTh:m
TDy2.mn.dd
LO036,041,314,006
LO432,037,314,006
A164,134,0,1,1,1,N,PACK
A560,130,0,1,1,1,N,PACK
A036,134,0,1,1,1,N,QTD
A432,130,0,1,1,1,N,QTD
A034,215,0,1,1,1,N,PD NR
A430,215,0,1,1,1,N,PD NR
A036,014,0,4,2,1,N,V06
A432,010,0,4,2,1,N,V14
B036,051,0,1,2,2,47,N,V07
B432,047,0,1,2,2,47,N,V15
A034,110,0,1,1,1,N,V03
A430,106,0,1,1,1,N,V11
A365,211,3,2,2,3,N,V05
A761,207,3,2,2,3,N,V13
A034,148,0,2,1,2,N,V04
A430,144,0,2,1,2,N,V12
A097,185,0,4,1,2,N,V01
A493,185,0,4,1,2,N,V09
A207,195,0,2,1,2,N,V00
A605,195,0,2,1,2,N,V08
A162,148,0,2,1,2,N,V02
A558,144,0,2,1,2,N,V10
FE
FR0002
?
JATOSTEEL
125952
21525-001 $$
PINO ELASTICO DIAM 5 X 32 55SI
1,
1EN13
34503199
34503199PD125952
JATOSTEEL
125952
21525-001 $$
PINO ELASTICO DIAM 5 X 32 55SI
1,
1EN13
34503199
34503199PD125952
P1,1
}
{Modo direto
N
O
FK*
q800
Q240,24+0
S2
D8
ZT
TTh:m
TDy2.mn.dd
A022,6,0,4,2,2,N,267.469.57
A428,4,0,4,2,2,N,267.469.57
B022,67,0,1,2,2,65,B,26746957OP498651
B428,67,0,1,2,2,57,B,26746957OP498651
LO022,55,314,6
LO428,55,322,6
A022,171,0,2,1,1,N,CDL FRT DFW160
A428,171,0,2,1,1,N,CDL FRT DFW160
A022,193,0,2,2,2,N,ALM 1EA26
A428,193,0,2,2,2,N,ALM 1EA26
P1,01
}
Elcio Domingos Ramos
DEMAG Cranes Components Ltda.
www.demagcranes.com.br
[EMAIL PROTECTED]
Fone: 55 11 2145-7823
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de
softarthelp
Enviada em: quinta-feira, 15 de fevereiro de 2007 17:04
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Urgente TLP 2742
Pessoal, estou com problemas e pouco tempo, alguem tem um exmplo de
impressao de etiquetas (pode ser so codigo(texto)) na impressora TLP
2743. Se tiver o fonte melhor ainda.
Estou tentando com o zebradesigner e nao ta dando certo (sao 4
etiqueas na linha 2 X 1,2), impreme uma linha e para e a luz vermelha
ascende.
Agradeço muito
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [URGENTE] Formatação Imp ressão Matricial
Como você faz pra imprimir? faz tudo na mão ou usa alguma rotina ou componente? Posta aí que agente te ajuda Bom Código Ricardo Berti - Original Message - From: Tiago de Assis Pimenta To: Grupo Delphi Sent: Monday, February 12, 2007 11:40 PM Subject: [delphi-br] [URGENTE] Formatação Impressão Matricial Galera, seguinte, preciso da seguinte informação. Tem como eu usar o write para fazer o seguinte. Na hora que chegar num determinado numero de caracter, ele pule para a proxima linha, mais ou menos no estilo das Celulas do Excel ??? Por ex.: Eu reservo um espaço de 50 caracteres para Descrição do Serviço na nota, se ele passar de 50, ele pula para a proxima linha, sem atrapalhar a coluna preço. Na nota ficaria assim DESCRIÇÃO | PREÇO TESTE TESTE TESTE TESTE TESTE TESTE TESTE TESTE TESTE TESTE R$ 40,00 OUTRO TESTE R$ 20,00 Tem como ? Tiago de Assis Pimenta MSN: mailto:[EMAIL PROTECTED] [EMAIL PROTECTED] Skype: tiagopimenta_skype Gtalk: tiagopimenta [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] [URGENTE] Formatação Im pressão Matricial
Boa Tarde Ricardo, faço tudo na mão, vou colar o código de como esta.
procedure Tfrmcadordserv.BitBtn1Click(Sender: TObject);
const
CNegrito = #27#71; // Define Caracter Negrito;
SNegrito = #27#72; // Define Caracter Não Negrito;
CExpandido = #14;
SExpandido = #20;
var
a: textfile;
begin
// Imprimindo Ordem de Serviço
assignfile(a,'c:\tmp\cupom.txt');
rewrite(A);
writeln(A,'=
==');
writeln(A,' BRANCO AUTO MECANICA - ESPECIALIZADA EM INJECAO
ELETRONICA ');
writeln(A,'AV. MESSIAS GONCALVES, 1363 - (17) 3325-8055
');
writeln(A,'=
==');
write(A,CNegrito + CExpandido + format('%-29s',['ORDEM DE SERVICO N: ' +
formatfloat('0',strtoint(edit1.text))]));
writeln(A,SNegrito + SExpandido + format('%10s',['DATA:
'+frmordserv.qrordserv.fieldbyname('data').asstring]));
writeln(A);
write(A,format('%-57s',['NOME DO CLIENTE: '+
qrcli.fieldbyname('nome').value]));
writeln(A,format('%-22s',['CELULAR: '+qrcli.fieldbyname('celular').value]));
write(A,format('%-57s',['ENDERECO: '+
qrcli.fieldbyname('endereco').value]));
writeln(A,format('%-22s',['BAIRRO : '+ qrcli.fieldbyname('bairro').value]));
write(A,format('%-57s',['CIDADE: '+ qrcli.fieldbyname('cidade').value]));
writeln(A,format('%-22s',['CEP.: '+ qrcli.fieldbyname('cep').value]));
write(A,format('%-35s',['TELEFONE: '+
qrcli.fieldbyname('telefone').value]));
write(A,format('%-22s',['CPF: '+ qrcli.fieldbyname('cpf').value]));
writeln(A,format('%-22s',['RG: ' + qrcli.fieldbyname('rg').value]));
writeln(A);
write(A,format('%-57s',['MARCA: '+
frmordserv.qrordserv.fieldbyname('marca').value]));
writeln(A,format('%-22s',['MODELO: '+
frmordserv.qrordserv.fieldbyname('modelo').value]));
write(A,format('%-35s',['COR: '+
frmordserv.qrordserv.fieldbyname('cor').value]));
write(A,format('%-22s',['PLACA: '+
frmordserv.qrordserv.fieldbyname('placa').value]));
writeln(A,format('%-22s',['KM DO VEICULO: '+edit3.text]));
writeln(A);
writeln(A,format('%-20s',['FUNCIONARIO: '+
frmordserv.qrordserv.fieldbyname('funcionario').value]));
writeln(A,'=
==');
write(A,format('%-40s',['DISCRIMANACAO']));
write(A,format('%-10s',['QTDE']));
write(A,format('%-18s',['PRECO UNITARIO']));
writeln(A,format('%-10s',['PRECO TOTAL']));
writeln(A,'=
==');
qrhistserv.first;
while not qrhistserv.eof do
begin
write(A,format('%-40s',[qrhistserv.fieldbyname('servico').value]));
write(A,format('%-10s',[qrhistserv.fieldbyname('qtde').value]));
write(A,format('%-18s',[formatfloat('##0.00',qrhistserv.fieldbyname('precoun
').value)]));
write(A,format('%-10s',[formatfloat('##0.00',qrhistserv.fieldbyname('total')
.value)]));
writeln(A);
qrhistserv.next;
end;
writeln(A,'=
==');
write(A,CNegrito + CExpandido + 'TOTAL R$: ');
writeln(A,format('%29.2f',[frmordserv.qrordserv.fieldbyname('total').asfloat
]));
writeln(A,SNegrito + SExpandido +
'===
');
writeln(A);
writeln(A);
writeln(A);
writeln(A);
//writeln(A,'___');
writeln(A,'ASSINATURA DO CLIENTE');
closefile(A);
Tiago de Assis Pimenta
MSN: mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]
Skype: tiagopimenta_skype
Gtalk: tiagopimenta
_
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Ricardo Berti
Enviada em: terça-feira, 13 de fevereiro de 2007 09:14
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] [URGENTE] Formatação Impressão Matricial
Como você faz pra imprimir? faz tudo na mão ou usa alguma rotina ou
componente? Posta aí que agente te ajuda
Bom Código
Ricardo Berti
- Original Message -
From: Tiago de Assis Pimenta
To: Grupo Delphi
Sent: Monday, February 12, 2007 11:40 PM
Subject: [delphi-br] [URGENTE] Formatação Impressão Matricial
Galera, seguinte, preciso da seguinte informação.
Tem como eu usar o write para fazer o seguinte.
Na hora que chegar num determinado numero de caracter, ele pule para a
proxima linha, mais ou menos no estilo das Celulas do Excel ???
Por ex.: Eu reservo um espaço de 50 caracteres para Descrição do Serviço na
nota, se ele passar de 50, ele pula para a proxima linha, sem atrapalhar a
coluna preço.
Na nota ficaria assim
DESCRIÇÃO | PREÇO
TESTE TESTE TESTE TESTE TESTE
TESTE TESTE TESTE TESTE TESTE R$ 40,00
OUTRO TESTE R$ 20,00
Tem como ?
Tiago de Assis Pimenta
MSN: mailto:tiagopimenta@ mailto:tiagopimenta%40hotmail.com hotmail.com
tiagopimenta@ mailto:tiagopimenta%40hotmail.com hotmail.com
Skype: tiagopimenta_skype
Gtalk: tiagopimenta
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta
Re: [delphi-br] [URGENTE] Formatação Imp ressão Matricial
Ae Brother,
não esqueci de você não, só que estou ocupadaço, mas assim que eu tiver um
tempo vou dar uma olhada legal no teu código... Mas caso você descobrir antes
como fazer, posta na lista, pra agente saber!
Abraços
Ricardo Berti
- Original Message -
From: Tiago de Assis Pimenta
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, February 13, 2007 9:56 AM
Subject: RES: [delphi-br] [URGENTE] Formatação Impressão Matricial
Boa Tarde Ricardo, faço tudo na mão, vou colar o código de como esta.
procedure Tfrmcadordserv.BitBtn1Click(Sender: TObject);
const
CNegrito = #27#71; // Define Caracter Negrito;
SNegrito = #27#72; // Define Caracter Não Negrito;
CExpandido = #14;
SExpandido = #20;
var
a: textfile;
begin
// Imprimindo Ordem de Serviço
assignfile(a,'c:\tmp\cupom.txt');
rewrite(A);
writeln(A,'=
==');
writeln(A,' BRANCO AUTO MECANICA - ESPECIALIZADA EM INJECAO
ELETRONICA ');
writeln(A,' AV. MESSIAS GONCALVES, 1363 - (17) 3325-8055
');
writeln(A,'=
==');
write(A,CNegrito + CExpandido + format('%-29s',['ORDEM DE SERVICO N: ' +
formatfloat('0',strtoint(edit1.text))]));
writeln(A,SNegrito + SExpandido + format('%10s',['DATA:
'+frmordserv.qrordserv.fieldbyname('data').asstring]));
writeln(A);
write(A,format('%-57s',['NOME DO CLIENTE: '+
qrcli.fieldbyname('nome').value]));
writeln(A,format('%-22s',['CELULAR: '+qrcli.fieldbyname('celular').value]));
write(A,format('%-57s',['ENDERECO: '+
qrcli.fieldbyname('endereco').value]));
writeln(A,format('%-22s',['BAIRRO : '+ qrcli.fieldbyname('bairro').value]));
write(A,format('%-57s',['CIDADE: '+ qrcli.fieldbyname('cidade').value]));
writeln(A,format('%-22s',['CEP.: '+ qrcli.fieldbyname('cep').value]));
write(A,format('%-35s',['TELEFONE: '+
qrcli.fieldbyname('telefone').value]));
write(A,format('%-22s',['CPF: '+ qrcli.fieldbyname('cpf').value]));
writeln(A,format('%-22s',['RG: ' + qrcli.fieldbyname('rg').value]));
writeln(A);
write(A,format('%-57s',['MARCA: '+
frmordserv.qrordserv.fieldbyname('marca').value]));
writeln(A,format('%-22s',['MODELO: '+
frmordserv.qrordserv.fieldbyname('modelo').value]));
write(A,format('%-35s',['COR: '+
frmordserv.qrordserv.fieldbyname('cor').value]));
write(A,format('%-22s',['PLACA: '+
frmordserv.qrordserv.fieldbyname('placa').value]));
writeln(A,format('%-22s',['KM DO VEICULO: '+edit3.text]));
writeln(A);
writeln(A,format('%-20s',['FUNCIONARIO: '+
frmordserv.qrordserv.fieldbyname('funcionario').value]));
writeln(A,'=
==');
write(A,format('%-40s',['DISCRIMANACAO']));
write(A,format('%-10s',['QTDE']));
write(A,format('%-18s',['PRECO UNITARIO']));
writeln(A,format('%-10s',['PRECO TOTAL']));
writeln(A,'=
==');
qrhistserv.first;
while not qrhistserv.eof do
begin
write(A,format('%-40s',[qrhistserv.fieldbyname('servico').value]));
write(A,format('%-10s',[qrhistserv.fieldbyname('qtde').value]));
write(A,format('%-18s',[formatfloat('##0.00',qrhistserv.fieldbyname('precoun
').value)]));
write(A,format('%-10s',[formatfloat('##0.00',qrhistserv.fieldbyname('total')
.value)]));
writeln(A);
qrhistserv.next;
end;
writeln(A,'=
==');
write(A,CNegrito + CExpandido + 'TOTAL R$: ');
writeln(A,format('%29.2f',[frmordserv.qrordserv.fieldbyname('total').asfloat
]));
writeln(A,SNegrito + SExpandido +
'===
');
writeln(A);
writeln(A);
writeln(A);
writeln(A);
//writeln(A,'___');
writeln(A,' ASSINATURA DO CLIENTE');
closefile(A);
Tiago de Assis Pimenta
MSN: mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]
Skype: tiagopimenta_skype
Gtalk: tiagopimenta
_
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Ricardo Berti
Enviada em: terça-feira, 13 de fevereiro de 2007 09:14
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] [URGENTE] Formatação Impressão Matricial
Como você faz pra imprimir? faz tudo na mão ou usa alguma rotina ou
componente? Posta aí que agente te ajuda
Bom Código
Ricardo Berti
- Original Message -
From: Tiago de Assis Pimenta
To: Grupo Delphi
Sent: Monday, February 12, 2007 11:40 PM
Subject: [delphi-br] [URGENTE] Formatação Impressão Matricial
Galera, seguinte, preciso da seguinte informação.
Tem como eu usar o write para fazer o seguinte.
Na hora que chegar num determinado numero de caracter, ele pule para a
proxima linha, mais ou menos no estilo das Celulas do Excel ???
Por ex
RES: [delphi-br] [URGENTE] Formatação Im pressão Matricial
Opa ... valeu Ricardo ... to tentando achar em foruns alguma coisa assim do
tipo mas até agora não consegui achar uma solução ...
Abraço
Tiago de Assis Pimenta
MSN: mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]
Skype: tiagopimenta_skype
Gtalk: tiagopimenta
_
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Ricardo Berti
Enviada em: terça-feira, 13 de fevereiro de 2007 18:02
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] [URGENTE] Formatação Impressão Matricial
Ae Brother,
não esqueci de você não, só que estou ocupadaço, mas assim que eu tiver um
tempo vou dar uma olhada legal no teu código... Mas caso você descobrir
antes como fazer, posta na lista, pra agente saber!
Abraços
Ricardo Berti
- Original Message -
From: Tiago de Assis Pimenta
To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br
Sent: Tuesday, February 13, 2007 9:56 AM
Subject: RES: [delphi-br] [URGENTE] Formatação Impressão Matricial
Boa Tarde Ricardo, faço tudo na mão, vou colar o código de como esta.
procedure Tfrmcadordserv.BitBtn1Click(Sender: TObject);
const
CNegrito = #27#71; // Define Caracter Negrito;
SNegrito = #27#72; // Define Caracter Não Negrito;
CExpandido = #14;
SExpandido = #20;
var
a: textfile;
begin
// Imprimindo Ordem de Serviço
assignfile(a,'c:\tmp\cupom.txt');
rewrite(A);
writeln(A,'=
==');
writeln(A,' BRANCO AUTO MECANICA - ESPECIALIZADA EM INJECAO
ELETRONICA ');
writeln(A,' AV. MESSIAS GONCALVES, 1363 - (17) 3325-8055
');
writeln(A,'=
==');
write(A,CNegrito + CExpandido + format('%-29s',['ORDEM DE SERVICO N: ' +
formatfloat('0',strtoint(edit1.text))]));
writeln(A,SNegrito + SExpandido + format('%10s',['DATA:
'+frmordserv.qrordserv.fieldbyname('data').asstring]));
writeln(A);
write(A,format('%-57s',['NOME DO CLIENTE: '+
qrcli.fieldbyname('nome').value]));
writeln(A,format('%-22s',['CELULAR: '+qrcli.fieldbyname('celular').value]));
write(A,format('%-57s',['ENDERECO: '+
qrcli.fieldbyname('endereco').value]));
writeln(A,format('%-22s',['BAIRRO : '+ qrcli.fieldbyname('bairro').value]));
write(A,format('%-57s',['CIDADE: '+ qrcli.fieldbyname('cidade').value]));
writeln(A,format('%-22s',['CEP.: '+ qrcli.fieldbyname('cep').value]));
write(A,format('%-35s',['TELEFONE: '+
qrcli.fieldbyname('telefone').value]));
write(A,format('%-22s',['CPF: '+ qrcli.fieldbyname('cpf').value]));
writeln(A,format('%-22s',['RG: ' + qrcli.fieldbyname('rg').value]));
writeln(A);
write(A,format('%-57s',['MARCA: '+
frmordserv.qrordserv.fieldbyname('marca').value]));
writeln(A,format('%-22s',['MODELO: '+
frmordserv.qrordserv.fieldbyname('modelo').value]));
write(A,format('%-35s',['COR: '+
frmordserv.qrordserv.fieldbyname('cor').value]));
write(A,format('%-22s',['PLACA: '+
frmordserv.qrordserv.fieldbyname('placa').value]));
writeln(A,format('%-22s',['KM DO VEICULO: '+edit3.text]));
writeln(A);
writeln(A,format('%-20s',['FUNCIONARIO: '+
frmordserv.qrordserv.fieldbyname('funcionario').value]));
writeln(A,'=
==');
write(A,format('%-40s',['DISCRIMANACAO']));
write(A,format('%-10s',['QTDE']));
write(A,format('%-18s',['PRECO UNITARIO']));
writeln(A,format('%-10s',['PRECO TOTAL']));
writeln(A,'=
==');
qrhistserv.first;
while not qrhistserv.eof do
begin
write(A,format('%-40s',[qrhistserv.fieldbyname('servico').value]));
write(A,format('%-10s',[qrhistserv.fieldbyname('qtde').value]));
write(A,format('%-18s',[formatfloat('##0.00',qrhistserv.fieldbyname('precoun
').value)]));
write(A,format('%-10s',[formatfloat('##0.00',qrhistserv.fieldbyname('total')
.value)]));
writeln(A);
qrhistserv.next;
end;
writeln(A,'=
==');
write(A,CNegrito + CExpandido + 'TOTAL R$: ');
writeln(A,format('%29.2f',[frmordserv.qrordserv.fieldbyname('total').asfloat
]));
writeln(A,SNegrito + SExpandido +
'===
');
writeln(A);
writeln(A);
writeln(A);
writeln(A);
//writeln(A,'___');
writeln(A,' ASSINATURA DO CLIENTE');
closefile(A);
Tiago de Assis Pimenta
MSN: mailto:tiagopimenta@ mailto:tiagopimenta%40hotmail.com hotmail.com
tiagopimenta@ mailto:tiagopimenta%40hotmail.com hotmail.com
Skype: tiagopimenta_skype
Gtalk: tiagopimenta
_
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 Ricardo Berti
Enviada em: terça-feira, 13 de fevereiro de 2007 09:14
Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br
Assunto: Re: [delphi-br] [URGENTE] Formatação Impressão Matricial
Como você faz pra imprimir
[delphi-br] [URGENTE] Formatação Impressão Matricial
Galera, seguinte, preciso da seguinte informação. Tem como eu usar o write para fazer o seguinte. Na hora que chegar num determinado numero de caracter, ele pule para a proxima linha, mais ou menos no estilo das Celulas do Excel ??? Por ex.: Eu reservo um espaço de 50 caracteres para Descrição do Serviço na nota, se ele passar de 50, ele pula para a proxima linha, sem atrapalhar a coluna preço. Na nota ficaria assim DESCRIÇÃO |PREÇO TESTE TESTE TESTE TESTE TESTE TESTE TESTE TESTE TESTE TESTE R$ 40,00 OUTRO TESTE R$ 20,00 Tem como ? Tiago de Assis Pimenta MSN: mailto:[EMAIL PROTECTED] [EMAIL PROTECTED] Skype: tiagopimenta_skype Gtalk: tiagopimenta [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [URGENTE] Contorno de imagens.
ok, mas a bronca é que eu nao sei fazer isso. e to meioi que sem tempo. tu tem como me dar uma ajuda me enviando tutoriasi ou algo desse tipo? obrigado. Em 21/01/07, André Geraldo [EMAIL PROTECTED] escreveu: Olha só procura na Web filtro passa alta, é o que queres o que procuras é linhas de alto contraste, dá para fazer no braço tb, tens que passar a imagem para tons de cinza e então procurar valores onde aja uma mudança alta em relação a uma de suas vizinhanas. André Geraldo Mestrando em Ciência da Computação/UFRGS. Rafael Jorge wrote: quem puder me ajudar agradeceria muito.. preciso de uma rotina, compomente, macumba, jeitinho ou qualquer coisa que peque uma imagem e so me devolva o contorno da mesma. tipo.. pegar uma imagem colorida e so me retornar os contorno do desenho que esta nela. sem cores sem nada. to precisando disso urgente mente para comcluir um projeto quem puder me ajudar serei muito grato. t+ -- Rafael jorge alves www.itrecife.com - para verem meus artigos e trabalhos t+ [As partes desta mensagem que não continham texto foram removidas] -- Rafael jorge alves www.itrecife.com - para verem meus artigos e trabalhos t+ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [URGENTE] Contorno de imagens.
Olha só procura na Web filtro passa alta, é o que queres o que procuras é linhas de alto contraste, dá para fazer no braço tb, tens que passar a imagem para tons de cinza e então procurar valores onde aja uma mudança alta em relação a uma de suas vizinhanas. André Geraldo Mestrando em Ciência da Computação/UFRGS. Rafael Jorge wrote: quem puder me ajudar agradeceria muito.. preciso de uma rotina, compomente, macumba, jeitinho ou qualquer coisa que peque uma imagem e so me devolva o contorno da mesma. tipo.. pegar uma imagem colorida e so me retornar os contorno do desenho que esta nela. sem cores sem nada. to precisando disso urgente mente para comcluir um projeto quem puder me ajudar serei muito grato. t+ -- Rafael jorge alves www.itrecife.com - para verem meus artigos e trabalhos t+ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] [URGENTE] Contorno de imagens.
quem puder me ajudar agradeceria muito.. preciso de uma rotina, compomente, macumba, jeitinho ou qualquer coisa que peque uma imagem e so me devolva o contorno da mesma. tipo.. pegar uma imagem colorida e so me retornar os contorno do desenho que esta nela. sem cores sem nada. to precisando disso urgente mente para comcluir um projeto quem puder me ajudar serei muito grato. t+ -- Rafael jorge alves www.itrecife.com - para verem meus artigos e trabalhos t+ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] URGENTE - Erro ao abrir um form....
Galera, bom dia. Tenho um form inicial de um sistema que ta dando o seguinte erro quando tento abri-lo no delphi: Corrupt Portfolio Stream O que eu faço. ta td parado... Já voltei Backup e ta insistindo nesse problema... To usando ele como MDI Form... Márcio Cristiano Tenreiro Programador Pleno Universidade de Marília/SP (14) 2105-4129 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] URGENTE - Erro ao abrir um form....
Qual a versão do Delphi? Em 18/01/07, Marcio [EMAIL PROTECTED] escreveu: Galera, bom dia. Tenho um form inicial de um sistema que ta dando o seguinte erro quando tento abri-lo no delphi: Corrupt Portfolio Stream O que eu faço. ta td parado... Já voltei Backup e ta insistindo nesse problema... To usando ele como MDI Form... Márcio Cristiano Tenreiro Programador Pleno Universidade de Marília/SP (14) 2105-4129 [As partes desta mensagem que não continham texto foram removidas] -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ [As partes desta mensagem que não continham texto foram removidas]
Res: Re: [delphi-br] URGENTE - Erro ao abrir um form....
Delphi 7 Márcio Cristiano Tenreiro Programador Pleno Universidade de Marília/SP (14) 2105-4129 ---Mensagem original--- De: Eduardo Silva dos Santos Data: 18/01/2007 10:13:07 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] URGENTE - Erro ao abrir um form Qual a versão do Delphi? Em 18/01/07, Marcio [EMAIL PROTECTED] escreveu: Galera, bom dia. Tenho um form inicial de um sistema que ta dando o seguinte erro quando tento abri-lo no delphi: Corrupt Portfolio Stream O que eu faço. ta td parado... Já voltei Backup e ta insistindo nesse problema... To usando ele como MDI Form... Márcio Cristiano Tenreiro Programador Pleno Universidade de Marília/SP (14) 2105-4129 [As partes desta mensagem que não continham texto foram removidas] -- Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] urgente
Posta aqui na lista as suas dúvidas aqui tem muita gente que trabalhou ou trabalha com dev e 2006 (como eu :- ) Em 30/10/06, alan_adolfo2 [EMAIL PROTECTED] escreveu: Espto procurando pessoas que programão em Delphi 2006 e que utiliza coponentes DEV Express, para tirar duvidas de programação. sobre os componentes. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] [urgente] propiedades de componente
Olá Rafael, Bom os componentes que possuem a propriedade Text a exemplo do Edit são herdados da Classe TEditCustom. Por isso você póderá utilizar o seguinte: for i:=0 to TForm(sender).ComponentCount-1 do if TForm(sender).Components[i] is TCustomEdit then begin (TForm(sender).Components[i] as TCustomEdit ).Text := ''; Espero ter contribuído. Sds, Alexandre Macedo 2006/10/6, Rafael Jorge [EMAIL PROTECTED]: como eu faço pra saber se tal compomente tem uma determinada propiedade?? exemplo eu quero varrer o form e apagar os textos de todos os compomentes que tem a propiedade text. ai faria assim... for i := 0 to self.componentscount -1 do if (fu) self.components[i] (funcao que diz se tem a proiedade ou nao) -- Rafael jorge alves www.itrecife.com - para verem meus artigos e trabalhos t+ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] [URGENTE] Showmodal nao funciona mais
Tente assim try form1 := tform1.create(application); form1.showmodal; finally form1.free; form1:= nil; end; - Original Message - From: Rafael Jorge To: delphi-br Sent: Friday, October 06, 2006 4:12 PM Subject: [delphi-br] [URGENTE] Showmodal nao funciona mais criei um novo projeto no meu delphi 2006 com update 1 e quando eu invoco um form com o showmodal ele simplesmente roda o form como um show normal. ou seja form1 := tform1.create(application); form1.showmodal; form1.free; form1:= nil; ao chegar no form1.showmodal ele deveria abrir o form e mostralo na tela e esperar ele ser fechado pelo usuario ou entao de algum modo se fechado, o sistema nao espera apos o showmodal ele vai logo pro form1.free; e de pois o form1:= nil, nao importa o que tenha no form. criei um form em branco e sem nada e chamei ele e ele tb abra e fecha nao importando se é modal ou nao. o mais estranho é que utilizo estes mesmo forms em outro projeto e nao acontece isso.. -- Rafael jorge alves www.itrecife.com - para verem meus artigos e trabalhos t+ [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 1.1793 (20061006) __ 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] -- 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] [URGENTE] Showmodal nao funciona mais
Tente assim: Application.CreateForm(Form1,TForm1); try Form1.ShowModal; finally Form1.Release; Form1 := nil; end; Abraço. - Original Message - From: Emerson Cassio To: delphi-br@yahoogrupos.com.br Sent: Saturday, October 07, 2006 7:21 AM Subject: Re: [delphi-br] [URGENTE] Showmodal nao funciona mais Tente assim try form1 := tform1.create(application); form1.showmodal; finally form1.free; form1:= nil; end; - Original Message - From: Rafael Jorge To: delphi-br Sent: Friday, October 06, 2006 4:12 PM Subject: [delphi-br] [URGENTE] Showmodal nao funciona mais criei um novo projeto no meu delphi 2006 com update 1 e quando eu invoco um form com o showmodal ele simplesmente roda o form como um show normal. ou seja form1 := tform1.create(application); form1.showmodal; form1.free; form1:= nil; ao chegar no form1.showmodal ele deveria abrir o form e mostralo na tela e esperar ele ser fechado pelo usuario ou entao de algum modo se fechado, o sistema nao espera apos o showmodal ele vai logo pro form1.free; e de pois o form1:= nil, nao importa o que tenha no form. criei um form em branco e sem nada e chamei ele e ele tb abra e fecha nao importando se é modal ou nao. o mais estranho é que utilizo estes mesmo forms em outro projeto e nao acontece isso.. -- Rafael jorge alves www.itrecife.com - para verem meus artigos e trabalhos t+ [As partes desta mensagem que não continham texto foram removidas] __ Informação do NOD32 IMON 1.1793 (20061006) __ 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] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] [URGENTE] Showmodal nao funciona mais
criei um novo projeto no meu delphi 2006 com update 1 e quando eu invoco um form com o showmodal ele simplesmente roda o form como um show normal. ou seja form1 := tform1.create(application); form1.showmodal; form1.free; form1:= nil; ao chegar no form1.showmodal ele deveria abrir o form e mostralo na tela e esperar ele ser fechado pelo usuario ou entao de algum modo se fechado, o sistema nao espera apos o showmodal ele vai logo pro form1.free; e de pois o form1:= nil, nao importa o que tenha no form. criei um form em branco e sem nada e chamei ele e ele tb abra e fecha nao importando se é modal ou nao. o mais estranho é que utilizo estes mesmo forms em outro projeto e nao acontece isso.. -- Rafael jorge alves www.itrecife.com - para verem meus artigos e trabalhos t+ [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] [urgente] propiedades de componente
como eu faço pra saber se tal compomente tem uma determinada propiedade?? exemplo eu quero varrer o form e apagar os textos de todos os compomentes que tem a propiedade text. ai faria assim... for i := 0 to self.componentscount -1 do if (fu) self.components[i] (funcao que diz se tem a proiedade ou nao) -- Rafael jorge alves www.itrecife.com - para verem meus artigos e trabalhos t+ [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Urgente - Oportunidade Programador Delphi (Sr)
Boa Tarde! A M.A.R. Informática, empresa especializada na prestação de serviços e soluções em Tecnologia da Informação(T.I.), seleciona profissionais com o seguinte perfil: Programador Delphi Sênior - Ampla experiência em programação Delphi; - Banco de dados Oracle e SQL Server; - Bom domínio de Inglês (Será utilizado para comunicação com estrangeiros) - Desejável conhecimento no ramo de cartões - Objetivo do Trabalho: Aprender um sistema em Delphi e fazer alterações solicitadas pelo projeto. - Local de Trabalho: Região Sul- São Paulo - Contratação PJ Os interessados deverão encaminhar o currículo atualizado para o e- mail: [EMAIL PROTECTED] URGENTE. Obrigada!! Priscila Goyos M.A.R. Informática 11-3814-4949 -- 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] [urgente] propiedades de componente
Rafael Jorge wrote: como eu faço pra saber se tal compomente tem uma determinada propiedade?? exemplo eu quero varrer o form e apagar os textos de todos os compomentes que tem a propiedade text. ai faria assim... for i := 0 to self.componentscount -1 do if (fu) self.components[i] (funcao que diz se tem a proiedade ou nao) Veja se é mais ou menos isso o que você precisa: type TCustomEditFriend = class(TCustomEdit); var I: Integer; begin for I := 0 to Pred(ComponentCount) do if Components[I] is TCustomEdit then TCustomEditFriend(Components[I]).Text := ''; Moral da história - escolha uma classe base, crie um friend para ela e altere a propriedade que você quer. -- João Morais -- 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
