Re: [delphi-br] Integrar leitor de códigos de barrra s com Delphi 7

2008-02-13 Por tôpico Walter Chagas Jr (BOL)
Isto não precisa de material.

Um leitor convencional usa a entrada do teclado. então basta voce setar o foco 
do form num edit que quando leitor ler um codigo ele vai jogar os dados 
diretamente no edit


[]s



Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
[EMAIL PROTECTED]
http://www.geocities.com/SiliconValley/Bay/1058
MSN: [EMAIL PROTECTED]
SKYPE: WalterChagasJr

  - Original Message - 
  From: duvar_delphi 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, February 12, 2008 1:27 PM
  Subject: [delphi-br] Integrar leitor de códigos de barrras com Delphi 7


  Alguem possui ou sabe onde posso encontrar material que explique como 
  fazer para integrar o leitor de codigos de barras a um sistema 
  desenvolvido em Delphi 7, por exemplo, salvar os dados do leitor de 
  códigos de barras em um banco de dados, ou no proprio computador. 
  Alguém já desenvolveu programas em Delphi utilizando leitor de códigos 
  de barras, se puderem me ajudar eu agradeço.



   

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Acesso Db2 Mainframe

2008-02-13 Por tôpico Paulo Batalhão
ado / dbexpress


From: Nogueira Gmail 
Sent: Tuesday, February 12, 2008 1:44 PM
To: delphi-br@yahoogrupos.com.br 
Subject: [delphi-br] Acesso Db2 Mainframe


Pessoal,

Existe algum componente Delphi para acesso ao Db2 dentro de um ambiente
Mainframe (ESA390, zOS) ?

Nogueira
+55 12 9175-6354
mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]
Skype: nogueira.jr


[As partes desta mensagem que não continham texto foram removidas]



 

[As partes desta mensagem que não continham texto foram removidas]



Re: RES: [delphi-br] RAD Studio/Delphi 2007 e dbexpress com firebird

2008-02-13 Por tôpico Walter Chagas Jr (BOL)
Ninguém aqui falou que o FPC é projeto acadêmico ou de fundo de quintal. você é 
quem está fazendo esta citação.

Agora, acredito plenamente que o ilustre está lembrado da mensagem abaixo aonde 
o nobre colega diz em tom claro que o Delphi está tomando surra do FPC

http://br.groups.yahoo.com/group/delphi-br/message/183513

Empatando recursos eu até concordo com você, mas em partes. O Patamar do FPC 
atualmente, podemos colocá-lo lá no Delphi 4 aproximadamente. Já tem muita 
coisa boa lá funcionando, mas ainda não o suficiente pra bater de Frente com o 
Delphi.

E quanto a recursos da IDE, a do Delphi é tão boa que foi imitada pelo 
PocketStudio e descaradamente pelo Netbeans.

Eu acho mesmo é que as pessoas deveriam de cuspir menos no prato que comem...

[]s



Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
[EMAIL PROTECTED]
http://www.geocities.com/SiliconValley/Bay/1058
MSN: [EMAIL PROTECTED]
SKYPE: WalterChagasJr

  - Original Message - 
  From: Joao Morais 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, February 12, 2008 8:02 AM
  Subject: Re: RES: [delphi-br] RAD Studio/Delphi 2007 e dbexpress com firebird


  Walter Chagas Jr (BOL) wrote:
   Vou te falar uma coisa.
   
   Eu tenho ele instalado no Laptop aqui em casa. Pra pequenos projetos
   ou programas de porte monousuário ele atente numa boa. Mas pra coisa
   grande, ainda fica devendo.
   
   É uma interessante alternativa? É, mas peraí né gente. Falar que o
   Delphi tá tomando uma surra do FPC? Viaja não né...

  Ih Walter, fosse mal duas vezes.

  Primeiro que FPC não é um projeto acadêmico, tem muito software grande, 
  servidores de aplicação e etc rodando com ele. Você não pode colocar uma 
  deficiência pessoal como um problema da ferramenta.

  Segundo que ninguém está dando surra em ninguém. Nem o FPC no Delphi nem 
  o Delphi no FPC. O que está acontecendo é que a equipe do FPC está 
  deixando de comer poeira da Borland/CG e está empatando em recursos.

  Por fim, as IDEs e frameworks gráficos para FPC ainda estão em 
  desenvolvimento, o que não significa que não esteja em condições de se 
  escrever código decente com elas. Falta um debugger bom como o da 
  Borland/CG, talvez falte uma IDE perfumada como o Delphi ou RAD Studio, 
  falta resolver algumas instabilidades, mas só não desenvolve aplicações 
  multiusuário quem não sabe fazê-lo direito.

  --
  Joao Morais


   

[As partes desta mensagem que não continham texto foram removidas]



Re: RES: [delphi-br] RAD Studio/Delphi 2007 e dbexpress com firebird

2008-02-13 Por tôpico Joao Morais

Olá Walter, eu me prometi encerrar esta discussão, vou meramente 
corrigir equívocos, ok?

--- Walter Chagas Jr \(BOL\) escreveu

 Ninguém aqui falou que o FPC é projeto acadêmico ou de fundo de
 quintal. você é quem está fazendo esta citação.

Você citou que fpc serve apenas para construção de pequenas 
aplicações, isto é característica do que conhecemos por 'projeto 
acadêmico'. Fundo de quintal ainda não haviamos lido em local algum, 
exceto na sua citação.

 Agora, acredito plenamente que o ilustre está lembrado da mensagem
 abaixo aonde o nobre colega diz em tom claro que o Delphi está
 tomando surra do FPC
 
 http://br.groups.yahoo.com/group/delphi-br/message/183513

Ah, é verdade, no entanto 'em alguns quesitos', concorda? Concordo 
que 'surra' foi um pouco demais ao tratar de softwares com nichos 
diferentes. Se você acompanhasse os fóruns da Borland não iria se 
espantar tanto com o meu comentário.

 Empatando recursos eu até concordo com você, mas em partes. O
 Patamar do FPC atualmente, podemos colocá-lo lá no Delphi 4
 aproximadamente. Já tem muita coisa boa lá funcionando, mas ainda
 não o suficiente pra bater de Frente com o Delphi.

Que isso Walter. O FPC, repito o *FPC* 2.2 está no patamar do Delphi 
2007. Ele ganha disparado em número de arquiteturas e plataformas, 
empata em recursos e qualidade do código final, e perde feio na 
velocidade de compilação. Biblioteca gráfica é outra história, e que 
não se limita ao Lazarus. A gente pode bater um papo em private ou em 
uma lista de object pascal para discutir este assunto, se for do seu 
interesse.

 Eu acho mesmo é que as pessoas deveriam de cuspir menos no prato
 que comem...

É verdade.

--
Joao Morais




Re: RES: [delphi-br] RAD Studio/Delphi 2007 e dbexpress com firebird

2008-02-13 Por tôpico Walter Chagas Jr (BOL)
Davi,

Vejo que todos nós temos um consenso em questionar o porque de todo ano ter que 
lançar uma versão nova ainda que a anterior não tenha atendido plenamente. Isto 
realmente é uma coisa altamente questionável. Mas hemos de concordar que a 
comunidade também tem a sua fatia. por exemplo: Na Borcon ano passado, o 
contexto global do evento foi focado no Rad Studio 2007 e já tinha gente lá 
perguntando pelo 2008, se vai ter isto ou o que vai ter de novo. Ora gente, se 
o 2007 acabou de ser lançado e nem sabemos ainda qual vai ser a performance 
dele, pra que que nego já tá reinvindicando o 2008??? Não faz o menor sentido 
você perguntar por uma versão X se nem a X-1 você ainda avaliou. E eu vi isto 
lá na Borcon.

Boa fatia do Mercado ainda usa o Delphi 7, tem gente que ainda usa o 2,3 e até 
o 5 que sabemos. O Delphi 8 nunca se explicou. O 2005 veio. Gordo, pesadão e 
lento... O 2006 ainda deu uma melhorada e o 2007 taí. Agora eu pergunto: E se 
ao invés de tantos Delphis, eles tivessem deixado pra lançar depois do D7, o 
Delphi 2006 e só quando este estivesse o fino da bola lançassem outra versão? A 
imagem do produto seria outra, eu tenho certeza absoluta.

Quanto ao FPC, eu uso ele aqui no meu Laptop e acho um produto que tem futuro, 
muito bom mas ainda tá longe de peitar o Delphi.

[]s



Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
[EMAIL PROTECTED]
http://www.geocities.com/SiliconValley/Bay/1058
MSN: [EMAIL PROTECTED]
SKYPE: WalterChagasJr

  - Original Message - 
  From: Davi Eduardo Borges Wall 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, February 12, 2008 9:19 AM
  Subject: RES: RES: [delphi-br] RAD Studio/Delphi 2007 e dbexpress com firebird


  Caro amigo JCPF,

  Não estou defendendo o João, mas este não era o cunho de seu post. João quis 
salientar o porque de se lançar lançar tantas versões
  de Delphi tão rapidamente.
  Um dos motivos, ele mencionou, é que os concorrentes estão deixando de 
engatinhar e estão começando a andar. FPC é um deles.

  Aliás, pessoal, vamos começar a ler o tópico por completo antes de dar pitaco 
que não faz sentido. E gerar discussões de trolls.

  []'s

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de JCPF 
GMAIL
  Enviada em: terça-feira, 12 de fevereiro de 2008 08:52
  Para: delphi-br@yahoogrupos.com.br
  Assunto: RES: RES: [delphi-br] RAD Studio/Delphi 2007 e dbexpress com firebird

  João,

  Deixa eu dar um pitaco aqui e será o último nesse assunto.

  Já que o tal de FPC é tão bom porque você não abandona o Delphi que é pago e
  usa essa ferramenta que é FREE?

  Meu, já vi muita história igualzinha a essa...Ah tem uma ferramenta nova,
  grátis e que faz o trabalho dessa outra ferramentaé só ver o tal do
  Linux, ah é grátis, melhor que o Windows, faz isso, faz aquilo.mas
  pouquíssima gente migra para o tal do Linux, muito pelo contrário, sei de
  empresas grandes que migraram do Linux para o Windows !

  E também tem o tal do Java, que há mais de 10 anos ouço que é a linguagem do
  futuroeta futuro que está longe esse pois nunca chega, pois quando
  vamos ver, os sistemas são desenvolvidos em DELPHI, VB e até FOXPRO(conheci
  um sistema de compra on-line semana passada que foi feito em FOXPRO e
  funciona que é uma belezinha). Isso sem falar nos sistemas feitos em CLIPPER
  e que ainda estão por aí

  Agora quanto ao FPC/Lazarus ainda não vi nenhuma aplicação feita nele. Será
  que um dia veremos?

  Claro, vai ter o purista que vai dizer que eu não sei programar em Java ou
  que não sei usar o Linux, bem para esse só tenho uma resposta: eu não sei e
  mais um bando de gente também não sabe...

  E também vai ter o outro que vai dizer: a melhor ferramenta é aquela que
  atende ao que você precisa. Correto, então já que FPC atende ao seus
  requisitos, novamente sugiro que você passe a utilizá-la e pare de gastar
  din-din com o Delphi.

  Veja bem, essa é a MINHA opinião, sem quere ofender a ninguém nem causar uma
  discussão inútil.

  João Carlos

  De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br ] 
Em
  nome de Joao Morais
  Enviada em: terça-feira, 12 de fevereiro de 2008 08:02
  Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
  Assunto: Re: RES: [delphi-br] RAD Studio/Delphi 2007 e dbexpress com
  firebird

  Walter Chagas Jr (BOL) wrote:
   Vou te falar uma coisa.
   
   Eu tenho ele instalado no Laptop aqui em casa. Pra pequenos projetos
   ou programas de porte monousuário ele atente numa boa. Mas pra coisa
   grande, ainda fica devendo.
   
   É uma interessante alternativa? É, mas peraí né gente. Falar que o
   Delphi tá tomando uma surra do FPC? Viaja não né...

  Ih Walter, fosse mal duas vezes.

  Primeiro que FPC não é um projeto acadêmico, tem muito software grande, 
  servidores de aplicação e etc rodando com ele. Você não pode colocar 

[delphi-br] Ajuda com TRecord

2008-02-13 Por tôpico Celio Bernardo
Amigos tenho uma estrutura como
   
  Type TPessoas = record
   
  Nome : String[60];
  cpf : String[11];
   
  end.
  ...
   
  var
 Pessoa : TPessoas;
   
   
  Como é a sintaxe pra pegar o tamanho do campo:
   Exemplo: Pessoa.Nome  o tamamho é 60.
   
  Obrigado
   
  Celio.
   



-
 Célio Bernardo de Lima
Diretor de Projetos e Novas Tecnologias
siatech.com.br 
-

   
-
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] Criptografar dados no .exe

2008-02-13 Por tôpico Gerson Machado
O que normalmente se faz é usar um arquivo .ini com as configurações básicas do 
sistema e nele aplicar a criptografia.
  

Tiago [EMAIL PROTECTED] escreveu:
  Olá,

Essa semana me despertou a curiosidade de saber o que meu
.exe tinha de informações. Utilizando uma ferramenta que possibilita
analisar arquivos .exe, tive um grande susto ao ver que informações como
usuários e senhas de acesso ao banco de dados estavam totalmente acessíveis,
e muitas outras informações que possibilitariam que um “hacker” possa se
“divertir” com meus sistema.

Bom a duvida é a seguinte, existe uma forma de quando eu for
informar a senha de meu banco de dados no componente TDatabase essa senha
fique criptografada, e ainda que eu possa deixar o meu exe com o mino de
informaçãon disponível a quem tentar fazer este tipo de análise ao exe?

Obrigado!

[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] Criptografar dados no .exe

2008-02-13 Por tôpico Tiago
Olá,

 

Essa semana me despertou a curiosidade de saber o que meu
.exe tinha de informações. Utilizando uma ferramenta que possibilita
analisar arquivos .exe, tive um grande susto ao ver que informações como
usuários e senhas de acesso ao banco de dados estavam totalmente acessíveis,
e muitas outras informações que possibilitariam que um “hacker” possa se
“divertir” com meus sistema.

 

Bom a duvida é a seguinte, existe uma forma de quando eu for
informar a senha de meu banco de dados no componente TDatabase essa senha
fique criptografada, e ainda que eu possa deixar o meu exe com o mino de
informaçãon disponível a quem tentar fazer este tipo de análise ao exe?

 

Obrigado!



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Criptografar dados no .exe

2008-02-13 Por tôpico Consultores Software
Colega,  porque você não salva os parâmetros da aplicação em um arquivo de
configurações criptografado ?
Nas dicas de delphi pela internet, você  pode encontrar  rotinas de
criptografia  para isso.

Em 13/02/08, Tiago [EMAIL PROTECTED] escreveu:

   Olá,

 Essa semana me despertou a curiosidade de saber o que meu
 .exe tinha de informações. Utilizando uma ferramenta que possibilita
 analisar arquivos .exe, tive um grande susto ao ver que informações como
 usuários e senhas de acesso ao banco de dados estavam totalmente
 acessíveis,
 e muitas outras informações que possibilitariam que um hacker possa se
 divertir com meus sistema.

 Bom a duvida é a seguinte, existe uma forma de quando eu for
 informar a senha de meu banco de dados no componente TDatabase essa senha
 fique criptografada, e ainda que eu possa deixar o meu exe com o mino de
 informaçãon disponível a quem tentar fazer este tipo de análise ao exe?

 Obrigado!

 [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] Criptografar dados no .exe

2008-02-13 Por tôpico Jackson Gomes - ToolsComps

Bom a duvida é a seguinte, existe uma forma de quando eu for
 informar a senha de meu banco de dados no componente TDatabase essa senha
 fique criptografada, e ainda que eu possa deixar o meu exe com o mino de
 informaçãon disponível a quem tentar fazer este tipo de análise ao exe?

http://www.aspack.com/

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] Ajuda com TRecord

2008-02-13 Por tôpico Ricardo César Cardoso
Vamos ver se a minha memória anda boa:

Declare uma variável do tipo Integer e atribua o seguinte:

Tamanho_Campo := Length(Pessoa.Nome);

Se bem que eu acho que vai retornar o tamanho do conteúdo de uma instância de 
Pessoa... 

Atte,
Ricardo.

Celio Bernardo [EMAIL PROTECTED] escreveu:   
Amigos tenho uma estrutura como

   Type TPessoas = record

   Nome : String[60];
   cpf : String[11];

   end.
   ...

   var
  Pessoa : TPessoas;


   Como é a sintaxe pra pegar o tamanho do campo:
Exemplo: Pessoa.Nome  o tamamho é 60.

   Obrigado

   Celio.

 
 -
  Célio Bernardo de Lima
 Diretor de Projetos e Novas Tecnologias
 siatech.com.br 
 -
 
 -
 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] [OFF-TOPIC] Vagas Delphi - Object Pascal/PHP - Rio de Janeiro

2008-02-13 Por tôpico mscavoni
Empresa com sede no Rio de Janeiro/Méier seleciona candidatos para
DESENVOLVEDOR DELPHI-OBJECT PASCAL com os seguintes requisitos
mínimos:
 
Perfil:
Profissional com experiência de no mínimo 05 (cinco) anos de 
desenvolvimento em
ambiente Delphi-Object Pascal, com visão ampla e técnica na 
programação e análise
direcionada para área Contábil.

Pró-atividade, boa capacidade de relacionamento, possibilidade de 
trabalhar extra-horário,
auto-motivação para contagiar a equipe que irá compor.

Formação Profissional:
- Técnico com experiência comprovada ou nível superior completo ou em 
andamento.
- Inglês Técnico.

 Experiência exigida:
- Linguagem Delphi (Object Pascal)
- PHP com Delphi
- Orientação a Objetos
- Banco de Dados Relacional ( Firebird )
- Desenvolvimento Delphi / SGBD relacional em camadas
- Desenvolvimento de sistemas para a internet/intranet
- Modelagem UML

Oferecemos:
- Salário compatível com o mercado
- Ambiente Internet
- Bom ambiente de trabalho com possibilidades de crescimento.

Enviar currículo com pretensão salarial (PJ/CLT) para:
[EMAIL PROTECTED]
Assunto: Vaga Desenvolvedor




Res: [delphi-br] Ajuda com TRecord

2008-02-13 Por tôpico Andre Luis Silveria
length(Pessoa.Nome);

- Mensagem original 
De: Celio Bernardo [EMAIL PROTECTED]
Para: delphi-br delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 13 de Fevereiro de 2008 8:14:42
Assunto: [delphi-br] Ajuda com TRecord









  



Amigos tenho uma estrutura como

   

  Type TPessoas = record

   

  Nome : String[60];

  cpf : String[11];

   

  end.

  ...

   

  var

 Pessoa : TPessoas;

   

   

  Como é a sintaxe pra pegar o tamanho do campo:

   Exemplo: Pessoa.Nome  o tamamho é 60.

   

  Obrigado

   

  Celio.

   



 - - ---

 Célio Bernardo de Lima

Diretor de Projetos e Novas Tecnologias

siatech.com. br 

 - - ---



 - - ---

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]






  







!--

#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-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]



Re: [delphi-br] Ajuda com TRecord - POREM

2008-02-13 Por tôpico Celio Bernardo
Obrigado pela ajudas, porem o que preciso é que me retorne o tamanho da 
variavel declarada e NAO do tamanho do seu conteudo.
No caso de Pessoa.Nome o resultado deve ser 60.
   
  Mias ainda, tem como fazer um loop para percorrer todos os campos da variaver 
Pessoa, para fins de zerar seu conteudo.
  tipo
for i := 0 to pessoa.recordcount do
   pessoa.field[i].value := ''
   
  obrigado
   
  Celio.
  
Ricardo César Cardoso [EMAIL PROTECTED] escreveu:
  Vamos ver se a minha memória anda boa:

Declare uma variável do tipo Integer e atribua o seguinte:

Tamanho_Campo := Length(Pessoa.Nome);

Se bem que eu acho que vai retornar o tamanho do conteúdo de uma instância de 
Pessoa... 

Atte,
Ricardo.

Celio Bernardo [EMAIL PROTECTED] escreveu: Amigos tenho uma estrutura como

Type TPessoas = record

Nome : String[60];
cpf : String[11];

end.
...

var
Pessoa : TPessoas;


Como é a sintaxe pra pegar o tamanho do campo:
Exemplo: Pessoa.Nome o tamamho é 60.

Obrigado

Celio.


-
Célio Bernardo de Lima
Diretor de Projetos e Novas Tecnologias
siatech.com.br 
-

-
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]



 



-
 Célio Bernardo de Lima
Diretor de Projetos e Novas Tecnologias
siatech.com.br 
-

   
-
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] Ajuda com TRecord

2008-02-13 Por tôpico Eduardo
Length(Pessoa.Nome)

Ou você pode fazer assim:

unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;
type TPessoa = Class(TObject)
  private
FNome : String;
FTamanho: Integer;
FCPF: String;
function SetFNome: String;
  public
property Nome: String  read SetFNome write FNome;
property CPF : String  read FCPF write FCPF;
property Tamanho : Integer read FTamanho;
  end;
type
  TForm1 = class(TForm)
  private
{ Private declarations }
  public
{ Public declarations }
  end;
var
  Form1: TForm1;
implementation
{$R *.dfm}
{ TPessoa }
function TPessoa.SetFNome: String;
begin
  Result   := FNome;
  FTamanho := Length(FNome);
end;
end.

Sempre que você passar um nome o tamanho é preenchido !!!

Eduardo

- Mensagem original 
De: Celio Bernardo [EMAIL PROTECTED]
Para: delphi-br delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 13 de Fevereiro de 2008 9:14:42
Assunto: [delphi-br] Ajuda com TRecord

  Amigos tenho uma estrutura como
   
  Type TPessoas = record
   
  Nome : String[60];
  cpf : String[11];
   
  end.
  ...
   
  var
 Pessoa : TPessoas;
   
   
  Como é a sintaxe pra pegar o tamanho do campo:
   Exemplo: Pessoa.Nome  o tamamho é 60.
   
  Obrigado
   
  Celio.
   

 - - ---
 Célio Bernardo de Lima
Diretor de Projetos e Novas Tecnologias
siatech.com. br 
 - - ---

 - - ---
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]



  
!--

#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-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]



RE: [delphi-br] Ajuda com TRecord - POREM

2008-02-13 Por tôpico Rubem Nascimento da Rocha

Apenas para constar. Estamos falando aqui em estruturas de dados heterogêneas e 
estáticas(registros, a.k.a. records) e não em tipos de dados abstratos, como 
classes. Portanto, é errado falar em instância de um record. Mais uma coisa, 
não existe uma classe ou tipo registro do tipo TRecord em Object Pascal. O que 
existe é a palavra reservada record para definir uma estrutura de registro, de 
forma semelhante à declaração struct em linguagem C.

Sds.




To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Wed, 13 Feb 2008 09:27:16 -0300
Subject: Re: [delphi-br] Ajuda com TRecord - POREM







Obrigado pela ajudas, porem o que preciso é que me retorne o tamanho da 
variavel declarada e NAO do tamanho do seu conteudo.
No caso de Pessoa.Nome o resultado deve ser 60.

Mias ainda, tem como fazer um loop para percorrer todos os campos da variaver 
Pessoa, para fins de zerar seu conteudo.
tipo
for i := 0 to pessoa.recordcount do
pessoa.field[i].value := ''

obrigado

Celio.

Ricardo César Cardoso [EMAIL PROTECTED] escreveu:
Vamos ver se a minha memória anda boa:

Declare uma variável do tipo Integer e atribua o seguinte:

Tamanho_Campo := Length(Pessoa.Nome);

Se bem que eu acho que vai retornar o tamanho do conteúdo de uma instância de 
Pessoa...

Atte,
Ricardo.

Celio Bernardo [EMAIL PROTECTED] escreveu: Amigos tenho uma estrutura como

Type TPessoas = record

Nome : String[60];
cpf : String[11];

end.
...

var
Pessoa : TPessoas;

Como é a sintaxe pra pegar o tamanho do campo:
Exemplo: Pessoa.Nome o tamamho é 60.

Obrigado

Celio.

-
Célio Bernardo de Lima
Diretor de Projetos e Novas Tecnologias
siatech.com.br
-

-
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]

-
Célio Bernardo de Lima
Diretor de Projetos e Novas Tecnologias
siatech.com.br
-

-
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]









_
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

[delphi-br] Caindo a Conexão...

2008-02-13 Por tôpico Doretto
Bom dia !!!

Estou com o seguinte problema..

Trabalho com Delphi5 e Mssql2000 e estou com problema de queda de conexão 
quando o cliente esta usando um terminal remoto em outra cidade.

Ex:

Computador1: Servidor de dados (Bauru)
Computador2: Terminal remoto (Jau)
Computador3: Terminal remoto (Ribeirão Preto)

Se o cliente usa o sistema em bauru (Computador1) conectado direto no banco o 
sistema funciona redondo, sem quedas de conexão.
Mas se usa remotamente (Computador2 ou Computador3) o sistema gera erro de 
falha de conexão em certos momentos, as vezes fica duas ou três horas sem cair 
a conexão depois começa a cair e assim por diante, isto gera erro de dados e 
problemas sérios para a integridade dos mesmos.

O clientes esta está desanimado e eu também.. não sei mais o que fazer para 
resolver este problema..

Tentei sem muito sucesso fazer um sistema em delphi7 c/ dbExpress, também cai a 
conexão c/ menos freqüência.


Ps: Para a conexão no terminal eu uso o BDE do Delphi5. 

O clientes não quer saber se a internet oscila, pois a mesma segundo ele não 
cai, ele quer que eu resolva a situação


Os amigos tem alguma idéia do que fazer ?

Doretto.



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com TRecord - POREM

2008-02-13 Por tôpico Marlon David de Souza
Tente algo parecido com isso:

var
  var1: string[50];
  var2: String;
begin
  var1 := 'teste';
  var2 := var1;
  var1 := DupeString('.',255);
  showmessage(inttostr(Length(var1))); // irá mostrar 50.
  var1 := var2;
  showmessage(inttostr(Length(var1))); // irá mostrar 5.
end;

Em Qua 13 Fev 2008 09:27, Celio Bernardo escreveu:
 Obrigado pela ajudas, porem o que preciso é que me retorne o tamanho da 
 variavel declarada e NAO do tamanho do seu conteudo.
 No caso de Pessoa.Nome o resultado deve ser 60.


RES: [delphi-br] Ajuda com TRecord - POREM

2008-02-13 Por tôpico Davi Eduardo Borges Wall
Te pergunto, pra que vc quer saber o tamanho da variável declarada?

 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Celio 
Bernardo
Enviada em: quarta-feira, 13 de fevereiro de 2008 10:27
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Ajuda com TRecord - POREM

 

Obrigado pela ajudas, porem o que preciso é que me retorne o tamanho da 
variavel declarada e NAO do tamanho do seu conteudo.
No caso de Pessoa.Nome o resultado deve ser 60.

Mias ainda, tem como fazer um loop para percorrer todos os campos da variaver 
Pessoa, para fins de zerar seu conteudo.
tipo
for i := 0 to pessoa.recordcount do
pessoa.field[i].value := ''

obrigado

Celio.

Ricardo César Cardoso [EMAIL PROTECTED] 
mailto:ricardo_engsoft%40yahoo.com.br  escreveu:
Vamos ver se a minha memória anda boa:

Declare uma variável do tipo Integer e atribua o seguinte:

Tamanho_Campo := Length(Pessoa.Nome);

Se bem que eu acho que vai retornar o tamanho do conteúdo de uma instância de 
Pessoa... 

Atte,
Ricardo.

Celio Bernardo [EMAIL PROTECTED] mailto:celioblima%40yahoo.com.br  
escreveu: Amigos tenho uma estrutura como

Type TPessoas = record

Nome : String[60];
cpf : String[11];

end.
...

var
Pessoa : TPessoas;

Como é a sintaxe pra pegar o tamanho do campo:
Exemplo: Pessoa.Nome o tamamho é 60.

Obrigado

Celio.

-
Célio Bernardo de Lima
Diretor de Projetos e Novas Tecnologias
siatech.com.br 
-

-
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]

-
Célio Bernardo de Lima
Diretor de Projetos e Novas Tecnologias
siatech.com.br 
-

-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

 



[As partes desta mensagem que não continham texto foram removidas]



RE: Res: [delphi-br] Ajuda com TRecord

2008-02-13 Por tôpico Rubem Nascimento da Rocha

Mas, voltando ao contexto de um record, se for apenas pra acessar um 
determinado campo do registro, faça simplesmente assim:

type
  TPessoa = record
Nome: String[60];
cpf: String[11];
  end;
...

var
  Pessoa: TPessoa;
  Pessoas: array of TPessoa;

begin
  { Ajusta tamanho inicial de um vetor dinâmico de pessoas }
  SetLength(Pessoas, 100);

  { Define os dados da primeira pessoa }
  Pessoas[0].Nome := 'Wally West';
  Pessoas[0].Cpf := '111';

  { ... e por aí, vai! }
end.


Sds.




To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Wed, 13 Feb 2008 04:22:33 -0800
Subject: Res: [delphi-br] Ajuda com TRecord







Length(Pessoa.Nome)

Ou você pode fazer assim:

unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type TPessoa = Class(TObject)
private
FNome : String;
FTamanho: Integer;
FCPF: String;
function SetFNome: String;
public
property Nome : String read SetFNome write FNome;
property CPF : String read FCPF write FCPF;
property Tamanho : Integer read FTamanho;
end;
type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
{ TPessoa }
function TPessoa.SetFNome: String;
begin
Result := FNome;
FTamanho := Length(FNome);
end;
end.

Sempre que você passar um nome o tamanho é preenchido !!!

Eduardo

- Mensagem original 
De: Celio Bernardo [EMAIL PROTECTED]
Para: delphi-br delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 13 de Fevereiro de 2008 9:14:42
Assunto: [delphi-br] Ajuda com TRecord

Amigos tenho uma estrutura como

Type TPessoas = record

Nome : String[60];
cpf : String[11];

end.
...

var
Pessoa : TPessoas;


Como é a sintaxe pra pegar o tamanho do campo:
Exemplo: Pessoa.Nome o tamamho é 60.

Obrigado

Celio.


 - - ---
Célio Bernardo de Lima
Diretor de Projetos e Novas Tecnologias
siatech.com. br
 - - ---

 - - ---
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!
http://br.mail.yahoo.com/

[As partes desta mensagem que não continham texto foram removidas]









_
Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger!
http://www.amigosdomessenger.com.br/

Re: [delphi-br] Caindo a Conexão...

2008-02-13 Por tôpico Eduardo Silva dos Santos
Doretto, a solução do seu problema chama-se SDAC, é um pacote de componentes
de acesso a dados para o MSSQL.
veja em www.crlab.com/sdac

recentemente a coreLab criou a tecnologia DisconnectedModel e LocalFailOver,
ideal para conexões remotas, com ela vc consegue trabalhar de forma muita
rápida em conexões remotas, caso ocorra a perda de conexão do componente
reconecta de forma transparente.

caso queira baixar o trial e fazer uns testes conte comigo para coisa.

Em 13/02/08, Doretto [EMAIL PROTECTED] escreveu:

   Bom dia !!!

 Estou com o seguinte problema..

 Trabalho com Delphi5 e Mssql2000 e estou com problema de queda de conexão
 quando o cliente esta usando um terminal remoto em outra cidade.

 Ex:

 Computador1: Servidor de dados (Bauru)
 Computador2: Terminal remoto (Jau)
 Computador3: Terminal remoto (Ribeirão Preto)

 Se o cliente usa o sistema em bauru (Computador1) conectado direto no
 banco o sistema funciona redondo, sem quedas de conexão.
 Mas se usa remotamente (Computador2 ou Computador3) o sistema gera erro de
 falha de conexão em certos momentos, as vezes fica duas ou três horas sem
 cair a conexão depois começa a cair e assim por diante, isto gera erro de
 dados e problemas sérios para a integridade dos mesmos.

 O clientes esta está desanimado e eu também.. não sei mais o que fazer
 para resolver este problema..

 Tentei sem muito sucesso fazer um sistema em delphi7 c/ dbExpress, também
 cai a conexão c/ menos freqüência.

 Ps: Para a conexão no terminal eu uso o BDE do Delphi5.

 O clientes não quer saber se a internet oscila, pois a mesma segundo ele
 não cai, ele quer que eu resolva a situação

 Os amigos tem alguma idéia do que fazer ?

 Doretto.

 [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] Caindo a Conexão...

2008-02-13 Por tôpico Ricardo César Cardoso
Puxa... sem querer ser chato, mas se eu não quiser ou não puder usar o SDAC, 
como resolver a situação?

Atte,
Ricardo.

Eduardo Silva dos Santos [EMAIL PROTECTED] escreveu:  
 Doretto, a solução do seu problema chama-se SDAC, é um pacote de 
componentes
 de acesso a dados para o MSSQL.
 veja em www.crlab.com/sdac
 
 recentemente a coreLab criou a tecnologia DisconnectedModel e LocalFailOver,
 ideal para conexões remotas, com ela vc consegue trabalhar de forma muita
 rápida em conexões remotas, caso ocorra a perda de conexão do componente
 reconecta de forma transparente.
 
 caso queira baixar o trial e fazer uns testes conte comigo para coisa.
 
 Em 13/02/08, Doretto [EMAIL PROTECTED] escreveu:
 
Bom dia !!!
 
  Estou com o seguinte problema..
 
  Trabalho com Delphi5 e Mssql2000 e estou com problema de queda de conexão
  quando o cliente esta usando um terminal remoto em outra cidade.
 
  Ex:
 
  Computador1: Servidor de dados (Bauru)
  Computador2: Terminal remoto (Jau)
  Computador3: Terminal remoto (Ribeirão Preto)
 
  Se o cliente usa o sistema em bauru (Computador1) conectado direto no
  banco o sistema funciona redondo, sem quedas de conexão.
  Mas se usa remotamente (Computador2 ou Computador3) o sistema gera erro de
  falha de conexão em certos momentos, as vezes fica duas ou três horas sem
  cair a conexão depois começa a cair e assim por diante, isto gera erro de
  dados e problemas sérios para a integridade dos mesmos.
 
  O clientes esta está desanimado e eu também.. não sei mais o que fazer
  para resolver este problema..
 
  Tentei sem muito sucesso fazer um sistema em delphi7 c/ dbExpress, também
  cai a conexão c/ menos freqüência.
 
  Ps: Para a conexão no terminal eu uso o BDE do Delphi5.
 
  O clientes não quer saber se a internet oscila, pois a mesma segundo ele
  não cai, ele quer que eu resolva a situação
 
  Os amigos tem alguma idéia do que fazer ?
 
  Doretto.
 
  [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]
 
 
 
 _



   
-
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: RES: [delphi-br] Ajuda com TRecord - POREM

2008-02-13 Por tôpico Celio Bernardo
É que vou copiar de um arquivo .txt conteudo do tamanho exato do tamanho da 
variável, independente se o conteudo tenha caracter ou espacos em branco. Assim 
tava pensando em otimizar o procedimento que busca conteudo no arquivo e copia 
para o bd.
   
  Obrigado
   
  Celio.

Davi Eduardo Borges Wall [EMAIL PROTECTED] escreveu:
  Te pergunto, pra que vc quer saber o tamanho da variável declarada?

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Celio 
Bernardo
Enviada em: quarta-feira, 13 de fevereiro de 2008 10:27
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Ajuda com TRecord - POREM

Obrigado pela ajudas, porem o que preciso é que me retorne o tamanho da 
variavel declarada e NAO do tamanho do seu conteudo.
No caso de Pessoa.Nome o resultado deve ser 60.

Mias ainda, tem como fazer um loop para percorrer todos os campos da variaver 
Pessoa, para fins de zerar seu conteudo.
tipo
for i := 0 to pessoa.recordcount do
pessoa.field[i].value := ''

obrigado

Celio.

Ricardo César Cardoso [EMAIL PROTECTED] 
mailto:ricardo_engsoft%40yahoo.com.br  escreveu:
Vamos ver se a minha memória anda boa:

Declare uma variável do tipo Integer e atribua o seguinte:

Tamanho_Campo := Length(Pessoa.Nome);

Se bem que eu acho que vai retornar o tamanho do conteúdo de uma instância de 
Pessoa... 

Atte,
Ricardo.

Celio Bernardo [EMAIL PROTECTED] mailto:celioblima%40yahoo.com.br  
escreveu: Amigos tenho uma estrutura como

Type TPessoas = record

Nome : String[60];
cpf : String[11];

end.
...

var
Pessoa : TPessoas;

Como é a sintaxe pra pegar o tamanho do campo:
Exemplo: Pessoa.Nome o tamamho é 60.

Obrigado

Celio.

-
Célio Bernardo de Lima
Diretor de Projetos e Novas Tecnologias
siatech.com.br 
-

-
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]

-
Célio Bernardo de Lima
Diretor de Projetos e Novas Tecnologias
siatech.com.br 
-

-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

[As partes desta mensagem que não continham texto foram removidas]



 



-
 Célio Bernardo de Lima
Diretor de Projetos e Novas Tecnologias
siatech.com.br 
-

   
-
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] ComboBox com Item Invisivel

2008-02-13 Por tôpico Sergio Eurico
Ola,
Com a linha de comando abaixo, o texto do combobox fica invisivel ( nao é
apagado, o index continua existindo )

Combobox1.Items.Strings[2] := '';

Boa sorte.






Em 12/02/08, Nayara [EMAIL PROTECTED] escreveu:

   Nilson, eu estava pensando em algo mais ou menos assim, depois vou
 tentar,
 isso vai ser trabalhoso!

 Mais se alguem tiver mais algum sugestão! =)

 Vou fazer entre hoje e amanhã, depois eu falo se deu certo ou não!

 [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] Criptografar dados no .exe

2008-02-13 Por tôpico Vitor Redes
Curiosidade, que programa é esse que você usou?

Outra coisa, não armazene esse tipo de informação no seu
executável, por exemplo, em variáveis públicas, etc...Criptografe o conteúdo
no momento do cadastramento (você pode utilizar os componentes da
TurboPower, LockBox), quando o usuário digitar a senha, recupere a senha
criptografada, descriptografe e compare com a senha digitada, fechando o
dataset novamente.

 

 

--

Vitor Luiz Redes

--

Bureau  Redsystem Software

[EMAIL PROTECTED]

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Tiago
Enviada em: quarta-feira, 13 de fevereiro de 2008 10:11
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Criptografar dados no .exe

 

Olá,

Essa semana me despertou a curiosidade de saber o que meu
.exe tinha de informações. Utilizando uma ferramenta que possibilita
analisar arquivos .exe, tive um grande susto ao ver que informações como
usuários e senhas de acesso ao banco de dados estavam totalmente acessíveis,
e muitas outras informações que possibilitariam que um “hacker” possa se
“divertir” com meus sistema.

Bom a duvida é a seguinte, existe uma forma de quando eu for
informar a senha de meu banco de dados no componente TDatabase essa senha
fique criptografada, e ainda que eu possa deixar o meu exe com o mino de
informaçãon disponível a quem tentar fazer este tipo de análise ao exe?

Obrigado!

[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] Caindo a Conexão...

2008-02-13 Por tôpico Vitor Redes
O SQLConnection (DBExpress) tem uma propriedade chamada
KeepConnection para esse tipo de situação.

Você já testou com essa propriedade setada como TRUE?



Faça um programinha que rode com DBExpress, e no evento
AfterDisconnect alimente um arquivo texto mais ou menos assim:

 

Var

VStr : TStrings;

Begin

VStr.LoadFromFile( ‘c:\conexao.txt’ );

VStr.Add( ‘Desconectado do Banco de Dados: ’ +
SQLConnection1.Params.Values[ ‘databasename’ ] + ‘ às ‘ + FormatDateTime(
‘dd/mm/ hh:nn:sss’, NOW ) );

VStr.SaveToFile( ‘c:\conexao.txt’ );

End;

 

No Evento AfterConnect:

 

Var

VStr : TStrings;

Begin

VStr.LoadFromFile( ‘c:\conexao.txt’ );

VStr.Add( ‘Conectado ao Banco de Dados: ’ +
SQLConnection1.Params.Values[ ‘databasename’ ] + ‘ às ‘ + FormatDateTime(
‘dd/mm/ hh:nn:sss’, NOW ) );

VStr.SaveToFile( ‘c:\conexao.txt’ );

End;

 

Deixe o programa rodando o dia todo nas filiais que reportam
queda de conexão, e veja o que realmente está acontecendo. Caso a conexão
caia muito, é aconselhável que você chame o técnico responsável pela adsl
para uma conversa mais séria, ou para que ele possa estabelecer um problema
real da coisa, medindo a conexão e verificando se ela está ou não estável.
Se o dono da empresa quer que o problema seja resolvido ele precisa antes
saber onde está o problema, cobrar tudo do programador é fácil né...

 

 

--

Vitor Luiz Redes

--

Bureau  Redsystem Software

 mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Doretto
Enviada em: quarta-feira, 13 de fevereiro de 2008 10:34
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Caindo a Conexão...

 

Bom dia !!!

Estou com o seguinte problema..

Trabalho com Delphi5 e Mssql2000 e estou com problema de queda de conexão
quando o cliente esta usando um terminal remoto em outra cidade.

Ex:

Computador1: Servidor de dados (Bauru)
Computador2: Terminal remoto (Jau)
Computador3: Terminal remoto (Ribeirão Preto)

Se o cliente usa o sistema em bauru (Computador1) conectado direto no banco
o sistema funciona redondo, sem quedas de conexão.
Mas se usa remotamente (Computador2 ou Computador3) o sistema gera erro de
falha de conexão em certos momentos, as vezes fica duas ou três horas sem
cair a conexão depois começa a cair e assim por diante, isto gera erro de
dados e problemas sérios para a integridade dos mesmos.

O clientes esta está desanimado e eu também.. não sei mais o que fazer para
resolver este problema..

Tentei sem muito sucesso fazer um sistema em delphi7 c/ dbExpress, também
cai a conexão c/ menos freqüência.

Ps: Para a conexão no terminal eu uso o BDE do Delphi5. 

O clientes não quer saber se a internet oscila, pois a mesma segundo ele não
cai, ele quer que eu resolva a situação

Os amigos tem alguma idéia do que fazer ?

Doretto.

[As partes desta mensagem que não continham texto foram removidas]

 



[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] OFF-TOPPIC - Vaga Delphi

2008-02-13 Por tôpico Camoloze
Bom dia ,

 

Tenho uma vaga para desenvolvedor Delphi para Itapecerica da Serra – SP

 

Mínimo de 2 anos de experiência em programação Delphi / Firebird (
conhecimentos de  MySQL, SQL Server ).

Desenvolvimento de novas aplicações e manutenção em aplicações existentes. (
Financeiro, Logística, Guarda de Documentos  ).

 

Desejável conhecimentos de PHP.

 

Para os interessados, favor enviar currículo em PVT para HYPERLINK
mailto:[EMAIL PROTECTED][EMAIL PROTECTED]

 

[]´s camoloze

 


No virus found in this outgoing message.
Checked by AVG Free Edition. 
Version: 7.5.516 / Virus Database: 269.19.21/1265 - Release Date: 07/02/2008
11:17
 


[As partes desta mensagem que não continham texto foram removidas]



RES: [delphi-br] Criptografar dados no .exe

2008-02-13 Por tôpico Davi Eduardo Borges Wall
Você consegue ver o esse tipo de conteúdo usando qualquer editor de hexadecimal 
decente.

 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Tiago
Enviada em: quarta-feira, 13 de fevereiro de 2008 14:13
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Criptografar dados no .exe

 

Curiosidade, que programa é esse que você usou?

Bom, não sei se seria permitido tratar destes assuntos aqui no fórum, mas o
programa é o ResourceHacker. Espero não estar infringindo nenhuma regra
aqui do fórum, até por que programas assim podem ser facilmente encontrados
na internet com uma simples pesquisa em qualquer site de busca.

Agora, agradeço a todos pela atenção

Att,

Tiago

[As partes desta mensagem que não continham texto foram removidas]

 



[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Thread para frames

2008-02-13 Por tôpico Leslyn Fernandes
Olá a todos,

Eu tenho uma tela que possui quatro frames herdados de um frame genérico. Eu
gostaria de fazer uma forma de faze-los serem carregados paralelamente... Aí
eu pensei em threads... mas não possuo muita experiência com threads e acho
que me confundi... Alguém pode me dar alguma dica de como fazer?


-- 
TFA,
Leslyn Fernandes
55-11-9159-3837
Computer Engineer
Integra Solutions

Imagination is more important than knowledge.
 - Albert Einstein


[As partes desta mensagem que não continham texto foram removidas]



RES: [delphi-br] Criptografar dados no .exe

2008-02-13 Por tôpico Tiago
Curiosidade, que programa é esse que você usou?

 

Bom, não sei se seria permitido tratar destes assuntos aqui no fórum, mas o
programa é o ResourceHacker. Espero não estar infringindo  nenhuma regra
aqui do fórum, até por que programas assim podem ser facilmente encontrados
na internet com uma simples pesquisa em qualquer site de busca.

 

Agora, agradeço a todos pela atenção

 

Att,

Tiago



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Caindo a Conexão...

2008-02-13 Por tôpico Eduardo Silva dos Santos
Se o o componente de conexão ao banco do BDE e do DBexpress tivesse o método
ping para o banco seria so colocar em um time
para de tempos em tempos reativar o conexão.

quando eu usava zeos eu modifiquei os fontes e coloquei uma rotina que
reconectava caso ocorrece desconexão.

usando esses componentes vc pode contornar isso, mais vai te dar mais
trabalho.

exemplo.. nas rotinas que vc acessa o banco vc pode colocar um try except
para detectar se houve perda de conexão e reativa-la.

boa sorte.

Em 13/02/08, Ricardo César Cardoso [EMAIL PROTECTED] escreveu:

   Puxa... sem querer ser chato, mas se eu não quiser ou não puder usar o
 SDAC, como resolver a situação?

 Atte,
 Ricardo.

 Eduardo Silva dos Santos [EMAIL PROTECTED] eduardo.drd%40gmail.com
 escreveu: Doretto, a solução do seu problema chama-se SDAC, é um pacote de
 componentes

 de acesso a dados para o MSSQL.
 veja em www.crlab.com/sdac

 recentemente a coreLab criou a tecnologia DisconnectedModel e
 LocalFailOver,
 ideal para conexões remotas, com ela vc consegue trabalhar de forma muita
 rápida em conexões remotas, caso ocorra a perda de conexão do componente
 reconecta de forma transparente.

 caso queira baixar o trial e fazer uns testes conte comigo para coisa.

 Em 13/02/08, Doretto [EMAIL PROTECTED]doretto%40qualitysystem.com.br
 escreveu:
 
  Bom dia !!!
 
  Estou com o seguinte problema..
 
  Trabalho com Delphi5 e Mssql2000 e estou com problema de queda de
 conexão
  quando o cliente esta usando um terminal remoto em outra cidade.
 
  Ex:
 
  Computador1: Servidor de dados (Bauru)
  Computador2: Terminal remoto (Jau)
  Computador3: Terminal remoto (Ribeirão Preto)
 
  Se o cliente usa o sistema em bauru (Computador1) conectado direto no
  banco o sistema funciona redondo, sem quedas de conexão.
  Mas se usa remotamente (Computador2 ou Computador3) o sistema gera erro
 de
  falha de conexão em certos momentos, as vezes fica duas ou três horas
 sem
  cair a conexão depois começa a cair e assim por diante, isto gera erro
 de
  dados e problemas sérios para a integridade dos mesmos.
 
  O clientes esta está desanimado e eu também.. não sei mais o que fazer
  para resolver este problema..
 
  Tentei sem muito sucesso fazer um sistema em delphi7 c/ dbExpress,
 também
  cai a conexão c/ menos freqüência.
 
  Ps: Para a conexão no terminal eu uso o BDE do Delphi5.
 
  O clientes não quer saber se a internet oscila, pois a mesma segundo ele
  não cai, ele quer que eu resolva a situação
 
  Os amigos tem alguma idéia do que fazer ?
 
  Doretto.
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 

 --
 ...
 Eduardo Silva dos Santos
 DRD Sistemas.
 (27) 3218-4201
 MSN: [EMAIL PROTECTED] eduardo.drd%40gmail.com
 Site: http://www.drdsistemas.com/
 ...

 [As partes desta mensagem que não continham texto foram removidas]



 _

 -
 Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
 armazenamento!

 [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] Caindo a Conexão...

2008-02-13 Por tôpico Vitor Redes
Esqueci de criar o TStrings antes.

 

VStr := TStringList.Create( );

 

Ah, eu não testei o código.

 

 

--

Vitor Luiz Redes

--

Bureau  Redsystem Software

[EMAIL PROTECTED]

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Vitor Redes
Enviada em: quarta-feira, 13 de fevereiro de 2008 12:31
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Caindo a Conexão...

 

O SQLConnection (DBExpress) tem uma propriedade chamada
KeepConnection para esse tipo de situação.

Você já testou com essa propriedade setada como TRUE?

Faça um programinha que rode com DBExpress, e no evento
AfterDisconnect alimente um arquivo texto mais ou menos assim:

Var

VStr : TStrings;

Begin

VStr.LoadFromFile( ‘c:\conexao.txt’ );

VStr.Add( ‘Desconectado do Banco de Dados: ’ +
SQLConnection1.Params.Values[ ‘databasename’ ] + ‘ às ‘ + FormatDateTime(
‘dd/mm/ hh:nn:sss’, NOW ) );

VStr.SaveToFile( ‘c:\conexao.txt’ );

End;

No Evento AfterConnect:

Var

VStr : TStrings;

Begin

VStr.LoadFromFile( ‘c:\conexao.txt’ );

VStr.Add( ‘Conectado ao Banco de Dados: ’ +
SQLConnection1.Params.Values[ ‘databasename’ ] + ‘ às ‘ + FormatDateTime(
‘dd/mm/ hh:nn:sss’, NOW ) );

VStr.SaveToFile( ‘c:\conexao.txt’ );

End;

Deixe o programa rodando o dia todo nas filiais que reportam
queda de conexão, e veja o que realmente está acontecendo. Caso a conexão
caia muito, é aconselhável que você chame o técnico responsável pela adsl
para uma conversa mais séria, ou para que ele possa estabelecer um problema
real da coisa, medindo a conexão e verificando se ela está ou não estável.
Se o dono da empresa quer que o problema seja resolvido ele precisa antes
saber onde está o problema, cobrar tudo do programador é fácil né...

--

Vitor Luiz Redes

--

Bureau  Redsystem Software

mailto:vitor.redes@ mailto:vitor.redes%40redsystem.com.br
redsystem.com.br vitor.redes@ mailto:vitor.redes%40redsystem.com.br
redsystem.com.br

_ 

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 Doretto
Enviada em: quarta-feira, 13 de fevereiro de 2008 10:34
Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br
Assunto: [delphi-br] Caindo a Conexão...

Bom dia !!!

Estou com o seguinte problema..

Trabalho com Delphi5 e Mssql2000 e estou com problema de queda de conexão
quando o cliente esta usando um terminal remoto em outra cidade.

Ex:

Computador1: Servidor de dados (Bauru)
Computador2: Terminal remoto (Jau)
Computador3: Terminal remoto (Ribeirão Preto)

Se o cliente usa o sistema em bauru (Computador1) conectado direto no banco
o sistema funciona redondo, sem quedas de conexão.
Mas se usa remotamente (Computador2 ou Computador3) o sistema gera erro de
falha de conexão em certos momentos, as vezes fica duas ou três horas sem
cair a conexão depois começa a cair e assim por diante, isto gera erro de
dados e problemas sérios para a integridade dos mesmos.

O clientes esta está desanimado e eu também.. não sei mais o que fazer para
resolver este problema..

Tentei sem muito sucesso fazer um sistema em delphi7 c/ dbExpress, também
cai a conexão c/ menos freqüência.

Ps: Para a conexão no terminal eu uso o BDE do Delphi5. 

O clientes não quer saber se a internet oscila, pois a mesma segundo ele não
cai, ele quer que eu resolva a situação

Os amigos tem alguma idéia do que fazer ?

Doretto.

[As partes desta mensagem que não continham texto foram removidas]

[As partes desta mensagem que não continham texto foram removidas]

 



[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Versão do executavel via FTP

2008-02-13 Por tôpico José Ricardo Aviles
Boa tarde pessoal, existe a possibilidade de se extrair a versão de um
arquivo executável direto de um servidor remoto via FTP?

Obrigado pela ajuda.

José Ricardo Avilés.



Re: RES: [delphi-br] Ajuda com TRecord - POREM

2008-02-13 Por tôpico Joao Morais
Celio Bernardo wrote:
 É que vou copiar de um arquivo .txt conteudo do tamanho exato do tamanho da 
 variável, independente se o conteudo tenha caracter ou espacos em branco. 
 Assim tava pensando em otimizar o procedimento que busca conteudo no arquivo 
 e copia para o bd.

SizeOf(VarRec);

--
Joao Morais


   Obrigado

   Celio.
 
 Davi Eduardo Borges Wall [EMAIL PROTECTED] escreveu:
   Te pergunto, pra que vc quer saber o tamanho da variável declarada?
 
 De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Celio 
 Bernardo
 Enviada em: quarta-feira, 13 de fevereiro de 2008 10:27
 Para: delphi-br@yahoogrupos.com.br
 Assunto: Re: [delphi-br] Ajuda com TRecord - POREM
 
 Obrigado pela ajudas, porem o que preciso é que me retorne o tamanho da 
 variavel declarada e NAO do tamanho do seu conteudo.
 No caso de Pessoa.Nome o resultado deve ser 60.
 
 Mias ainda, tem como fazer um loop para percorrer todos os campos da variaver 
 Pessoa, para fins de zerar seu conteudo.
 tipo
 for i := 0 to pessoa.recordcount do
 pessoa.field[i].value := ''
 
 obrigado
 
 Celio.
 
 Ricardo César Cardoso [EMAIL PROTECTED] 
 mailto:ricardo_engsoft%40yahoo.com.br  escreveu:
 Vamos ver se a minha memória anda boa:
 
 Declare uma variável do tipo Integer e atribua o seguinte:
 
 Tamanho_Campo := Length(Pessoa.Nome);
 
 Se bem que eu acho que vai retornar o tamanho do conteúdo de uma instância de 
 Pessoa... 
 
 Atte,
 Ricardo.
 
 Celio Bernardo [EMAIL PROTECTED] mailto:celioblima%40yahoo.com.br  
 escreveu: Amigos tenho uma estrutura como
 
 Type TPessoas = record
 
 Nome : String[60];
 cpf : String[11];
 
 end.
 ...
 
 var
 Pessoa : TPessoas;
 
 Como é a sintaxe pra pegar o tamanho do campo:
 Exemplo: Pessoa.Nome o tamamho é 60.
 
 Obrigado
 
 Celio.
 
 -
 Célio Bernardo de Lima
 Diretor de Projetos e Novas Tecnologias
 siatech.com.br 
 -



Re: [delphi-br] Versão do executavel via FTP

2008-02-13 Por tôpico Marcos Bernardo
Salve José Ricardo

Extrair a versão do EXE via FTP eu num sei...
mas vou explicar o que faço:

Crio um Zip com o novo EXE e um TXT com a versão
que no nosso caso é composto por .MM.DD.HH.MM
E comparo com a versão do EXE local
Caso seja maior... baixo o ZIP.

eu sei que não foi isso que vc pediu... mas espero ter ajudado... hehheeh

Marcos Bernardo


Em 13/02/08, José Ricardo Aviles [EMAIL PROTECTED] escreveu:

   Boa tarde pessoal, existe a possibilidade de se extrair a versão de um
 arquivo executável direto de um servidor remoto via FTP?

 Obrigado pela ajuda.

 José Ricardo Avilés.

 



[As partes desta mensagem que não continham texto foram removidas]



Re: RES: [delphi-br] Criptografar dados no .exe

2008-02-13 Por tôpico Vinicius Santos - MSI
Cara, armazene este tipo de informação no banco de dados !
Colocar no projeto não é eficiente.

Olá,


 Essa semana me despertou a curiosidade de saber o que meu
 .exe tinha de informações. Utilizando uma ferramenta que possibilita
 analisar arquivos .exe, tive um grande susto ao ver que informações como
 usuários e senhas de acesso ao banco de dados estavam totalmente 
 acessíveis,
 e muitas outras informações que possibilitariam que um “hacker” possa se
 “divertir” com meus sistema.

 Bom a duvida é a seguinte, existe uma forma de quando eu for
 informar a senha de meu banco de dados no componente TDatabase essa senha
 fique criptografada, e ainda que eu possa deixar o meu exe com o mino de
 informaçãon disponível a quem tentar fazer este tipo de análise ao exe?

 Obrigado!














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




-- 
 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: RES: [delphi-br] Contrato

2008-02-13 Por tôpico ADEMIR FERRAZ
Necessito de um pequeno aplicativo em Delphi. Isso é urgente pois se refere a 
concurso. Os interessados entrar em contato pelo [EMAIL PROTECTED]


ademir

  - Original Message - 
  From: Celio Bernardo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 13, 2008 11:18 AM
  Subject: Re: RES: [delphi-br] Ajuda com TRecord - POREM


  É que vou copiar de um arquivo .txt conteudo do tamanho exato do tamanho da 
variável, independente se o conteudo tenha caracter ou espacos em branco. Assim 
tava pensando em otimizar o procedimento que busca conteudo no arquivo e copia 
para o bd.

  Obrigado

  Celio.

  Davi Eduardo Borges Wall [EMAIL PROTECTED] escreveu:
  Te pergunto, pra que vc quer saber o tamanho da variável declarada?

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Celio 
Bernardo
  Enviada em: quarta-feira, 13 de fevereiro de 2008 10:27
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Ajuda com TRecord - POREM

  Obrigado pela ajudas, porem o que preciso é que me retorne o tamanho da 
variavel declarada e NAO do tamanho do seu conteudo.
  No caso de Pessoa.Nome o resultado deve ser 60.

  Mias ainda, tem como fazer um loop para percorrer todos os campos da variaver 
Pessoa, para fins de zerar seu conteudo.
  tipo
  for i := 0 to pessoa.recordcount do
  pessoa.field[i].value := ''

  obrigado

  Celio.

  Ricardo César Cardoso [EMAIL PROTECTED] 
mailto:ricardo_engsoft%40yahoo.com.br  escreveu:
  Vamos ver se a minha memória anda boa:

  Declare uma variável do tipo Integer e atribua o seguinte:

  Tamanho_Campo := Length(Pessoa.Nome);

  Se bem que eu acho que vai retornar o tamanho do conteúdo de uma instância de 
Pessoa... 

  Atte,
  Ricardo.

  Celio Bernardo [EMAIL PROTECTED] mailto:celioblima%40yahoo.com.br  
escreveu: Amigos tenho uma estrutura como

  Type TPessoas = record

  Nome : String[60];
  cpf : String[11];

  end.
  ...

  var
  Pessoa : TPessoas;

  Como é a sintaxe pra pegar o tamanho do campo:
  Exemplo: Pessoa.Nome o tamamho é 60.

  Obrigado

  Celio.

  -
  Célio Bernardo de Lima
  Diretor de Projetos e Novas Tecnologias
  siatech.com.br 
  -

  -
  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]

  -
  Célio Bernardo de Lima
  Diretor de Projetos e Novas Tecnologias
  siatech.com.br 
  -

  -
  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento! 

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]

  -
  Célio Bernardo de Lima
  Diretor de Projetos e Novas Tecnologias
  siatech.com.br 
  -

  -
  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento! 

  [As partes desta mensagem que não continham texto foram removidas]



   

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Ajuda com TRecord - POREM

2008-02-13 Por tôpico Joao Morais
Rubem Nascimento da Rocha wrote:
 Apenas para constar. Estamos falando aqui em estruturas de dados heterogêneas
 e estáticas(registros, a.k.a. records) e não em tipos de dados abstratos,
 como classes. Portanto, é errado falar em instância de um record. Mais uma
 coisa, não existe uma classe ou tipo registro do tipo TRecord em Object 
 Pascal.
 O que existe é a palavra reservada record para definir uma estrutura de
 registro, de forma semelhante à declaração struct em linguagem C.

O que é, digamos, equivocado (e não exatamente errado), é falar em 
instância sem falar em ponteiro. Se eu tenho:

type
   TRec = record
 Name: shortstring[20];
   end;
   PRec = ^TRec;
var
   VRec: PRec;
begin
   new(VRec);

então VRec aponta para uma instância de TRec.

--
Joao Morais



 
 
 To: delphi-br@yahoogrupos.com.br
 From: [EMAIL PROTECTED]
 Date: Wed, 13 Feb 2008 09:27:16 -0300
 Subject: Re: [delphi-br] Ajuda com TRecord - POREM
 
 
 
 
 
 
 
 Obrigado pela ajudas, porem o que preciso é que me retorne o tamanho da 
 variavel declarada e NAO do tamanho do seu conteudo.
 No caso de Pessoa.Nome o resultado deve ser 60.
 
 Mias ainda, tem como fazer um loop para percorrer todos os campos da variaver 
 Pessoa, para fins de zerar seu conteudo.
 tipo
 for i := 0 to pessoa.recordcount do
 pessoa.field[i].value := ''
 
 obrigado
 
 Celio.
 
 Ricardo César Cardoso [EMAIL PROTECTED] escreveu:
 Vamos ver se a minha memória anda boa:
 
 Declare uma variável do tipo Integer e atribua o seguinte:
 
 Tamanho_Campo := Length(Pessoa.Nome);
 
 Se bem que eu acho que vai retornar o tamanho do conteúdo de uma instância de 
 Pessoa...
 
 Atte,
 Ricardo.
 
 Celio Bernardo [EMAIL PROTECTED] escreveu: Amigos tenho uma estrutura como
 
 Type TPessoas = record
 
 Nome : String[60];
 cpf : String[11];
 
 end.
 ...
 
 var
 Pessoa : TPessoas;
 
 Como é a sintaxe pra pegar o tamanho do campo:
 Exemplo: Pessoa.Nome o tamamho é 60.
 
 Obrigado
 
 Celio.
 
 -
 Célio Bernardo de Lima
 Diretor de Projetos e Novas Tecnologias
 siatech.com.br
 -
 
 -
 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]
 
 -
 Célio Bernardo de Lima
 Diretor de Projetos e Novas Tecnologias
 siatech.com.br
 -
 
 -
 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]
 
 
 
 
 
 
 
 
 
 _
 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
 



[delphi-br] Erro - Unknown ISC error 0

2008-02-13 Por tôpico Marcelo Moacir Florindo
Senhores,

Estou tentado executar uma stored procedure através do componente
StoredProcedure (DBExpress) porém está dando o erro
unknown ISC error 0

Alguém já passou por isto???

Grato a todos,


-- 
Marcelo Moacir Florindo
Analista/Desenvolvedor
http://www.gestaotec.com.br


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Criptografar dados no .exe

2008-02-13 Por tôpico Josinaldo
kual  esse programaque vc usa pra analizar o .exe?


  - Original Message - 
  From: Tiago 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 13, 2008 10:11 AM
  Subject: [delphi-br] Criptografar dados no .exe


  Olá,

  Essa semana me despertou a curiosidade de saber o que meu
  .exe tinha de informações. Utilizando uma ferramenta que possibilita
  analisar arquivos .exe, tive um grande susto ao ver que informações como
  usuários e senhas de acesso ao banco de dados estavam totalmente acessíveis,
  e muitas outras informações que possibilitariam que um hacker possa se
  divertir com meus sistema.

  Bom a duvida é a seguinte, existe uma forma de quando eu for
  informar a senha de meu banco de dados no componente TDatabase essa senha
  fique criptografada, e ainda que eu possa deixar o meu exe com o mino de
  informaçãon disponível a quem tentar fazer este tipo de análise ao exe?

  Obrigado!

  [As partes desta mensagem que não continham texto foram removidas]



   

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] [OFF] ORACLE

2008-02-13 Por tôpico Rafael Da Silva
Oi alguem poderia indicar, artigos, livros, guides para inciar estudos em 
oracle express (já tenho a documentação oficial) obrigado t+


  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]



Re: [delphi-br] [OFF] ORACLE

2008-02-13 Por tôpico Ricardo César Cardoso
Se vc já tem a documentação oficial, já é mais do que suficiente.

Atte,
Ricardo.

Rafael Da Silva [EMAIL PROTECTED] escreveu:   Oi 
alguem poderia indicar, artigos, livros, guides para inciar estudos em oracle 
express (já tenho a documentação oficial) obrigado t+
 
 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]
 





   
-
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] data module

2008-02-13 Por tôpico felipe govoni
eu sei que parece uma pergunta idota mas

aonde ta o datamodule do delphi 2007???
ja procurei ate no google e nao acho explicação
no delphi 7 era beleza mas agora to migrando um projeto
e nao acho o tal do datamodule.



-- 
Felipe Govoni
-
Programador
Fone 8472-8718


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Máscara de campo hora no d bgrid

2008-02-13 Por tôpico ca_programador007
Olá Ricardo, 
  Eu já tinha tentado dessa forma:
   
   TNumericField(datamodule.sqlx.FieldByName('HORA')).DisplayFormat := 
'99:99;1;_';
   
  Mas no Delphi 2007 o TNumeric não compila e o displayformat também não.
   
  Tem alguma alternativa?
   
  Grato
  

Ricardo César Cardoso [EMAIL PROTECTED] escreveu:
  Vc pode formatar o campo usando a propriedade DisplayFormat na 
coluna que possui a hora ou então usar o evento GetText para o campo que possui 
estes dados.

Dá uma olhada que já me lembro de ter visto exemplos disso na internet.

Atte,
Ricardo.

ca_programador007 [EMAIL PROTECTED] escreveu: Olá amigos,

Tenho uma consulta que trago o valor do campo hora (time no banco), e carrego 
as informações em um dbgrid.
No banco o campo hora está gravado assim: 16:30:00
Preciso que no dbgrid mostre apenas o 16:30, sem os segundos.

Como faço para colocar a máscara dentro do dbgrid?

No aguardo. Valeu pela ajuda.

-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]


-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]



 

   
-
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] Simular clique no formulário

2008-02-13 Por tôpico Fabio Gomes
Caros amigos,
   
  Preciso simular um clique do mouse no formulário de login.
  Como faço isso no Delphi 2007? Alguém tem algo para me passar de exemplo?
   
  Preciso muito. Aguardo uma ajuda
   
  Fábio Gomes.

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] ApplicationEvents no Delphi 2007

2008-02-13 Por tôpico Eduardo Silva dos Santos
Não mudou não, essas linhas estão dentro do evento onException do
ApplicationEvents?

Em 13/02/08, ca_programador007 [EMAIL PROTECTED] escreveu:

   Olá amigos,
 Utilizava o componente ApplicationEvents para tratar os erros no Delphi 7,
 e tentei copiar e colar a mesma procedure no Delphi 2007 e dá erro.. ele não
 reconhece o E.Message e o Pos. Mudou alguma coisa do Delphi 7 para o
 Delphi 2007?

 begin
 if Pos(UpperCase('is not a valid date'), UpperCase('E.Message'))0 then
 begin
 showMessage('A data digitada não é válida. Tente novamente com outra
 data.');
 end;
 if pos(upperCase('violation of primary or unique key constraint'),
 UpperCase(E.Message))  0 then
 begin
 beep;
 showmessage('O valor digitado para o campo já existe no cadastro.');
 Exit;
 end;
 end;

 Obrigado, Carlos

 -
 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]

  




-- 
...
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] ApplicationEvents no Delphi 2007

2008-02-13 Por tôpico ca_programador007
Olá amigos,
  Utilizava o componente ApplicationEvents para tratar os erros no Delphi 7, e 
tentei copiar e colar a mesma procedure no Delphi 2007 e dá erro.. ele não 
reconhece o E.Message e o Pos. Mudou alguma coisa do Delphi 7 para o Delphi 
2007?
  
begin
  if Pos(UpperCase('is not a valid date'), UpperCase('E.Message'))0 then
  begin
showMessage('A data digitada não é válida. Tente novamente com outra 
data.');
  end;
 if pos(upperCase('violation of primary or unique key constraint'), 
UpperCase(E.Message))  0 then
  begin
beep;
showmessage('O valor digitado para o campo já existe no cadastro.');
Exit;
  end;
end;
  
Obrigado, Carlos

   
-
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] Form Diferente

2008-02-13 Por tôpico Guilherme Alves
Oi galera,
   
  Eu estou fazendo um sistema e gostaria de fazer um form de login diferente.. 
por exemplo... eu já vi form ser arrendondado e quadrado.
  Gostaria de fazer um form parecido com um carro ou caminhão, algo que 
lembre transportadora.. algo do tipo..
  Existe isso?
  Eu sei que vai ficar bem estranho... mas gostaria de saber se isso existe
   
  Obrigado, Guilherme

   
-
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] Criptografar dados no .exe

2008-02-13 Por tôpico Zote
Cara, uma solução bemm tosca que adotamos aqui a muito tempo, e que ainda
está em uso (por falta de tempo de pesquisar uma solução melhor), para
“esconder” usuário e senha do banco de dados foi:

criamos uma constante pra cada caractere e concatenamos cada constante até
formar a string de conexão.

 

Desta forma, fica fácil do desenvolvedor ver no código o que esta escrito e
também não fica visível quando se abre o exe num editor.

 

Com certeza não é a melhor solução, mas tem funcionado.

 

Abraço

Zote

 

From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On
Behalf Of Josinaldo
Sent: quarta-feira, 13 de fevereiro de 2008 14:24
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] Criptografar dados no .exe

 

kual esse programaque vc usa pra analizar o .exe?

- Original Message - 
From: Tiago 
To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br  
Sent: Wednesday, February 13, 2008 10:11 AM
Subject: [delphi-br] Criptografar dados no .exe

Olá,

Essa semana me despertou a curiosidade de saber o que meu
.exe tinha de informações. Utilizando uma ferramenta que possibilita
analisar arquivos .exe, tive um grande susto ao ver que informações como
usuários e senhas de acesso ao banco de dados estavam totalmente acessíveis,
e muitas outras informações que possibilitariam que um hacker possa se
divertir com meus sistema.

Bom a duvida é a seguinte, existe uma forma de quando eu for
informar a senha de meu banco de dados no componente TDatabase essa senha
fique criptografada, e ainda que eu possa deixar o meu exe com o mino de
informaçãon disponível a quem tentar fazer este tipo de análise ao exe?

Obrigado!

[As partes desta mensagem que não continham texto foram removidas]

[As partes desta mensagem que não continham texto foram removidas]

 



[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Componente AdvStringGrid...

2008-02-13 Por tôpico Eloi Filho
Boa tarde amigos,

Gostaria de saber se alguem tem o componente AdvStringGrid completo e sem 
restrição, pq eu baixei a versao 4.0.0.2 mas ta me dizendo q é versão para 
teste, preciso muito dele, pois tenho q dar manutenção em um sistema e o rapaz 
q desenvolveu o sistema não deixou os componentes e tem muita coisa feita com 
esse componente e preciso saber oq é...
Agradeço a quem puder me ajudar...

abraços...


Eloi Filho
Programador de Sistemas
A.S. Rodrigues Distribuidora
[EMAIL PROTECTED]
Fone: (92) 2101-1628 - Fax: (92) 3622-2591
Celular: (92) 8172-2726 - 9117-8043
www.asrodrigues.com.br



[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Máscara de campo hora no dbgrid

2008-02-13 Por tôpico ca_programador007
Olá amigos,
   
  Tenho uma consulta que trago o valor do campo hora (time no banco), e carrego 
as informações em um dbgrid.
  No banco o campo hora está gravado assim: 16:30:00
  Preciso que no dbgrid mostre apenas o 16:30, sem os segundos.
   
  Como faço para colocar a máscara dentro do dbgrid?
   
  No aguardo. Valeu pela ajuda.

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Máscara de campo hora no d bgrid

2008-02-13 Por tôpico Ricardo César Cardoso
Vc pode formatar o campo usando a propriedade DisplayFormat na coluna que 
possui a hora ou então usar o evento GetText para o campo que possui estes 
dados.

Dá uma olhada que já me lembro de ter visto exemplos disso na internet.

Atte,
Ricardo.

ca_programador007 [EMAIL PROTECTED] escreveu:   
Olá amigos,

   Tenho uma consulta que trago o valor do campo hora (time no banco), e 
carrego as informações em um dbgrid.
   No banco o campo hora está gravado assim: 16:30:00
   Preciso que no dbgrid mostre apenas o 16:30, sem os segundos.

   Como faço para colocar a máscara dentro do dbgrid?

   No aguardo. Valeu pela ajuda.
 
 -
 Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento! 
 
 [As partes desta mensagem que não continham texto foram removidas]
 





   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]



RES: [delphi-br] Versão do executavel via FTP

2008-02-13 Por tôpico thevortex78
Opa Marcos ajudou sim, a solução é mais pratica que a que eu queria, value
mesmo.
 
[ ] ´s
 
José Ricardo Aviles.

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Marcos Bernardo
Enviada em: quarta-feira, 13 de fevereiro de 2008 13:13
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Versão do executavel via FTP



Salve José Ricardo

Extrair a versão do EXE via FTP eu num sei...
mas vou explicar o que faço:

Crio um Zip com o novo EXE e um TXT com a versão
que no nosso caso é composto por .MM.DD.HH.MM
E comparo com a versão do EXE local
Caso seja maior... baixo o ZIP.

eu sei que não foi isso que vc pediu... mas espero ter ajudado... hehheeh

Marcos Bernardo

Em 13/02/08, José Ricardo Aviles thevortex78@
mailto:thevortex78%40yahoo.com.br yahoo.com.br escreveu:

 Boa tarde pessoal, existe a possibilidade de se extrair a versão de um
 arquivo executável direto de um servidor remoto via FTP?

 Obrigado pela ajuda.

 José Ricardo Avilés.

 


[As partes desta mensagem que não continham texto foram removidas]



 


[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] OFF - Visualizar arquivo texto no FastReport

2008-02-13 Por tôpico Adjalma Costa
Olá amigos da lista.
   
  Descupem-me pelo off, mas gostaria de saber dos amigos se é possível abrir um 
arquivo texto para visualização no FastReport.
   
  Caso alguém possa responder-me ficarei grato.
   
   
  sds
  Adjalma

   
-
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] Simular clique no formulário

2008-02-13 Por tôpico Alcistemas Informática
Kra, no delphi 7 pelo menos é assim:

  form1.Click;




  - Original Message - 
  From: Fabio Gomes 
  To: [EMAIL PROTECTED] ; delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 13, 2008 3:45 PM
  Subject: [delphi-br] Simular clique no formulário


  Caros amigos,

  Preciso simular um clique do mouse no formulário de login.
  Como faço isso no Delphi 2007? Alguém tem algo para me passar de exemplo?

  Preciso muito. Aguardo uma ajuda

  Fábio Gomes.

  -
  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento! 

  [As partes desta mensagem que não continham texto foram removidas]



   

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Máscara de campo hora no dbgrid

2008-02-13 Por tôpico Alcistemas Informática
vá na query ou table a que se refere esse campo.

dois clicks sobre a query..

selecione o campo que precisa

F11

Vá na opção Vá na opção Display Format e deixe assim:  HH:MM



  - Original Message - 
  From: Ricardo César Cardoso 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 13, 2008 3:44 PM
  Subject: Re: [delphi-br] Máscara de campo hora no dbgrid


  Vc pode formatar o campo usando a propriedade DisplayFormat na coluna que 
possui a hora ou então usar o evento GetText para o campo que possui estes 
dados.

  Dá uma olhada que já me lembro de ter visto exemplos disso na internet.

  Atte,
  Ricardo.

  ca_programador007 [EMAIL PROTECTED] escreveu: Olá amigos,

  Tenho uma consulta que trago o valor do campo hora (time no banco), e carrego 
as informações em um dbgrid.
  No banco o campo hora está gravado assim: 16:30:00
  Preciso que no dbgrid mostre apenas o 16:30, sem os segundos.

  Como faço para colocar a máscara dentro do dbgrid?

  No aguardo. Valeu pela ajuda.

  -
  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento! 

  [As partes desta mensagem que não continham texto foram removidas]


  -
  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento! 

  [As partes desta mensagem que não continham texto foram removidas]



   

[As partes desta mensagem que não continham texto foram removidas]



RES: [delphi-br] Máscara de campo hora no dbgrid

2008-02-13 Por tôpico Vitor Redes
Você já selecionou o que não compila e apertou F1 pra ver em
qual unit(namespace) está a função ou o tipo?

 

 

--

Vitor Luiz Redes

--

Bureau  Redsystem Software

[EMAIL PROTECTED]

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de ca_programador007
Enviada em: quarta-feira, 13 de fevereiro de 2008 16:52
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Máscara de campo hora no dbgrid

 

Olá Ricardo, 
Eu já tinha tentado dessa forma:

TNumericField(datamodule.sqlx.FieldByName('HORA')).DisplayFormat :=
'99:99;1;_';

Mas no Delphi 2007 o TNumeric não compila e o displayformat também não.

Tem alguma alternativa?

Grato


Ricardo César Cardoso ricardo_engsoft@
mailto:ricardo_engsoft%40yahoo.com.br yahoo.com.br escreveu:
Vc pode formatar o campo usando a propriedade DisplayFormat na coluna que
possui a hora ou então usar o evento GetText para o campo que possui estes
dados.

Dá uma olhada que já me lembro de ter visto exemplos disso na internet.

Atte,
Ricardo.

ca_programador007 ca_programador007@
mailto:ca_programador007%40yahoo.com.br yahoo.com.br escreveu: Olá
amigos,

Tenho uma consulta que trago o valor do campo hora (time no banco), e
carrego as informações em um dbgrid.
No banco o campo hora está gravado assim: 16:30:00
Preciso que no dbgrid mostre apenas o 16:30, sem os segundos.

Como faço para colocar a máscara dentro do dbgrid?

No aguardo. Valeu pela ajuda.

-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

 



[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Off Topic [senha gmail]

2008-02-13 Por tôpico Cleiton
Pessoal... não sei o que houve com meu gmail.

Ao acessar mostra a segunte mensagem: 
 
O nome de usuário e a senha não correspondem

Por conta dissou estou há dois dias sem conseguir acessar meu outro e-mail.

Alguém já passou por isso? Sabe como resolver?

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Versão do executavel via FTP

2008-02-13 Por tôpico Marcos Bernardo
Blz... precisando de alguma coisa. é so chamar! =D

abraço!
Marcos


Em 13/02/08, thevortex78 [EMAIL PROTECTED] escreveu:

   Opa Marcos ajudou sim, a solução é mais pratica que a que eu queria,
 value
 mesmo.

 [ ] ´s

 José Ricardo Aviles.

 _

 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 Marcos Bernardo
 Enviada em: quarta-feira, 13 de fevereiro de 2008 13:13
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Assunto: Re: [delphi-br] Versão do executavel via FTP

 Salve José Ricardo

 Extrair a versão do EXE via FTP eu num sei...
 mas vou explicar o que faço:

 Crio um Zip com o novo EXE e um TXT com a versão
 que no nosso caso é composto por .MM.DD.HH.MMhttp://.mm.dd.hh.mm/
 E comparo com a versão do EXE local
 Caso seja maior... baixo o ZIP.

 eu sei que não foi isso que vc pediu... mas espero ter ajudado... hehheeh

 Marcos Bernardo

 Em 13/02/08, José Ricardo Aviles thevortex78@
 mailto:thevortex78%40yahoo.com.br yahoo.com.br escreveu:
 
  Boa tarde pessoal, existe a possibilidade de se extrair a versão de um
  arquivo executável direto de um servidor remoto via FTP?
 
  Obrigado pela ajuda.
 
  José Ricardo Avilés.
 
 
 

 [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] Componente AdvStringGrid...

2008-02-13 Por tôpico Eduardo Silva dos Santos
Essse componente é da TMSSoftware, sem restrição so comprando.

Em 13/02/08, Eloi Filho [EMAIL PROTECTED] escreveu:

   Boa tarde amigos,

 Gostaria de saber se alguem tem o componente AdvStringGrid completo e sem
 restrição, pq eu baixei a versao 4.0.0.2 mas ta me dizendo q é versão para
 teste, preciso muito dele, pois tenho q dar manutenção em um sistema e o
 rapaz q desenvolveu o sistema não deixou os componentes e tem muita coisa
 feita com esse componente e preciso saber oq é...
 Agradeço a quem puder me ajudar...

 abraços...

 Eloi Filho
 Programador de Sistemas
 A.S. Rodrigues Distribuidora
 [EMAIL PROTECTED] efgf%40ig.com.br
 Fone: (92) 2101-1628 - Fax: (92) 3622-2591
 Celular: (92) 8172-2726 - 9117-8043
 www.asrodrigues.com.br

 [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] Criptografar dados no .exe

2008-02-13 Por tôpico Gerson Machado
mesmo assim, esta opção não é 100%, pois se precisar obter acesso à senha do 
banco, é simples, mas colocar um snifer rodando do servidor e pegar a sequencia 
de caracteres que chega com o destino do banco.
  

José Henrique (Zote) [EMAIL PROTECTED] escreveu:
  Cara, uma solução bemm tosca que adotamos aqui a muito tempo, e que 
ainda
está em uso (por falta de tempo de pesquisar uma solução melhor), para
“esconder” usuário e senha do banco de dados foi:

criamos uma constante pra cada caractere e concatenamos cada constante até
formar a string de conexão.

Desta forma, fica fácil do desenvolvedor ver no código o que esta escrito e
também não fica visível quando se abre o exe num editor.

Com certeza não é a melhor solução, mas tem funcionado.

Abraço

Zote

From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On
Behalf Of Josinaldo
Sent: quarta-feira, 13 de fevereiro de 2008 14:24
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] Criptografar dados no .exe

kual esse programaque vc usa pra analizar o .exe?

- Original Message - 
From: Tiago 
To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
Sent: Wednesday, February 13, 2008 10:11 AM
Subject: [delphi-br] Criptografar dados no .exe

Olá,

Essa semana me despertou a curiosidade de saber o que meu
.exe tinha de informações. Utilizando uma ferramenta que possibilita
analisar arquivos .exe, tive um grande susto ao ver que informações como
usuários e senhas de acesso ao banco de dados estavam totalmente acessíveis,
e muitas outras informações que possibilitariam que um hacker possa se
divertir com meus sistema.

Bom a duvida é a seguinte, existe uma forma de quando eu for
informar a senha de meu banco de dados no componente TDatabase essa senha
fique criptografada, e ainda que eu possa deixar o meu exe com o mino de
informaçãon disponível a quem tentar fazer este tipo de análise ao exe?

Obrigado!

[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]



 

   
-
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] Componente AdvStringGrid...

2008-02-13 Por tôpico Eloi Filho
Valeu mesmo assim...


Eloi Filho
Programador de Sistemas
A.S. Rodrigues Distribuidora
[EMAIL PROTECTED]
Fone: (92) 2101-1628 - Fax: (92) 3622-2591
Celular: (92) 8172-2726 - 9117-8043
www.asrodrigues.com.br


  - Original Message - 
  From: Eduardo Silva dos Santos 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 13, 2008 4:03 PM
  Subject: Re: [delphi-br] Componente AdvStringGrid...


  Essse componente é da TMSSoftware, sem restrição so comprando.

  Em 13/02/08, Eloi Filho [EMAIL PROTECTED] escreveu:
  
   Boa tarde amigos,
  
   Gostaria de saber se alguem tem o componente AdvStringGrid completo e sem
   restrição, pq eu baixei a versao 4.0.0.2 mas ta me dizendo q é versão para
   teste, preciso muito dele, pois tenho q dar manutenção em um sistema e o
   rapaz q desenvolveu o sistema não deixou os componentes e tem muita coisa
   feita com esse componente e preciso saber oq é...
   Agradeço a quem puder me ajudar...
  
   abraços...
  
   Eloi Filho
   Programador de Sistemas
   A.S. Rodrigues Distribuidora
   [EMAIL PROTECTED] efgf%40ig.com.br
   Fone: (92) 2101-1628 - Fax: (92) 3622-2591
   Celular: (92) 8172-2726 - 9117-8043
   www.asrodrigues.com.br
  
   [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] Versão do executavel via FTP

2008-02-13 Por tôpico Eduardo Silva dos Santos
Eu tb coloquei um txt com a versão do arquivo no ftp,

e tb outro txt contendo o MD5 do arquivo, ai baixo o exe e o txt com o md5,
depois extraio o md5 do exe baixado e comparo com o que estava no txt, se
tiver igual é pq nao houve erro no download.

Em 13/02/08, Marcos Bernardo [EMAIL PROTECTED] escreveu:

   Blz... precisando de alguma coisa. é so chamar! =D

 abraço!
 Marcos

 Em 13/02/08, thevortex78 [EMAIL PROTECTED]thevortex78%40yahoo.com.br
 escreveu:
 
  Opa Marcos ajudou sim, a solução é mais pratica que a que eu queria,
  value
  mesmo.
 
  [ ] ´s
 
  José Ricardo Aviles.
 
  _
 
  De: delphi-br@yahoogrupos.com.br 
  delphi-br%40yahoogrupos.com.brdelphi-br%40yahoogrupos.com.br [mailto:
  delphi-br@yahoogrupos.com.br 
  delphi-br%40yahoogrupos.com.brdelphi-br%40yahoogrupos.com.br] Em
  nome de Marcos Bernardo
  Enviada em: quarta-feira, 13 de fevereiro de 2008 13:13
  Para: delphi-br@yahoogrupos.com.br 
  delphi-br%40yahoogrupos.com.brdelphi-br%40yahoogrupos.com.br
  Assunto: Re: [delphi-br] Versão do executavel via FTP
 
  Salve José Ricardo
 
  Extrair a versão do EXE via FTP eu num sei...
  mas vou explicar o que faço:
 
  Crio um Zip com o novo EXE e um TXT com a versão
  que no nosso caso é composto por .MM.DD.HH.MM
 http://.mm.dd.hh.mm/
  E comparo com a versão do EXE local
  Caso seja maior... baixo o ZIP.
 
  eu sei que não foi isso que vc pediu... mas espero ter ajudado...
 hehheeh
 
  Marcos Bernardo
 
  Em 13/02/08, José Ricardo Aviles thevortex78@
  mailto:thevortex78%40yahoo.com.br yahoo.com.br escreveu:
  
   Boa tarde pessoal, existe a possibilidade de se extrair a versão de um
   arquivo executável direto de um servidor remoto via FTP?
  
   Obrigado pela ajuda.
  
   José Ricardo Avilés.
  
  
  
 
  [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]

  




-- 
...
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] OFF - Visualizar arquivo texto no FastReport

2008-02-13 Por tôpico Eduardo Silva dos Santos
Da tranquilamente, coloque um TFrxMemoView no Relatorio e no OnBeforePrint
do mesmo componente carrege o aquivo

MemoView.Memo.LoadFromFile( );

mandei um exemplo pro seu e-mail.

Em 13/02/08, Adjalma Costa [EMAIL PROTECTED] escreveu:

   Olá amigos da lista.

 Descupem-me pelo off, mas gostaria de saber dos amigos se é possível abrir
 um arquivo texto para visualização no FastReport.

 Caso alguém possa responder-me ficarei grato.


 sds
 Adjalma

 -
 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]

  




-- 
...
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] ApplicationEvents no Delphi 2007

2008-02-13 Por tôpico ca_programador007
Sim, Eduardo, esta procedure está no onException do ApplicationEvents.
  mas achei estranho não funcionar porque será?
  No aguardo, valeu



Eduardo Silva dos Santos [EMAIL PROTECTED] escreveu:
  Não mudou não, essas linhas estão dentro do evento onException do
ApplicationEvents?

Em 13/02/08, ca_programador007 [EMAIL PROTECTED] escreveu:

 Olá amigos,
 Utilizava o componente ApplicationEvents para tratar os erros no Delphi 7,
 e tentei copiar e colar a mesma procedure no Delphi 2007 e dá erro.. ele não
 reconhece o E.Message e o Pos. Mudou alguma coisa do Delphi 7 para o
 Delphi 2007?

 begin
 if Pos(UpperCase('is not a valid date'), UpperCase('E.Message'))0 then
 begin
 showMessage('A data digitada não é válida. Tente novamente com outra
 data.');
 end;
 if pos(upperCase('violation of primary or unique key constraint'),
 UpperCase(E.Message))  0 then
 begin
 beep;
 showmessage('O valor digitado para o campo já existe no cadastro.');
 Exit;
 end;
 end;

 Obrigado, Carlos

 -
 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]

 


-- 

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]



 

   
-
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: RES: [delphi-br] Máscara de campo hora no dbgrid

2008-02-13 Por tôpico ca_programador007
Sim, Vitor.
  Já tentei o f1 em cima do TNumericField e no Displayformat e não encontrou 
nada. estranho, né?
  tem alguma alternativa?
   
  Obrigado

Vitor Redes [EMAIL PROTECTED] escreveu:
  Você já selecionou o que não compila e apertou F1 pra ver em
qual unit(namespace) está a função ou o tipo?

--

Vitor Luiz Redes

--

Bureau  Redsystem Software

[EMAIL PROTECTED]

_ 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de ca_programador007
Enviada em: quarta-feira, 13 de fevereiro de 2008 16:52
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Máscara de campo hora no dbgrid

Olá Ricardo, 
Eu já tinha tentado dessa forma:

TNumericField(datamodule.sqlx.FieldByName('HORA')).DisplayFormat :=
'99:99;1;_';

Mas no Delphi 2007 o TNumeric não compila e o displayformat também não.

Tem alguma alternativa?

Grato

Ricardo César Cardoso ricardo_engsoft@
mailto:ricardo_engsoft%40yahoo.com.br yahoo.com.br escreveu:
Vc pode formatar o campo usando a propriedade DisplayFormat na coluna que
possui a hora ou então usar o evento GetText para o campo que possui estes
dados.

Dá uma olhada que já me lembro de ter visto exemplos disso na internet.

Atte,
Ricardo.

ca_programador007 ca_programador007@
mailto:ca_programador007%40yahoo.com.br yahoo.com.br escreveu: Olá
amigos,

Tenho uma consulta que trago o valor do campo hora (time no banco), e
carrego as informações em um dbgrid.
No banco o campo hora está gravado assim: 16:30:00
Preciso que no dbgrid mostre apenas o 16:30, sem os segundos.

Como faço para colocar a máscara dentro do dbgrid?

No aguardo. Valeu pela ajuda.

-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

[As partes desta mensagem que não continham texto foram removidas]



 

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]



Re: RES: [delphi-br] Máscara de campo hora no dbgrid

2008-02-13 Por tôpico ca_programador007
Sim, Vitor.
  Já tentei o f1 em cima do TNumericField e no Displayformat e não encontrou 
nada. estranho, né?
  tem alguma alternativa?
   
  Obrigado

Vitor Redes [EMAIL PROTECTED] escreveu:
  Você já selecionou o que não compila e apertou F1 pra ver em
qual unit(namespace) está a função ou o tipo?

--

Vitor Luiz Redes

--

Bureau  Redsystem Software

[EMAIL PROTECTED]

_ 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de ca_programador007
Enviada em: quarta-feira, 13 de fevereiro de 2008 16:52
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Máscara de campo hora no dbgrid

Olá Ricardo, 
Eu já tinha tentado dessa forma:

TNumericField(datamodule.sqlx.FieldByName('HORA')).DisplayFormat :=
'99:99;1;_';

Mas no Delphi 2007 o TNumeric não compila e o displayformat também não.

Tem alguma alternativa?

Grato

Ricardo César Cardoso ricardo_engsoft@
mailto:ricardo_engsoft%40yahoo.com.br yahoo.com.br escreveu:
Vc pode formatar o campo usando a propriedade DisplayFormat na coluna que
possui a hora ou então usar o evento GetText para o campo que possui estes
dados.

Dá uma olhada que já me lembro de ter visto exemplos disso na internet.

Atte,
Ricardo.

ca_programador007 ca_programador007@
mailto:ca_programador007%40yahoo.com.br yahoo.com.br escreveu: Olá
amigos,

Tenho uma consulta que trago o valor do campo hora (time no banco), e
carrego as informações em um dbgrid.
No banco o campo hora está gravado assim: 16:30:00
Preciso que no dbgrid mostre apenas o 16:30, sem os segundos.

Como faço para colocar a máscara dentro do dbgrid?

No aguardo. Valeu pela ajuda.

-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

[As partes desta mensagem que não continham texto foram removidas]



 

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Simular clique no formulário

2008-02-13 Por tôpico Fabio Gomes
Não deu, cara.
Tentei o form1.click no oncreate, no onshow do formulário e não simula o clique.
Acontece que estou com problemas de dar o foco no form de login.. 
No oncreate do form principal eu estou criando o form de login, e ele não fica 
com o foco no login, ficando com o foco no form principal.
Tem alguma outra alternativa?


Alcistemas Informática [EMAIL PROTECTED] escreveu:  Kra, no delphi 7 
pelo menos é assim:

form1.Click;

- Original Message - 
From: Fabio Gomes 
To: [EMAIL PROTECTED] ; delphi-br@yahoogrupos.com.br 
Sent: Wednesday, February 13, 2008 3:45 PM
Subject: [delphi-br] Simular clique no formulário

Caros amigos,

Preciso simular um clique do mouse no formulário de login.
Como faço isso no Delphi 2007? Alguém tem algo para me passar de exemplo?

Preciso muito. Aguardo uma ajuda

Fábio Gomes.

-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

[As partes desta mensagem que não continham texto foram removidas]



 

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] ApplicationEvents no Delphi 2007

2008-02-13 Por tôpico Eduardo Silva dos Santos
Rapaz.. funciona direitinho, te mandei um exemplo.

tinha um pequeno erro no seu código, e pelo meu exemplo veja se nao falta
alguma unit na sua cláusula Uses.

boa sorte.

Em 13/02/08, ca_programador007 [EMAIL PROTECTED] escreveu:

   Sim, Eduardo, esta procedure está no onException do ApplicationEvents.
 mas achei estranho não funcionar porque será?
 No aguardo, valeu

 Eduardo Silva dos Santos [EMAIL PROTECTED] eduardo.drd%40gmail.com
 escreveu:

 Não mudou não, essas linhas estão dentro do evento onException do
 ApplicationEvents?

 Em 13/02/08, ca_programador007 [EMAIL 
 PROTECTED]ca_programador007%40yahoo.com.br
 escreveu:
 
  Olá amigos,
  Utilizava o componente ApplicationEvents para tratar os erros no Delphi
 7,
  e tentei copiar e colar a mesma procedure no Delphi 2007 e dá erro.. ele
 não
  reconhece o E.Message e o Pos. Mudou alguma coisa do Delphi 7 para o
  Delphi 2007?
 
  begin
  if Pos(UpperCase('is not a valid date'), UpperCase('E.Message'))0 then
  begin
  showMessage('A data digitada não é válida. Tente novamente com outra
  data.');
  end;
  if pos(upperCase('violation of primary or unique key constraint'),
  UpperCase(E.Message))  0 then
  begin
  beep;
  showmessage('O valor digitado para o campo já existe no cadastro.');
  Exit;
  end;
  end;
 
  Obrigado, Carlos
 
  -
  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]
 
 
 

 --
 
 Eduardo Silva dos Santos
 DRD Sistemas.
 (27) 3218-4201
 MSN: [EMAIL PROTECTED] eduardo.drd%40gmail.com
 Site: http://www.drdsistemas.com/
 

 [As partes desta mensagem que não continham texto foram removidas]

 -
 Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
 armazenamento!

 [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] Simular clique no formulário

2008-02-13 Por tôpico fernando lima
Boa noite , Fabio

ja usou o evento OnActivate.

fernando

- Mensagem original 
De: Fabio Gomes [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 13 de Fevereiro de 2008 20:55:54
Assunto: Re: [delphi-br] Simular clique no formulário









  



Não deu, cara.

Tentei o form1.click no oncreate, no onshow do formulário e não simula o clique.

Acontece que estou com problemas de dar o foco no form de login.. 

No oncreate do form principal eu estou criando o form de login, e ele não fica 
com o foco no login, ficando com o foco no form principal.

Tem alguma outra alternativa?



Alcistemas Informática [EMAIL PROTECTED] com.br escreveu:  Kra, no 
delphi 7 pelo menos é assim:



form1.Click;



- Original Message - 

From: Fabio Gomes 

To: delphi-total@ yahoogrupos. com.br ; [EMAIL PROTECTED] os.com.br 

Sent: Wednesday, February 13, 2008 3:45 PM

Subject: [delphi-br] Simular clique no formulário



Caros amigos,



Preciso simular um clique do mouse no formulário de login.

Como faço isso no Delphi 2007? Alguém tem algo para me passar de exemplo?



Preciso muito. Aguardo uma ajuda



Fábio Gomes.



 - - ---

Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 



[As partes desta mensagem que não continham texto foram removidas]



[As partes desta mensagem que não continham texto foram removidas]



 - - ---

Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 



[As partes desta mensagem que não continham texto foram removidas]






  







!--

#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-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]



RES: [delphi-br] Simular clique no formulário

2008-02-13 Por tôpico Marcos - Yahoo
Assim tenta dar um setfocus no no Edit da tela de logo e manda showmodal na
chamada

 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de fernando lima
Enviada em: quarta-feira, 13 de fevereiro de 2008 20:15
Para: delphi-br@yahoogrupos.com.br
Assunto: Res: [delphi-br] Simular clique no formulário

 

Boa noite , Fabio

ja usou o evento OnActivate.

fernando

- Mensagem original 
De: Fabio Gomes [EMAIL PROTECTED] mailto:binho62%40yahoo.com.br 
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
Enviadas: Quarta-feira, 13 de Fevereiro de 2008 20:55:54
Assunto: Re: [delphi-br] Simular clique no formulário

Não deu, cara.

Tentei o form1.click no oncreate, no onshow do formulário e não simula o
clique.

Acontece que estou com problemas de dar o foco no form de login.. 

No oncreate do form principal eu estou criando o form de login, e ele não
fica com o foco no login, ficando com o foco no form principal.

Tem alguma outra alternativa?

Alcistemas Informática [EMAIL PROTECTED] com.br escreveu: Kra, no delphi 7
pelo menos é assim:

form1.Click;

- Original Message - 

From: Fabio Gomes 

To: delphi-total@ yahoogrupos. com.br ; [EMAIL PROTECTED] os.com.br 

Sent: Wednesday, February 13, 2008 3:45 PM

Subject: [delphi-br] Simular clique no formulário

Caros amigos,

Preciso simular um clique do mouse no formulário de login.

Como faço isso no Delphi 2007? Alguém tem algo para me passar de exemplo?

Preciso muito. Aguardo uma ajuda

Fábio Gomes.

 - - ---

Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

[As partes desta mensagem que não continham texto foram removidas]

 - - ---

Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

!--

#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-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;paddin
g-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]

 



[As partes desta mensagem que não continham texto foram 

Re: Res: [delphi-br] Simular clique no formulário

2008-02-13 Por tôpico marcosksb
Fabio ja tentou no show mandar o foco para algum compomente da tua 
tela de logo e tais chamando com o show ou showmodal ?

--- Em delphi-br@yahoogrupos.com.br, fernando lima 
[EMAIL PROTECTED] escreveu

 Boa noite , Fabio
 
 ja usou o evento OnActivate.
 
 fernando
 
 - Mensagem original 
 De: Fabio Gomes [EMAIL PROTECTED]
 Para: delphi-br@yahoogrupos.com.br
 Enviadas: Quarta-feira, 13 de Fevereiro de 2008 20:55:54
 Assunto: Re: [delphi-br] Simular clique no formulário
 
 
 
 
 
 
 
 
 
   
 
 
 
 Não deu, cara.
 
 Tentei o form1.click no oncreate, no onshow do formulário e não 
simula o clique.
 
 Acontece que estou com problemas de dar o foco no form de login.. 
 
 No oncreate do form principal eu estou criando o form de login, e 
ele não fica com o foco no login, ficando com o foco no form 
principal.
 
 Tem alguma outra alternativa?
 
 
 
 Alcistemas Informática [EMAIL PROTECTED] com.br 
escreveu:  Kra, no delphi 7 pelo menos é assim:
 
 
 
 form1.Click;
 
 
 
 - Original Message - 
 
 From: Fabio Gomes 
 
 To: delphi-total@ yahoogrupos. com.br ; [EMAIL PROTECTED] 
os.com.br 
 
 Sent: Wednesday, February 13, 2008 3:45 PM
 
 Subject: [delphi-br] Simular clique no formulário
 
 
 
 Caros amigos,
 
 
 
 Preciso simular um clique do mouse no formulário de login.
 
 Como faço isso no Delphi 2007? Alguém tem algo para me passar de 
exemplo?
 
 
 
 Preciso muito. Aguardo uma ajuda
 
 
 
 Fábio Gomes.
 
 
 
  - - ---
 
 Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento! 
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 
  - - ---
 
 Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento! 
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 
 
 
 
   
 
 
 
 
 
 
 
 !--
 
 #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-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 

RES: [delphi-br] Simular clique no formulário

2008-02-13 Por tôpico Vitor Redes
Abra o seu .DPR, ctrl+f12 e o nome do seu projeto, ele deve
estar mais ou menos assim:

 

Unit1 in 'Unit1.pas' {Form1},

Unit2 in 'Unit1.pas' {Form3},

Unit3 in 'Unit1.pas' {Form2};

 

{$R *.res}

 

begin

Application.Initialize;

Application.Title := 'Título';

Application.CreateForm(TFMPrincipal, FMPrincipal);

Application.CreateForm(TDM, DM); //se houver

 

=  Aqui, faça algo mais ou menos assim

 

Application.CreateForm( TFMLogin, FMLogin );

if FMLogin.ShowModal() = mrOk then

Application.Run;

else

Application.Terminate; 

End;

  

--

Vitor Luiz Redes

--

Bureau  Redsystem Software

 mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Fabio Gomes
Enviada em: quarta-feira, 13 de fevereiro de 2008 20:56
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Simular clique no formulário

 

Não deu, cara.
Tentei o form1.click no oncreate, no onshow do formulário e não simula o
clique.
Acontece que estou com problemas de dar o foco no form de login.. 
No oncreate do form principal eu estou criando o form de login, e ele não
fica com o foco no login, ficando com o foco no form principal.
Tem alguma outra alternativa?

Alcistemas Informática [EMAIL PROTECTED] mailto:alcistemas%40yahoo.com.br
com.br escreveu: Kra, no delphi 7 pelo menos é assim:

form1.Click;

- Original Message - 
From: Fabio Gomes 
To: delphi-total@ mailto:delphi-total%40yahoogrupos.com.br
yahoogrupos.com.br ; [EMAIL PROTECTED]
mailto:delphi-br%40yahoogrupos.com.br os.com.br 
Sent: Wednesday, February 13, 2008 3:45 PM
Subject: [delphi-br] Simular clique no formulário

Caros amigos,

Preciso simular um clique do mouse no formulário de login.
Como faço isso no Delphi 2007? Alguém tem algo para me passar de exemplo?

Preciso muito. Aguardo uma ajuda

Fábio Gomes.

-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

[As partes desta mensagem que não continham texto foram removidas]

-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]

 



[As partes desta mensagem que não continham texto foram removidas]



Re: RES: [delphi-br] Contrato

2008-02-13 Por tôpico Clovis iTelefonica
Podemos conversar sobre o pequeno aplicativo
Clovito


  Clovis Machado Ferreira
Que o Grande Arquiteto do Universo nos Ampare
Msn-[EMAIL PROTECTED]
  - Original Message - 
  From: ADEMIR FERRAZ 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 13, 2008 1:28 PM
  Subject: Re: RES: [delphi-br] Contrato


  Necessito de um pequeno aplicativo em Delphi. Isso é urgente pois se refere a 
concurso. Os interessados entrar em contato pelo [EMAIL PROTECTED]

  ademir

  - Original Message - 
  From: Celio Bernardo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 13, 2008 11:18 AM
  Subject: Re: RES: [delphi-br] Ajuda com TRecord - POREM

  É que vou copiar de um arquivo .txt conteudo do tamanho exato do tamanho da 
variável, independente se o conteudo tenha caracter ou espacos em branco. Assim 
tava pensando em otimizar o procedimento que busca conteudo no arquivo e copia 
para o bd.

  Obrigado

  Celio.

  Davi Eduardo Borges Wall [EMAIL PROTECTED] escreveu:
  Te pergunto, pra que vc quer saber o tamanho da variável declarada?

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Celio 
Bernardo
  Enviada em: quarta-feira, 13 de fevereiro de 2008 10:27
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Ajuda com TRecord - POREM

  Obrigado pela ajudas, porem o que preciso é que me retorne o tamanho da 
variavel declarada e NAO do tamanho do seu conteudo.
  No caso de Pessoa.Nome o resultado deve ser 60.

  Mias ainda, tem como fazer um loop para percorrer todos os campos da variaver 
Pessoa, para fins de zerar seu conteudo.
  tipo
  for i := 0 to pessoa.recordcount do
  pessoa.field[i].value := ''

  obrigado

  Celio.

  Ricardo César Cardoso [EMAIL PROTECTED] 
mailto:ricardo_engsoft%40yahoo.com.br  escreveu:
  Vamos ver se a minha memória anda boa:

  Declare uma variável do tipo Integer e atribua o seguinte:

  Tamanho_Campo := Length(Pessoa.Nome);

  Se bem que eu acho que vai retornar o tamanho do conteúdo de uma instância de 
Pessoa... 

  Atte,
  Ricardo.

  Celio Bernardo [EMAIL PROTECTED] mailto:celioblima%40yahoo.com.br  
escreveu: Amigos tenho uma estrutura como

  Type TPessoas = record

  Nome : String[60];
  cpf : String[11];

  end.
  ...

  var
  Pessoa : TPessoas;

  Como é a sintaxe pra pegar o tamanho do campo:
  Exemplo: Pessoa.Nome o tamamho é 60.

  Obrigado

  Celio.

  -
  Célio Bernardo de Lima
  Diretor de Projetos e Novas Tecnologias
  siatech.com.br 
  -

  -
  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]

  -
  Célio Bernardo de Lima
  Diretor de Projetos e Novas Tecnologias
  siatech.com.br 
  -

  -
  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento! 

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]

  -
  Célio Bernardo de Lima
  Diretor de Projetos e Novas Tecnologias
  siatech.com.br 
  -

  -
  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento! 

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]



   

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Separar tirulo de eritora + importação

2008-02-13 Por tôpico Rodrigo Alex Marchiori
Olá pessoal,

 estou com um pequeno problema aqui, tenho um arquivo texto com 4 mil
registros de livros e os campos titulo e editora estão juntos exemplo:   O
LIVRO DOS ESPIRITOS - EDITORA IDE/BOA NOVA.

Gostaria de saber se tem como criar uma função ou procedure para retornar os
dois separados?

 

O LIVRO DOS ESPIRITOS 

EDITORA IDE/BOA NOVA

 

 

Agradeço desde já;

 

Att

Rodrigo

Skype rodrigo_marchiori

 


No virus found in this outgoing message.
Checked by AVG Free Edition. 
Version: 7.5.516 / Virus Database: 269.20.4/1275 - Release Date: 12/2/2008
15:20
 


[As partes desta mensagem que não continham texto foram removidas]



RE: [delphi-br] Separar tirulo de eritora + importação

2008-02-13 Por tôpico Rubem Nascimento da Rocha

Cria uma nova aplicação console e faça um copy-and-paste (copiar e colar) do 
código a seguir, depois execute-o. Nele, vc terá um bom exemplo de uso de 
TStringList e suas propriedades Delimiter e DelimitedText. Isso pode resolver 
muito bem, e de forma bem elegante o seu problema.


program TestDelimiters;

{$APPTYPE CONSOLE}

uses
  Classes, SysUtils;

begin
  with TStringList.Create do
  try
Delimiter := '-';
DelimitedText := 'LIVRO DOS ESPIRITOS - EDITORA IDE/BOA NOVA';
repeat
  WriteLn(Strings[0]);
  Delete(0);
until Count = 0;
  finally
Free;
  end;
  WriteLn('Pressione ENTER...');
  WriteLn(Eoln);
end.



Maiores detalhes pra entender este pequeno exemplo, consulte o help do Delphi 
sobre as propriedades de TStringList usadas neste exemplo.
Sds.




To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Wed, 13 Feb 2008 23:54:23 -0200
Subject: [delphi-br] Separar tirulo de eritora + importação







Olá pessoal,

estou com um pequeno problema aqui, tenho um arquivo texto com 4 mil
registros de livros e os campos titulo e editora estão juntos exemplo: O
LIVRO DOS ESPIRITOS - EDITORA IDE/BOA NOVA.

Gostaria de saber se tem como criar uma função ou procedure para retornar os
dois separados?

O LIVRO DOS ESPIRITOS

EDITORA IDE/BOA NOVA

Agradeço desde já;

Att

Rodrigo

Skype rodrigo_marchiori

No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.5.516 / Virus Database: 269.20.4/1275 - Release Date: 12/2/2008
15:20


[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

RES: [delphi-br] Separar tirulo de eritora + impor tação

2008-02-13 Por tôpico Rodrigo Alex Marchiori
Rubem fiz o teste e retornou cada linha com uma palavra.

 

LIVRO

DOS

ESPIRITAS

EDITORA

IDA/BOA

NOA

 

E estava dando uma olhada no arquivo  e também tem texto compostos por mais
de um sinal “-” :

PALAVRAS DE CHICO XAVIER - (ESPIRITO EMMANUEL) - EDITORA IDE

 

Att

Rodrigo

 

 

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Rubem Nascimento da Rocha
Enviada em: quinta-feira, 14 de fevereiro de 2008 00:11
Para: delphi-br@yahoogrupos.com.br
Assunto: RE: [delphi-br] Separar tirulo de eritora + importação
Prioridade: Alta

 


Cria uma nova aplicação console e faça um copy-and-paste (copiar e colar) do
código a seguir, depois execute-o. Nele, vc terá um bom exemplo de uso de
TStringList e suas propriedades Delimiter e DelimitedText. Isso pode
resolver muito bem, e de forma bem elegante o seu problema.


program TestDelimiters;

{$APPTYPE CONSOLE}

uses
Classes, SysUtils;

begin
with TStringList.Create do
try
Delimiter := '-';
DelimitedText := 'LIVRO DOS ESPIRITOS - EDITORA IDE/BOA NOVA';
repeat
WriteLn(Strings[0]);
Delete(0);
until Count = 0;
finally
Free;
end;
WriteLn('Pressione ENTER...');
WriteLn(Eoln);
end.


Maiores detalhes pra entender este pequeno exemplo, consulte o help do
Delphi sobre as propriedades de TStringList usadas neste exemplo.
Sds.



To: HYPERLINK
mailto:delphi-br%40yahoogrupos.com.brdelphi-br@yahoogrupos.com.br
From: HYPERLINK mailto:r.marchiori%40uol.com.br[EMAIL PROTECTED]
Date: Wed, 13 Feb 2008 23:54:23 -0200
Subject: [delphi-br] Separar tirulo de eritora + importação

Olá pessoal,

estou com um pequeno problema aqui, tenho um arquivo texto com 4 mil
registros de livros e os campos titulo e editora estão juntos exemplo: O
LIVRO DOS ESPIRITOS - EDITORA IDE/BOA NOVA.

Gostaria de saber se tem como criar uma função ou procedure para retornar os
dois separados?

O LIVRO DOS ESPIRITOS

EDITORA IDE/BOA NOVA

Agradeço desde já;

Att

Rodrigo

Skype rodrigo_marchiori

No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.5.516 / Virus Database: 269.20.4/1275 - Release Date: 12/2/2008
15:20

[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!
HYPERLINK
http://www.livemaps.com.br/index.aspx?tr=truehttp://www.livemaps.com.br/in
dex.aspx?tr=true

 

 

No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.5.516 / Virus Database: 269.20.4/1275 - Release Date: 12/2/2008
15:20


No virus found in this outgoing message.
Checked by AVG Free Edition. 
Version: 7.5.516 / Virus Database: 269.20.4/1275 - Release Date: 12/2/2008
15:20
 


[As partes desta mensagem que não continham texto foram removidas]



Re: RES: [delphi-br] Contrato

2008-02-13 Por tôpico Leslyn Fernandes
OK,

já te adicionei no MSN...

2008/2/13 Clovis iTelefonica [EMAIL PROTECTED]:

   Podemos conversar sobre o pequeno aplicativo
 Clovito

 Clovis Machado Ferreira
 Que o Grande Arquiteto do Universo nos Ampare
 Msn-[EMAIL PROTECTED] clovito.ferreira%40hotmail.com

 - Original Message -
 From: ADEMIR FERRAZ
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Sent: Wednesday, February 13, 2008 1:28 PM
 Subject: Re: RES: [delphi-br] Contrato

 Necessito de um pequeno aplicativo em Delphi. Isso é urgente pois se
 refere a concurso. Os interessados entrar em contato pelo
 [EMAIL PROTECTED] ademir.ferraz%40gmail.com

 ademir

 - Original Message -
 From: Celio Bernardo
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Sent: Wednesday, February 13, 2008 11:18 AM
 Subject: Re: RES: [delphi-br] Ajuda com TRecord - POREM

 É que vou copiar de um arquivo .txt conteudo do tamanho exato do tamanho
 da variável, independente se o conteudo tenha caracter ou espacos em branco.
 Assim tava pensando em otimizar o procedimento que busca conteudo no arquivo
 e copia para o bd.

 Obrigado

 Celio.

 Davi Eduardo Borges Wall [EMAIL PROTECTED] davi.wall%40mult.com.br
 escreveu:
 Te pergunto, pra que vc quer saber o tamanho da variável declarada?

 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
 Celio Bernardo
 Enviada em: quarta-feira, 13 de fevereiro de 2008 10:27
 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Assunto: Re: [delphi-br] Ajuda com TRecord - POREM

 Obrigado pela ajudas, porem o que preciso é que me retorne o tamanho da
 variavel declarada e NAO do tamanho do seu conteudo.
 No caso de Pessoa.Nome o resultado deve ser 60.

 Mias ainda, tem como fazer um loop para percorrer todos os campos da
 variaver Pessoa, para fins de zerar seu conteudo.
 tipo
 for i := 0 to pessoa.recordcount do
 pessoa.field[i].value := ''

 obrigado

 Celio.

 Ricardo César Cardoso [EMAIL 
 PROTECTED]ricardo_engsoft%40yahoo.com.brmailto:
 ricardo_engsoft%40yahoo.com.br  escreveu:
 Vamos ver se a minha memória anda boa:

 Declare uma variável do tipo Integer e atribua o seguinte:

 Tamanho_Campo := Length(Pessoa.Nome);

 Se bem que eu acho que vai retornar o tamanho do conteúdo de uma instância
 de Pessoa...

 Atte,
 Ricardo.

 Celio Bernardo [EMAIL PROTECTED] celioblima%40yahoo.com.brmailto:
 celioblima%40yahoo.com.br  escreveu: Amigos tenho uma estrutura como

 Type TPessoas = record

 Nome : String[60];
 cpf : String[11];

 end.
 ...

 var
 Pessoa : TPessoas;

 Como é a sintaxe pra pegar o tamanho do campo:
 Exemplo: Pessoa.Nome o tamamho é 60.

 Obrigado

 Celio.

 -
 Célio Bernardo de Lima
 Diretor de Projetos e Novas Tecnologias
 siatech.com.br
 -

 -
 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]

 -
 Célio Bernardo de Lima
 Diretor de Projetos e Novas Tecnologias
 siatech.com.br
 -

 -
 Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
 armazenamento!

 [As partes desta mensagem que não continham texto foram removidas]

 [As partes desta mensagem que não continham texto foram removidas]

 -
 Célio Bernardo de Lima
 Diretor de Projetos e Novas Tecnologias
 siatech.com.br
 -

 -
 Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
 armazenamento!

 [As partes desta mensagem que não continham texto foram removidas]

 [As partes desta mensagem que não continham texto foram removidas]

 [As partes desta mensagem que não continham texto foram removidas]

  




-- 
TFA,
Leslyn Fernandes
55-11-9159-3837
Computer Engineer
Integra Solutions

Imagination is more important than knowledge.
 - Albert Einstein


[As partes desta mensagem que não continham texto foram removidas]