Re: [delphi-br] Campos Auto-incremento e dbExpress

2008-09-30 Por tôpico Jackson Gomes - ToolsComps
 Estou usando umas tabelas Firebird, acessando pelo dbExpress...
 Passei o valor -1 para o campo  no before post (lí algum tempo atrás que
 fazendo-se isso burlava-se o required, e o banco criaria o
 auto-incremento pois não poderia ser numero negativo...), e não
 funcionou... alguem me dá uma luz, pls?

Como vc usa auto incremento no FB? Eu uso via Generator e funciona legal com o 
esquema do -1 (eu uso 0, mas tanto faz).

CREATE GENERATOR G_ADICIONAL_ID_ADICIONAL;

CREATE TRIGGER T_ADICIONAL_ID_ADICIONAL FOR ADICIONAL
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
  NEW.id_adicional = GEN_ID(g_adicional_id_adicional,1);
END

Após o ApplyUpdates eu dou um refresh no registro e o novo ID aparece na 
aplicação.

Jackson Gomes
ToolsComps - Controle de Usuários para Desenvolvedores 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 Delphi
http://www.devhost.com.br
[EMAIL PROTECTED]





[delphi-br] Remover tags de formatação do Wptools

2008-09-30 Por tôpico Berdam

galera, estou com um probleminha aqui chato de resolver, eu uso o componente 
wptools, e guardo no banco de dados toda a formatação, acontece que estou 
precisando exportar para o word esses dados.

Eu fiz o seguinte, coloquei um comonente twprichText, jogo o campo do 
clientdataset no twprichText, aqui que me ocorre o problema, já tentei copiar 
para o clibpoard, 
mas acontece que todas aquelas tags de formatação do twprichText são gravadas 
junto.


Alguém tem alguma idéia de como pode ser resolvido isso??

Uberdam Cavaletti
Formado em Tecnologia da Informação - Unoesc - Xxe
Pós-graduado em desenvolvimento Java - Unoesc - Xxe

 http://www.curricular.com.br/berdam

Visite
http://passandoveneno.blogspot.com




  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

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



[delphi-br] URGENTE: Autenticação no GMAIL para envio de e-mail

2008-09-30 Por tôpico Jorge Ericsson
Olá amigos,

Alguém já conseguiu enviar e-mail autenticado usando uma conta do GMAIL ?

Eu tentei vários exemplos pesquisados na REDE com Indy 10 e não consegui´.

Ao meu ver o código está correto e desconfio que a minha rede
(trabalho) está bloqueando a saída.

Alguém que já passou por isso, poderia dá uma Luz.

Obrigado amigos

procedure TForm1.Button1Click(Sender: TObject);
begin
  with MSG do
  begin
Body.Add(Memo1.Text);
From.Address := Edit2.Text;
From.Name:= 'Siger Suporte'; //opcional
Recipients.Add;
Recipients.Items[0].Address := Edit1.Text;//'[EMAIL PROTECTED]';
Recipients.Items[0].Name:= 'Atendimento On-Line';
Subject := 'Suporte Técnico';
  end;
  try
SMTP.Connect();
SMTP.Send(MSG);
SMTP.Disconnect;
  except
   on E : Exception do
   begin
ShowMessage('Falha no envio!'+E.Message);
exit;
   end;
  end;
  ShowMessage('Mensagem enviada com sucesso!');
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  with SMTP do
  begin
AuthType := atSASL; (já mudei para Default e deu o mesmo erro.
Host := 'smtp.gmail.com';
IOHandler:= SSLSocket;
Password := '123456789';
Port := StrToInt(Edit3.Text);// 995;
Username := '[EMAIL PROTECTED]';
  end;
  SSLSocket.SSLOptions.Method := sslvSSLv2;
  SSLSocket.SSLOptions.Mode   := sslmClient;
end;


-- 
Att,

Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsson.com.br
61 9227.4785 / 3967.6172
Brasília - DF


Re: RES: [delphi-br] Qual melhor gerador de relat órios free?

2008-09-30 Por tôpico Ricardo César Cardoso
Eu sugiro o Report Manager; é free e tem muitos recursos.

--- Em ter, 30/9/08, Coutinho - Yahoo [EMAIL PROTECTED] escreveu:
De: Coutinho - Yahoo [EMAIL PROTECTED]
Assunto: Re: RES: [delphi-br] Qual melhor gerador de relatórios free?
Para: delphi-br@yahoogrupos.com.br
Data: Terça-feira, 30 de Setembro de 2008, 0:41

Também uso o Fortes Reports e Gosto demais!!!

Luciano Topolniak escreveu:

 Fortes report é muito bom.

 http://www.google.com.br/search?hl=pt-BR 
 http://www.google.com.br/search?hl=pt-BR

http://www.google.com.br/search?hl=pt-BRq=fortes+reportbtnG=Pesquisa+Goog


http://www.google.com.br/search?hl=pt-BRq=fortes+reportbtnG=Pesquisa+Goog
 lemeta q=fortes+reportbtnG=Pesquisa+Googlemeta=

 []’s

 Topolniak.

 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 TI - METALURGICA JANO
 Enviada em: segunda-feira, 29 de setembro de 2008 15:18
 Para: delphi-br@yahoogrupos.com.br
mailto:delphi-br%40yahoogrupos.com.br
 Assunto: [delphi-br] Qual melhor gerador de relatórios free?

 Gostaria de saber qual o melhor gerador de relatórios gratuito,

 Que envie email, e exporte para excell,pdf e etc...



  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

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



[delphi-br] Pacote de componentes

2008-09-30 Por tôpico A.Fernando Oliveira
Ola pessoal,

Saudações a todos


Gostaria de saber se alguem possui, conhece, já usou ou ouviu falarde
de um pacote de componentes chamado MULTIDADOS.

Procuro por uma unit chamada MultiDBTreeView.pas que faz parte desse
pacote de componentes.

Caso alguem possua ou já tenha ouvido falar, por favor me passem
alguma informação sobre ele pois estou precisando dessa unit para
colocar pra funcionar um sistema bomba que ganhei de presente no
trabalho.

Um grande abraço a todos.



Re: RES: [delphi-br] Qual melhor gerador de relatórios free?

2008-09-30 Por tôpico Leonardo Quinino
Analiso o Fortes ou o Report Manager, da seguinte ótica:

Escolher o melhor dependerá do foco do usuário final
Por Exemplo, se você quer impressão MATRICIAL, o Fortes é campeão, os
outros também oferecem este recurso, mas nada prático (para esta finalidade)
quanto o Fortes.

   Caso, não seja esse o foco, há outros modelos melhores que o Fortes.



2008/9/30 Ricardo César Cardoso [EMAIL PROTECTED]

   Eu sugiro o Report Manager; é free e tem muitos recursos.

 --- Em ter, 30/9/08, Coutinho - Yahoo [EMAIL 
 PROTECTED]emanuelcoutinho%40yahoo.com.br
 escreveu:
 De: Coutinho - Yahoo [EMAIL PROTECTED]emanuelcoutinho%40yahoo.com.br
 
 Assunto: Re: RES: [delphi-br] Qual melhor gerador de relatórios free?

 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Data: Terça-feira, 30 de Setembro de 2008, 0:41

 Também uso o Fortes Reports e Gosto demais!!!

 Luciano Topolniak escreveu:
 
  Fortes report é muito bom.
 
  http://www.google.com.br/search?hl=pt-BR
  http://www.google.com.br/search?hl=pt-BR
 
 
 http://www.google.com.br/search?hl=pt-BRq=fortes+reportbtnG=Pesquisa+Goog

 
 
 http://www.google.com.br/search?hl=pt-BRq=fortes+reportbtnG=Pesquisa+Goog
 
  lemeta q=fortes+reportbtnG=Pesquisa+Googlemeta=
 
  []'s
 
  Topolniak.
 
  De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
  mailto:delphi-br%40yahoogrupos.com.brdelphi-br%2540yahoogrupos.com.br

  [mailto:delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
  mailto:delphi-br%40yahoogrupos.com.brdelphi-br%2540yahoogrupos.com.br]
 Em
  nome de TI - METALURGICA JANO
  Enviada em: segunda-feira, 29 de setembro de 2008 15:18
  Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 mailto:delphi-br%40yahoogrupos.com.br delphi-br%2540yahoogrupos.com.br
  Assunto: [delphi-br] Qual melhor gerador de relatórios free?
 
  Gostaria de saber qual o melhor gerador de relatórios gratuito,
 
  Que envie email, e exporte para excell,pdf e etc...

 Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua
 cara @ymail.com ou @rocketmail.com.
 http://br.new.mail.yahoo.com/addresses

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

  




-- 
Leonardo Quinino


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



Re: [delphi-br] Core Lab

2008-09-30 Por tôpico Valfrid-Ly Silva Couto
Jackson,

A pessoa que falou sobre o banimento, não é um dos moderadores da lista, mas 
ele está certo!!

A política da lista tem sido banir, principalmente se o sujeito estiver 
moderado! Nesse caso, a mensagem nem chega na lista e o sujeito é banido!

Veja que, o próprio Yahoo! tem regras claras quanto a isso, então, se os 
moderadores deixassem correr solto, a lista poderia ser simplesmente excluída 
pelo Yahoo! sem aviso prévio!


--- Em seg, 29/9/08, Jackson Gomes - ToolsComps [EMAIL PROTECTED] escreveu:

 De: Jackson Gomes - ToolsComps [EMAIL PROTECTED]
 Assunto: Re: [delphi-br] Core Lab
 Para: delphi-br@yahoogrupos.com.br
 Data: Segunda-feira, 29 de Setembro de 2008, 11:42
  que pena foi banido.
  O cara num sabe nem ler as regras de uma lista, que
 ser programador, realmente 
  vou vender coco na praia que deve ter menos gente.
 
 Acho que não precisava banir de cara, mas uma advertência
 seria o ideal caso 
 seja a primeira vez...
 
 Jackson Gomes
 ToolsComps - Controle de Usuários para
 Desenvolvedores 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 Delphi
 http://www.devhost.com.br
 [EMAIL PROTECTED] 
 
 
 
 
 
 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER
 ESTA MENSAGEM 
 
 


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses


[delphi-br] Compactação de dll, bpl e executá veis

2008-09-30 Por tôpico Ricardo Lima
Olá pessoal!

Estou pensando em usar o AsPack para compactar as dll, bpl e executáveis 
do sistema, já vi que a redução do tamanho é muito grande.

Alguem sabe me informar se essa compactação prejudica de alguma forma a 
performance do carregamento ou execução do sistema?

Obrigado.

At.
Ricardo Lima


Re: [delphi-br] Compactação de dll, bpl e executáveis

2008-09-30 Por tôpico Jorge Ericsson
Olá Ricardo,

Não danifica em nada os arquivos !!!

Eu uso o AsPack a anos e nunca tive problemas, muito pelo contrário,
já tentei descompilar alguns sistemas depois de usar o AsPack e não
rolou de ver nenhum informação a respeito de forms e datamodules.

Talvez exista algum que faça isso, mas o Aspack por enquanto está me
ajudando e muito na diminuição dos meus sistemas.

Espero ter ajudado.


2008/9/30 Ricardo Lima [EMAIL PROTECTED]:
 Olá pessoal!

 Estou pensando em usar o AsPack para compactar as dll, bpl e executáveis
 do sistema, já vi que a redução do tamanho é muito grande.

 Alguem sabe me informar se essa compactação prejudica de alguma forma a
 performance do carregamento ou execução do sistema?

 Obrigado.

 At.
 Ricardo Lima

 



-- 
Att,

Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsson.com.br
61 9227.4785 / 3967.6172
Brasília - DF


Re: [delphi-br] Compactação de dll, bpl e exec utáveis

2008-09-30 Por tôpico Valfrid-Ly Silva Couto
Performance do carregamento ou mesmo de execução, não!!

Agora, eu nunca mais uso compactadores de executáveis!!

Procure no histórico da lista pois muito já se falou sobre isso!!


O Walter Chagas fez uma compilação de matérias e testemunhos sobre eles na 
página dele!!




--- Em ter, 30/9/08, Ricardo Lima [EMAIL PROTECTED] escreveu:

 De: Ricardo Lima [EMAIL PROTECTED]
 Assunto: [delphi-br] Compactação de dll, bpl e executáveis
 Para: delphi-br@yahoogrupos.com.br
 Data: Terça-feira, 30 de Setembro de 2008, 9:24
 Olá pessoal!
 
 Estou pensando em usar o AsPack para compactar as dll, bpl
 e executáveis 
 do sistema, já vi que a redução do tamanho é muito
 grande.
 
 Alguem sabe me informar se essa compactação prejudica de
 alguma forma a 
 performance do carregamento ou execução do sistema?
 
 Obrigado.
 
 At.
 Ricardo Lima
 
 
 
 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER
 ESTA MENSAGEM 
 
 


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses


Re: [delphi-br] nao consigo alterar o conteudo do DBEdit

2008-09-30 Por tôpico Felipe Milagres


ai galera.. demorei a responder pq to um pouco sem tempo ..
 
mas seguinte ...
 
a respeito de escrever no DBEdit, eu tava olhando a Query (Qvoto) q eu consigo 
mecher com a Query (Qarmazem2) que nao consigo mecher , e reparei que as 
propriedades  estavam diferentes . Na Qvoto, as propriedades RequestLive e 
UniDirectional estavam TRUE, entao eu fui e coloquei a mesma coisa na 
Qarmazem2 ...
 
e deu certo , nun deu mais aquele erro ... eu consigo numa boa escrever nos 
DBEdit's ...
 
mas como felicidade de pobre dura pouco ... quando eu mando salvar o conteudo 
dos DBEdit's , dá o seguinte erro:
 
Project SISRET.exe raised exception class EDBEngineError with message 'General 
SQL error. [Microsoft][ODBC SQL Server Driver][SQL Server] The view or function 
'dbo.VIEW18' is not updatable because the definition contains the TOP clause.'. 
Process stopped. Use Step ou Run to continue.
 
so pra completar .. o comando que eu usei para salvar é esse :
 
// esse aki ja existia
DMSISRET.Qvoto.edit;
DMSISRET.Qvoto.Post;
DMSISRET.Qvoto.Close;
DMSISRET.Qvoto.Open;
Pagecontrol1.Enabled := false;
Panel1.Enabled := false;
Edit1.Text := '';
 
// seguindo o mesmo exemplo do código que ja existia, eu fiz esse:
DMSISRET.Qarmazem2.edit;
DMSISRET.Qarmazem2.Post;
DMSISRET.Qarmazem2.Close;
DMSISRET.Qarmazem2.Open;
Panel3.Enabled := false;
Edit1.Text := '';
 
alguem sabe agora o que está errado ???
 
valeu a ajuda de todos ...
 
Felipe Milagres


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

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



Re: [delphi-br] Compactação de dll, b pl e executáveis

2008-09-30 Por tôpico Joao Morais
Ricardo Lima wrote:
 Olá pessoal!
 
 Estou pensando em usar o AsPack para compactar as dll, bpl e executáveis 
 do sistema, já vi que a redução do tamanho é muito grande.
 
 Alguem sabe me informar se essa compactação prejudica de alguma forma a 
 performance do carregamento ou execução do sistema?

Sim. O sistema operacional não tem como dispensar partes da aplicação 
que não estão em uso, portanto precisa manter todo o executável 
carregado na memória.

Pra fazer bonito, deixe o binário tal qual o Delphi te entrega e 
compacte apenas o seu instalador e seu atualizador. 1 gb de memória é 
muito mais cara do que 1 gb de HD.

--
Joao Morais


Re: [delphi-br] Campos Auto-incremento e dbExpress

2008-09-30 Por tôpico Coutinho - Yahoo
Colega...

Eu usei o termo auto-incremento, porquê o banco incrementa o valor da 
chave primária...
Claro que o banco cria um generator e um trigger... quando criei a 
estrutura do banco, ele fez isso automaticamente...
o problema está com o dbExpress...
Já ví alguns colegas reportarem isso antes, mas não consegui encontrar 
nas mensgens anteriores da lista...
lembrei do lance do valor -1 para o campo, para driblar o dbExpress... 
mas não funcionou...

Obrigado por qualquer ajuda que possa dar...

[]
Emanuel Coutinho

Jackson Gomes - ToolsComps escreveu:

  Estou usando umas tabelas Firebird, acessando pelo dbExpress...
  Passei o valor -1 para o campo no before post (lí algum tempo atrás que
  fazendo-se isso burlava-se o required, e o banco criaria o
  auto-incremento pois não poderia ser numero negativo...), e não
  funcionou... alguem me dá uma luz, pls?

 Como vc usa auto incremento no FB? Eu uso via Generator e funciona 
 legal com o
 esquema do -1 (eu uso 0, mas tanto faz).

 CREATE GENERATOR G_ADICIONAL_ID_ADICIONAL;

 CREATE TRIGGER T_ADICIONAL_ID_ADICIONAL FOR ADICIONAL
 ACTIVE BEFORE INSERT POSITION 0
 AS
 BEGIN
 NEW.id_adicional = GEN_ID(g_adicional_id_adicional,1);
 END

 Após o ApplyUpdates eu dou um refresh no registro e o novo ID aparece na
 aplicação.

 Jackson Gomes
 ToolsComps - Controle de Usuários para Desenvolvedores CodeGear
 Web Site: http://www.toolsandcomps.com http://www.toolsandcomps.com
 Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps 
 http://groups.yahoo.com/group/toolsandcomps
 e-mail: [EMAIL PROTECTED] mailto:jackson%40toolsandcomps.com
 Fone: 27 3389 1138 - 8811 0324
 --
 Devhost - Webhost para desenvolvedores Delphi
 http://www.devhost.com.br http://www.devhost.com.br
 [EMAIL PROTECTED] mailto:devhost%40devhost.com.br

  




[delphi-br] Saber qual campo está sendo editado

2008-09-30 Por tôpico Alisson
Quero fazer uma operação com dois campos em um DbGrid. Se o usuário editar o 
campo1, o valor do campo2 deve ser alterado e vice-versa. Como saber qual 
dos dois campos está sendo alterado? Estou usando campos calculados e o 
evento OnCalcFields. É o mais indicado para isso? 

__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 


Re: [delphi-br] Saber qual campo est� sendo editado

2008-09-30 Por tôpico Jackson Gomes - ToolsComps

 Quero fazer uma operação com dois campos em um DbGrid. Se o usuário editar o
 campo1, o valor do campo2 deve ser alterado e vice-versa. Como saber qual
 dos dois campos está sendo alterado? Estou usando campos calculados e o
 evento OnCalcFields. É o mais indicado para isso?

Tente o evento OnChange to TField...

Jackson Gomes
ToolsComps - Controle de Usuários para Desenvolvedores 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 Delphi
http://www.devhost.com.br
[EMAIL PROTECTED] 




[delphi-br] [Off] Agradecimentos a comunidade e comunicado

2008-09-30 Por tôpico Adriano Santos (Y!)
Olá pessoal,

Esse ano de 2008 tenho comemorado grandes vitórias. Uma delas foi 
alcançar meus 31 anos de vida no último dia 28 de Setembro. Também 
comemoro meus 10 anos de carreira no desenvolvimento de sistemas com 
Delphi. Tenho muito a agradecer a todos meus amigos, colegas de 
trabalho, familiares, antigos chefes e claro a comunidade Delphi que 
tanto me apoiou ao longo desses todos esses anos.

É com imenso prazer que informo a comunidade minha nova vitória. A 
partir de agora, sou Editor Chefe das revistas ClubeDelphi e WebMobile 
do grupo DevMedia. Todo o trabalho de edição, seleção de pauta, artigos 
e tudo que envolve diretamente ambas revistas estão sob a minha 
resposabilidade.

Espero poder cumprir meu novo papel com seriedade, respeito ao leitor e 
qualidade editorial.

Mais uma vez obrigado a todos e ao grupo DevMedia pela confiança.

Forte abraço

-- 
Boa Leitura,

Adriano Santos
Director X-35 Consulting  Development
IT Manager SoftPark
Chief Editor Magazines ClubeDelphi  WebMobile
www.delphitodelphi.blogspot.com
www.adrianosantos.pro.br
www.devmedia.com.br
www.dug-sp.com



Re: [delphi-br] duvida sobre querys

2008-09-30 Por tôpico Leonardo Baldino
query.addallfields;

esse exmplo ta um poco bizarro, mais não achei jeito melhor de
expressar o que estava precisando, gostaria que em tempo de execução
dependendo da tabela selecionada a query assuma os campos na hora, no
caso se eu do um OPEN ele assume os campos, mais necessito que esses
campos ainda fiquem na query mesmo depois do CLOSE, sendo substuido
apenas quando a tabela do selec for mudada e com isso assumindo os
novos campos



2008/9/29 Rubem Nascimento da Rocha [EMAIL PROTECTED]:

 Objetos TField ligados a um dataset que está consultando dados diretamente
 de um SGBD¹ devem, obrigatoriamente, ter seus respectivos campos fisicamente
 já definidos em tabelas do banco de dados. Para este tipo de dados, o máximo
 q vc pode fazer é criar um campo calculado (tipo fkCalculated) e definir um
 evento no seu formulário/data module para tratar tais campos. Mas a criação
 de campos calculados só deve acontecer com o dataset fechado. Procure que vc
 vai achar exemplos na Internet de como criar campos calculados.

 Agora, se o seu caso é criar campos temporários em um dataset, faça isso em
 um ClientDataSet, criando campos do tipo ftInternalCalc e configurando-os
 adequadamente para que, em uma atualização em um SGBD, as atualizações em
 tais campos não sejam aplicados ao banco de dados, pois tais campos no banco
 de dados realmente não existem. Se vc nunca usou ClientDataSet, eis uma boa
 oportunidade. Tem material a botão na Internet relacionado com este
 componente.

 Boa sorte.
 Sds.

 P.S.: (1) SGBD - Sistema Gerenciador de Banco de Dados

 
 To: delphi-br@yahoogrupos.com.br
 From: [EMAIL PROTECTED]
 Date: Mon, 29 Sep 2008 15:04:44 -0300
 Subject: [delphi-br] duvida sobre querys

 gostaria de saber se existe alguma maneira de eu inserir os campos de
 uma tabela numa query em tempo de execução

 --
 Leonardo Carlos Baldino - The Highlander

 __
 Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de
 relacionamentos com até 6,000 fotos!
 http://www.amigosdomessenger.com.br
 



-- 
Leonardo Carlos Baldino - The Highlander


RE: [delphi-br] duvida sobre querys

2008-09-30 Por tôpico Rubem Nascimento da Rocha


Tal método (AddAllFields) para definição de campos não existe!
Isto realmente é apenas mera especulação!

Se quiser que uma consulta tenha sempre todos os objetos TField criados de 
acordo com os campos que são retornados no SELECT, independente do que vc use 
como componente de consulta (TQuery, TADOQuery, TSQLQuery, etc.), o q vc tem 
que fazer é o seguinte:

1) Antes de abrir a consulta, criar uma outra consulta à parte que nao retorne 
registro algum, apenas os campos da consulta original;
2) Efetuar um open nessa outra consulta;
3) Para cada campo retornado dessa outra consulta, analisar o tipo de dados do 
mesmo e criar um objeto TField respectivo e adicioná-lo a lista de campos da 
consulta original.

Uma observação: dependendo do tipo de acesso q vc irá fazer (BDE, ADO/dbGo, 
dbExpres

A janela Fields Editor do IDE do Delphi já faz isso pra vc de bandeja. 
Portanto, em resumo, o q vc quer é fazer o trabalho do Fields Editor em tempo 
de execução. Teoricamente, o q vc tem que fazer é o que relatei nos passos 
anteriores. Não tenho exemplo disso, pois nunca tive necessidade de criar 
campos com esse nível de necessidade q vc tem.

Boa sorte.
Sds.



To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Tue, 30 Sep 2008 11:06:37 -0300
Subject: Re: [delphi-br] duvida sobre querys

query.addallfields;

esse exmplo ta um poco bizarro, mais não achei jeito melhor de
expressar o que estava precisando, gostaria que em tempo de execução
dependendo da tabela selecionada a query assuma os campos na hora, no
caso se eu do um OPEN ele assume os campos, mais necessito que esses
campos ainda fiquem na query mesmo depois do CLOSE, sendo substuido
apenas quando a tabela do selec for mudada e com isso assumindo os
novos campos

2008/9/29 Rubem Nascimento da Rocha [EMAIL PROTECTED]:

 Objetos TField ligados a um dataset que está consultando dados diretamente
 de um SGBD¹ devem, obrigatoriamente, ter seus respectivos campos fisicamente
 já definidos em tabelas do banco de dados. Para este tipo de dados, o máximo
 q vc pode fazer é criar um campo calculado (tipo fkCalculated) e definir um
 evento no seu formulário/data module para tratar tais campos. Mas a criação
 de campos calculados só deve acontecer com o dataset fechado. Procure que vc
 vai achar exemplos na Internet de como criar campos calculados.

 Agora, se o seu caso é criar campos temporários em um dataset, faça isso em
 um ClientDataSet, criando campos do tipo ftInternalCalc e configurando-os
 adequadamente para que, em uma atualização em um SGBD, as atualizações em
 tais campos não sejam aplicados ao banco de dados, pois tais campos no banco
 de dados realmente não existem. Se vc nunca usou ClientDataSet, eis uma boa
 oportunidade. Tem material a botão na Internet relacionado com este
 componente.

 Boa sorte.
 Sds.

 P.S.: (1) SGBD - Sistema Gerenciador de Banco de Dados

 
 To: delphi-br@yahoogrupos.com.br
 From: [EMAIL PROTECTED]
 Date: Mon, 29 Sep 2008 15:04:44 -0300
 Subject: [delphi-br] duvida sobre querys

 gostaria de saber se existe alguma maneira de eu inserir os campos de
 uma tabela numa query em tempo de execução

 --
 Leonardo Carlos Baldino - The Highlander

_
Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS para o 
Messenger! É GRÁTIS!
http://www.msn.com.br/emoticonpack

RE: [delphi-br] duvida sobre querys

2008-09-30 Por tôpico Rubem Nascimento da Rocha

Esqueci de terminar a observação que estava digitando!

Queria dizer que, dependendo do tipo de acesso q vc irá fazer (BDE, ADO/dbGo, 
dbExpress, etc.), pode ser que a referida camada de acesso introduza novas 
classes de objetos TField para peculiaridades e/ou funcionalidades que a camada 
de acesso forneça. Tem que prestar atenção nisso daí!

Fora isso... boa sorte!
Sds.


To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Tue, 30 Sep 2008 14:23:30 +
Subject: RE: [delphi-br] duvida sobre querys


Tal método (AddAllFields) para definição de campos não existe!
Isto realmente é apenas mera especulação!

Se quiser que uma consulta tenha sempre todos os objetos TField criados de 
acordo com os campos que são retornados no SELECT, independente do que vc use 
como componente de consulta (TQuery, TADOQuery, TSQLQuery, etc.), o q vc tem 
que fazer é o seguinte:

1) Antes de abrir a consulta, criar uma outra consulta à parte que nao retorne 
registro algum, apenas os campos da consulta original;
2) Efetuar um open nessa outra consulta;
3) Para cada campo retornado dessa outra consulta, analisar o tipo de dados do 
mesmo e criar um objeto TField respectivo e adicioná-lo a lista de campos da 
consulta original.

Uma observação: dependendo do tipo de acesso q vc irá fazer (BDE, ADO/dbGo, 
dbExpres

A janela Fields Editor do IDE do Delphi já faz isso pra vc de bandeja. 
Portanto, em resumo, o q vc quer é fazer o trabalho do Fields Editor em tempo 
de execução. Teoricamente, o q vc tem que fazer é o que relatei nos passos 
anteriores. Não tenho exemplo disso, pois nunca tive necessidade de criar 
campos com esse nível de necessidade q vc tem.

Boa sorte.
Sds.


To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Tue, 30 Sep 2008 11:06:37 -0300
Subject: Re: [delphi-br] duvida sobre querys

query.addallfields;

esse exmplo ta um poco bizarro, mais não achei jeito melhor de
expressar o que estava precisando, gostaria que em tempo de execução
dependendo da tabela selecionada a query assuma os campos na hora, no
caso se eu do um OPEN ele assume os campos, mais necessito que esses
campos ainda fiquem na query mesmo depois do CLOSE, sendo substuido
apenas quando a tabela do selec for mudada e com isso assumindo os
novos campos

2008/9/29 Rubem Nascimento da Rocha [EMAIL PROTECTED]:

 Objetos TField ligados a um dataset que está consultando dados diretamente
 de um SGBD¹ devem, obrigatoriamente, ter seus respectivos campos fisicamente
 já definidos em tabelas do banco de dados. Para este tipo de dados, o máximo
 q vc pode fazer é criar um campo calculado (tipo fkCalculated) e definir um
 evento no seu formulário/data module para tratar tais campos. Mas a criação
 de campos calculados só deve acontecer com o dataset fechado. Procure que vc
 vai achar exemplos na Internet de como criar campos calculados.

 Agora, se o seu caso é criar campos temporários em um dataset, faça isso em
 um ClientDataSet, criando campos do tipo ftInternalCalc e configurando-os
 adequadamente para que, em uma atualização em um SGBD, as atualizações em
 tais campos não sejam aplicados ao banco de dados, pois tais campos no banco
 de dados realmente não existem. Se vc nunca usou ClientDataSet, eis uma boa
 oportunidade. Tem material a botão na Internet relacionado com este
 componente.

 Boa sorte.
 Sds.

 P.S.: (1) SGBD - Sistema Gerenciador de Banco de Dados

 
 To: delphi-br@yahoogrupos.com.br
 From: [EMAIL PROTECTED]
 Date: Mon, 29 Sep 2008 15:04:44 -0300
 Subject: [delphi-br] duvida sobre querys

 gostaria de saber se existe alguma maneira de eu inserir os campos de
 uma tabela numa query em tempo de execução

 --
 Leonardo Carlos Baldino - The Highlander

_
Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas 
e muito mais no MSN Video!
http://video.msn.com/?mkt=pt-br

[delphi-br] Aggregate

2008-09-30 Por tôpico stainle2003
Quando termino de incluir um registro no DBGrid o meu campo Aggregate 
que até então estava aparecendo em um DBText desaparece, quando começo 
à digitar um novo registro ele aparece novamente, ou seja, só visualizo 
se estiver digitando dados ou quando saio do foco do DBGrid, como eu 
poderia fazer para que o resultado aparecesse sempre ?

grato

Stainle



Re: [delphi-br] Componente

2008-09-30 Por tôpico BandaLemuel
Lista

Aos poucos estou conseguindo... uma dúvida como altero o icone do 
componente... que esta aquele padrao do Delphi... ???

Wesley


From: BandaLemuel 
Sent: Monday, September 29, 2008 4:42 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Componente


Uma pergunta..

Como crio eventos que mostrem no object inpector... ???

Wesley

From: BandaLemuel 
Sent: Monday, September 29, 2008 3:03 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Componente

Pessoal

Achei a solução...

{ Mostra a tela de Configuração }
procedure TConfigbanco.MostraTelaConfiguracao;
begin
if FrmConfiguraBanco = nil then
begin
Application.CreateForm( TFrmConfiguraBanco , FrmConfiguraBanco );
FrmConfiguraBanco.ShowModal ;
end
else
FrmConfiguraBanco.ShowModal ;
end;

vlw...

Wesley

From: BandaLemuel 
Sent: Monday, September 29, 2008 2:53 PM
To: delphi-br@yahoogrupos.com.br 
Subject: [delphi-br] Componente

Lista

Estou criando um componente que vai ser responsavel por configurar o banco de 
dados do Cliente atraves de um arquivo ini, e neste componente quero colocar um 
formulario para a configuração , caso não consiga conexão... e esta dando erro 
quando ele vai puxar o formulario responsável pela configuração segue o codigo 
que chama o formulario

{ Mostra a tela de Configuração }
procedure TConfigbanco.MostraTelaConfiguracao;
var
Tela : TFrmConfiguraBanco ;
begin
if Tela = nil then
begin
Tela := TFrmConfiguraBanco.Create( nil );
Tela.ShowModal ;
end
else
Tela.ShowModal;
end;

O TFrmConfiguraBanco é um formulakrio que criei no componente, como devo 
chama-lo é assim mesmo ???

Obrigado...

Wesley

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

__ Information from ESET NOD32 Antivirus, version of virus signature 
database 3480 (20080929) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

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

__ Information from ESET NOD32 Antivirus, version of virus signature 
database 3480 (20080929) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

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



 

__ Information from ESET NOD32 Antivirus, version of virus signature 
database 3481 (20080929) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com


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



[delphi-br] Propriedade ReadOnly de DbEdit

2008-09-30 Por tôpico Alisson
Crio uns DbEdits em tempo de execução. Seto as propriedades Datasource e 
DataField, mas os componentes ficam sempre com a propriedade ReadOnly=True. 
Não adianta nem tentar mudar a propriedade, parece que o componente está sem 
as propriedades Datasource e DataField não configuradas. O que está 
faltando? 

__
Faça ligações para outros computadores com o novo Yahoo! Messenger 
http://br.beta.messenger.yahoo.com/ 


Res: [delphi-br] Compactação de dll, bpl e exe cutáveis

2008-09-30 Por tôpico Luciano Calenzani Simões
O link do texto do Walter Chagas é 
http://www.geocities.com/SiliconValley/Bay/1058/compexe.html

 Luciano Calenzani Simões





- Mensagem original 
De: Valfrid-Ly Silva Couto [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 30 de Setembro de 2008 9:31:43
Assunto: Re: [delphi-br] Compactação de dll, bpl e executáveis




O Walter Chagas fez uma compilação de matérias e testemunhos sobre eles na 
página dele!!


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

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



[delphi-br] Gerar E-mail para Microsoft Outlook

2008-09-30 Por tôpico ronaldo_elite
Bom dia Pessoal!

Alguém conhece alguma classe (ou maneira) para criar e-mails no formato 
do Microsoft Outlook? Para o Outlook Express eu já tenho, mas não 
me serve. 

Um abraço.

Ronaldo



[delphi-br] Dividir pdf em varias paginas

2008-09-30 Por tôpico Regis
 
Olá pessoal!
 
vcs conhecem alguma rotina q divide um pdf em varias paginas, tipo tenho um
pdf com 10 paginas e quero transformar em 10 arquivos pdf numerados de 1 a
10.
 
Obrigado a todos!

Benedito Regis de Oliveria Filho
 mailto:[EMAIL PROTECTED] [EMAIL PROTECTED]
Cel: (41) 91250864
 
Daysoft Serviços de Tecnologia Ltda.
http://www.daysoft.com.br/
R. Itacolomi, 450, CEP 81.070-150
Curitiba - PR
Tel: (41) 3246-7722

 


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



[delphi-br] MANUAL DO SAFENET COMPACT 500.

2008-09-30 Por tôpico Paulo Batalhão
Carissimos, Bom dia!


Alguem possui algum manual para o Campact-500 da SafeNet? Especificamente 
voltado para Delphi.


Obrigado e Aguardo!


Atenciosamente,
Paulo Rogerio Batalhão
Cogira Tecnologia
www.cogira.com.br / www.lojaeficiente.com.br


_
Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de relacionamentos 
com até 6,000 fotos!
http://www.amigosdomessenger.com.br

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



[delphi-br] erro sql help????????

2008-09-30 Por tôpico pena_rs
boa tarde pessoal, estou com um problema e ja fugiu do meu
conhecimento, é o seguinte, eu testo campos no meu cadastro de
produtos,pra ver se o mesmo ja nao existe, vou passar meu codigo:

ERRO:
multiple rows in singleton select at procedure MOV_PRODUTOS

PROCEDURE MOVIMENTA
procedure TFrmProdutos.Movimenta(VTipo:String; VCodigo:Integer;
VNome:String;Vordem:Integer);
begin
D_M.MOV_produtos.ParamByName('VTIPO').AsString:=VTipo;
D_M.MOV_produtos.ParamByName('VCODIGO').AsInteger:=VCodigo;
D_M.MOV_produtos.ParamByName('VNOME').AsString:=VNome;
D_M.MOV_produtos.ParamByName('VORDEM').AsInteger:=Vordem;
D_M.MOV_produtos.ExecProc;
end;


seguinte, eu teste se o produto ja existe com este nome
VPri:=D_M.Qprodutosproduto.AsString;
if ((VPri='') or (VPri=' ')) and not Bcancela.Focused
then Begin
MessageBeep(32);
MessageDlg('Produto Inválido',mtError,[mbOk],0);
DBNome.SetFocus;
exit;
end;
Movimenta('NOME',0,D_M.Qprodutosproduto.AsString,ORDEM);
VCRetorno:=D_M.MOV_produtos.ParamByName('RCODIGO').AsInteger;
VNRetorno:=D_M.MOV_produtos.ParamByName('RNOME').AsString;
if ((VCRetorno0) and (inclusao=1)) or ((inclusao=0) and (VCRetorno0)
and (VCRetornoD_M.QprodutosCodigo.AsInteger)) and not
Bcancela.Focused then begin
MessageBeep(32);
MessageDlg('Produto com este Nome já Existente'+#10#13+#10#13+
'Código - '+IntToStr(VCRetorno)+#10#13+
'Nome - '+VNRetorno,mtError,[mbOk],0);
if messagedlg('Confirme!',mtconfirmation,[mbyes,mbno],0)=mrNO
then begin
DBNome.SetFocus;
exit;
end;
end;

QUANDO VOU TESTAR OUTRO CAMPO É QUE DA O ERRO, MAS O INTERESSANTE QUE
DA O ERRO, SE EU CONFIRMO QUE JA EXISTE
VPri:=D_M.QprodutosReffab.AsString;
if ((VPri'') and (VPriand0) and (inclusao=1)) or ((inclusao=0) and
(VCRetorno0) and (VCRetornoD_M.QprodutosCodigo.AsInteger)) and not
Bcancela.Focused then begin
MessageBeep(32);
MessageDlg('Referência de Fábrica com este Código já
Existente'+#10#13+#10#13+
'Código - '+IntToStr(VCRetorno)+#10#13+
'Nome - '+VNRetorno,mtError,[mbOk],0);
if messagedlg('Confirme!',mtconfirmation,[mbyes,mbno],0)=mrNO
then begin
DBNome.SetFocus;
exit;
end;
end;


*PROCEDURE *

ELSE IF (:VTIPO='NOME') THEN
BEGIN
SELECT CODIGO,PRODUTO FROM PRODUTOS WHERE PRODUTO=:VNOME ORDER
BY PRODUTO INTO :RCODIGO,:RNOME;
SUSPEND;
END
ELSE IF (:VTIPO='REFFAB') THEN
BEGIN
SELECT CODIGO,PRODUTO FROM PRODUTOS WHERE REFFAB=:VNOME ORDER
BY REFFAB INTO :RCODIGO,:RNOME;
SUSPEND;
END



[delphi-br] erro sql help????????

2008-09-30 Por tôpico pena_rs
boa noite pessoal, estou com um problema e ja fugiu do meu
conhecimento, é o seguinte, eu testo campos no meu cadastro de
produtos,pra ver se o mesmo ja nao existe, vou passar meu codigo:

ERRO:
multiple rows in singleton select at procedure MOV_PRODUTOS

PROCEDURE MOVIMENTA
procedure TFrmProdutos.Movimenta(VTipo:String; VCodigo:Integer;
VNome:String;Vordem:Integer);
begin
D_M.MOV_produtos.ParamByName('VTIPO').AsString:=VTipo;
D_M.MOV_produtos.ParamByName('VCODIGO').AsInteger:=VCodigo;
D_M.MOV_produtos.ParamByName('VNOME').AsString:=VNome;
D_M.MOV_produtos.ParamByName('VORDEM').AsInteger:=Vordem;
D_M.MOV_produtos.ExecProc;
end;


seguinte, eu teste se o produto ja existe com este nome
VPri:=D_M.Qprodutosproduto.AsString;
if ((VPri='') or (VPri=' ')) and not Bcancela.Focused
then Begin
MessageBeep(32);
MessageDlg('Produto Inválido',mtError,[mbOk],0);
DBNome.SetFocus;
exit;
end;
Movimenta('NOME',0,D_M.Qprodutosproduto.AsString,ORDEM);
VCRetorno:=D_M.MOV_produtos.ParamByName('RCODIGO').AsInteger;
VNRetorno:=D_M.MOV_produtos.ParamByName('RNOME').AsString;
if ((VCRetorno0) and (inclusao=1)) or ((inclusao=0) and (VCRetorno0)
and (VCRetornoD_M.QprodutosCodigo.AsInteger)) and not
Bcancela.Focused then begin
MessageBeep(32);
MessageDlg('Produto com este Nome já Existente'+#10#13+#10#13+
'Código - '+IntToStr(VCRetorno)+#10#13+
'Nome - '+VNRetorno,mtError,[mbOk],0);
if messagedlg('Confirme!',mtconfirmation,[mbyes,mbno],0)=mrNO
then begin
DBNome.SetFocus;
exit;
end;
end;

QUANDO VOU TESTAR OUTRO CAMPO É QUE DA O ERRO, MAS O INTERESSANTE QUE
DA O ERRO, SE EU CONFIRMO QUE JA EXISTE
VPri:=D_M.QprodutosReffab.AsString;
if ((VPri'') and (VPriand0) and (inclusao=1)) or ((inclusao=0) and
(VCRetorno0) and (VCRetornoD_M.QprodutosCodigo.AsInteger)) and not
Bcancela.Focused then begin
MessageBeep(32);
MessageDlg('Referência de Fábrica com este Código já
Existente'+#10#13+#10#13+
'Código - '+IntToStr(VCRetorno)+#10#13+
'Nome - '+VNRetorno,mtError,[mbOk],0);
if messagedlg('Confirme!',mtconfirmation,[mbyes,mbno],0)=mrNO
then begin
DBNome.SetFocus;
exit;
end;
end;

ELSE IF (:VTIPO='NOME') THEN
BEGIN
SELECT CODIGO,PRODUTO FROM PRODUTOS WHERE PRODUTO=:VNOME ORDER
BY PRODUTO INTO :RCODIGO,:RNOME;
SUSPEND;
END
ELSE IF (:VTIPO='REFFAB') THEN
BEGIN
SELECT CODIGO,PRODUTO FROM PRODUTOS WHERE REFFAB=:VNOME ORDER
BY REFFAB INTO :RCODIGO,:RNOME;
SUSPEND;
END



Res: [delphi-br] Dividir pdf em varias paginas

2008-09-30 Por tôpico Luciano Calenzani Simões
O Adobe Acrobat faz isso, mas tem que comprar.

 Luciano Calenzani Simões





- Mensagem original 
De: Regis [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 30 de Setembro de 2008 9:36:38
Assunto: [delphi-br] Dividir pdf em varias paginas



Olá pessoal!

vcs conhecem alguma rotina q divide um pdf em varias paginas, tipo tenho um
pdf com 10 paginas e quero transformar em 10 arquivos pdf numerados de 1 a
10.

Obrigado a todos!


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

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



RE: [delphi-br] MANUAL DO SAFENET COMPACT 500.

2008-09-30 Por tôpico Rubem Nascimento da Rocha

Se vc adiquiriu o manual diretamente com a SafeNet, ele vêm em CD-ROM!
Sds.



To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Tue, 30 Sep 2008 17:21:14 +0300
Subject: [delphi-br] MANUAL DO SAFENET COMPACT 500.

Carissimos, Bom dia!

Alguem possui algum manual para o Campact-500 da SafeNet? Especificamente 
voltado para Delphi.

Obrigado e Aguardo!

Atenciosamente,
Paulo Rogerio Batalhão
Cogira Tecnologia
www.cogira.com.br / www.lojaeficiente.com.br

_
Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver 
offline. Conheça  o MSN Mobile!
http://mobile.live.com/signup/signup2.aspx?lc=pt-br

Re: [delphi-br] Componente

2008-09-30 Por tôpico BandaLemuel
Lista

Achei como fazer segue abaixo para quem não sabe...

Tem que criar um arquivo .dcr com o image editor, com um bitmap , o nome do 
bitmap tem que ser o nome do componente, no meu caso o componente chama 
TConfigbanco, coloquei o mesmo nome .. e salvei o arquivo com o nome do nome da 
Unit no diretorio do projeto.. e instalei o componente e pronto... !

Se alguem se interessar pelo componente eu mando... eu usei ela para 
configurar uma conexão com o banco de dados Firebird..ou Interbase... onde vc 
pode utilizar o IBDatabase ou ZConnection (Zeos) , caso ele não consiga 
conectar por alguma configuração ele abre uma tela de configuração para 
configurar o mesmo... e salva em um arquivo ini as configurações para conexões 
futuras...

Wesley


From: BandaLemuel 
Sent: Tuesday, September 30, 2008 1:30 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Componente


Lista

Aos poucos estou conseguindo... uma dúvida como altero o icone do componente... 
que esta aquele padrao do Delphi... ???

Wesley

From: BandaLemuel 
Sent: Monday, September 29, 2008 4:42 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Componente

Uma pergunta..

Como crio eventos que mostrem no object inpector... ???

Wesley

From: BandaLemuel 
Sent: Monday, September 29, 2008 3:03 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Componente

Pessoal

Achei a solução...

{ Mostra a tela de Configuração }
procedure TConfigbanco.MostraTelaConfiguracao;
begin
if FrmConfiguraBanco = nil then
begin
Application.CreateForm( TFrmConfiguraBanco , FrmConfiguraBanco );
FrmConfiguraBanco.ShowModal ;
end
else
FrmConfiguraBanco.ShowModal ;
end;

vlw...

Wesley

From: BandaLemuel 
Sent: Monday, September 29, 2008 2:53 PM
To: delphi-br@yahoogrupos.com.br 
Subject: [delphi-br] Componente

Lista

Estou criando um componente que vai ser responsavel por configurar o banco de 
dados do Cliente atraves de um arquivo ini, e neste componente quero colocar um 
formulario para a configuração , caso não consiga conexão... e esta dando erro 
quando ele vai puxar o formulario responsável pela configuração segue o codigo 
que chama o formulario

{ Mostra a tela de Configuração }
procedure TConfigbanco.MostraTelaConfiguracao;
var
Tela : TFrmConfiguraBanco ;
begin
if Tela = nil then
begin
Tela := TFrmConfiguraBanco.Create( nil );
Tela.ShowModal ;
end
else
Tela.ShowModal;
end;

O TFrmConfiguraBanco é um formulakrio que criei no componente, como devo 
chama-lo é assim mesmo ???

Obrigado...

Wesley

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

__ Information from ESET NOD32 Antivirus, version of virus signature 
database 3480 (20080929) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

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

__ Information from ESET NOD32 Antivirus, version of virus signature 
database 3480 (20080929) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

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

__ Information from ESET NOD32 Antivirus, version of virus signature 
database 3481 (20080929) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

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



 

__ Information from ESET NOD32 Antivirus, version of virus signature 
database 3481 (20080929) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com


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



Re: [delphi-br] URGENTE: Autenticação no GMAIL para envio de e-mail

2008-09-30 Por tôpico Onjahyr - GMAIL
E ae Jorge, blz?

vc colocou na pasta do system32 os dois arquivos de conexão?

Onjahyr

Jorge Ericsson escreveu:

 Olá amigos,

 Alguém já conseguiu enviar e-mail autenticado usando uma conta do GMAIL ?

 Eu tentei vários exemplos pesquisados na REDE com Indy 10 e não 
 consegui´.

 Ao meu ver o código está correto e desconfio que a minha rede
 (trabalho) está bloqueando a saída.

 Alguém que já passou por isso, poderia dá uma Luz.

 Obrigado amigos

 procedure TForm1.Button1Click(Sender: TObject);
 begin
 with MSG do
 begin
 Body.Add(Memo1.Text);
 From.Address := Edit2.Text;
 From.Name := 'Siger Suporte'; //opcional
 Recipients.Add;
 Recipients.Items[0].Address := Edit1.Text;//'[EMAIL PROTECTED] 
 mailto:%2F%2F%27shaokhann%40gmail.com';
 Recipients.Items[0].Name := 'Atendimento On-Line';
 Subject := 'Suporte Técnico';
 end;
 try
 SMTP.Connect();
 SMTP.Send(MSG);
 SMTP.Disconnect;
 except
 on E : Exception do
 begin
 ShowMessage('Falha no envio!'+E.Message);
 exit;
 end;
 end;
 ShowMessage('Mensagem enviada com sucesso!');
 end;

 procedure TForm1.FormCreate(Sender: TObject);
 begin
 with SMTP do
 begin
 AuthType := atSASL; (já mudei para Default e deu o mesmo erro.
 Host := 'smtp.gmail.com';
 IOHandler:= SSLSocket;
 Password := '123456789';
 Port := StrToInt(Edit3.Text);// 995;
 Username := '[EMAIL PROTECTED] mailto:%27meusuporte%40gmail.com';
 end;
 SSLSocket.SSLOptions.Method := sslvSSLv2;
 SSLSocket.SSLOptions.Mode := sslmClient;
 end;

 -- 
 Att,

 Jorge Ericsson S. Pinheiro
 Analista/Projetista de Sistemas
 Ericsson Sistemas e Soluções
 http://www.jericsson.com.br http://www.jericsson.com.br
 61 9227.4785 / 3967.6172
 Brasília - DF

  


Res: [delphi-br] Compactação de dll, bpl e exe cutáveis

2008-09-30 Por tôpico Silvio Clécio
Olá pessoal,
 
Bom, cada um com sua opinião, eu removo as Units da(s) clausula(s) uses (dá 
trabalho) que não serão utilizadas pelo projeto, tem delas que insere um monte 
de imagens BMP (através de arquivos *.res) dentre outras coisas, como strings, 
cursores, WAV's e etc.
Além disso, tem programas que você acessa parte do conteúdo do EXE, DLL enfim, 
como os XN Resource Editor e Resource Hacker, e em alguns casos eu não 
quero que alguém copie algo do meu digamos EXE.
Utilizo o software PECompact2 GUI (http://www.bitsum.com/), na maioria dos 
programas simples que eu desenvolvo uso o PECompact2 GUI com suas 
propriedades em default, mas em alguns casos eu modifico suas configurações.
É como o próprio Walter Chagas disse: ... E a polêmica começa a se arrastar 
pelos E-Mails, mas cabe ao colega analisar com calma, ver o motivo para a 
compactação e decidir qual ferramenta utilizar e que configuração usar nesta 
ferramenta se for usá-la.
Bom amigos, espero mesmo sem ter sido de um modo 'explícito' ter colaborado 
aqui na lista.
 
Um abraço a todos!
Silvio Clécio
- Mensagem original 
De: Ricardo Lima [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 30 de Setembro de 2008 9:24:07
Assunto: [delphi-br] Compactação de dll, bpl e executáveis


Olá pessoal!

Estou pensando em usar o AsPack para compactar as dll, bpl e executáveis 
do sistema, já vi que a redução do tamanho é muito grande.

Alguem sabe me informar se essa compactação prejudica de alguma forma a 
performance do carregamento ou execução do sistema?

Obrigado.

At.
Ricardo Lima
. 


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

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



[delphi-br] Restore com IBRestoreService

2008-09-30 Por tôpico valdirdill
Olá, 

Estou tendo problemas com restauração de arquivo de backup. 
Realizo o backup pelo componente IBBAckupService e a restauação é feito 
pelo componente IBRestoreService. 
Em alguns casos estou enfrentando um sério probloema: ao efetuar a 
restauração, o arquivo de original de dados é excluído e a restauração 
não ocorre. Contudo, no processo de restauração não acontece nenhum 
erro. Tudo normal. ´ 

Alguém já passou por algo parecido e tem alguma dica? 

Uso D7 e FB 2.0. 

Obrigado



Re: [delphi-br] Componente

2008-09-30 Por tôpico Luiz ESCobar
Weslery, veja na parte de arquivos do grupo, lá tem 2 componentes que 
desenvolvi THINT e TFOCUSCOLOR
O arquivo é esse...
http://f1.grp.yahoofs.com/v1/IGniSJSChna82FZVoQV5XKdNBUKDNXMrP9Ia9UORZN_T9o_gMw1x74D__pVvR_bgsgwkRUbpuDceuy7to2qErbGWaRRKCShybQ/Componentes%20com%20fontes/THINT%20and%20TFOCUSCOLOR.zip
a pasta é essa...
http://br.groups.yahoo.com/group/delphi-br/files/Componentes%20com%20fontes/

Vai te ajudar muito no seu componente...
Pra criar seu icone vc vai usar o IMAGE EDITOR que vem junto com o DELPHI e 
criar um DCR, abra o DCR que esta junto o nome da imagem criada dentro do DCR 
deve ser igual ao de seu componente, tipo TNOMECOMPONENTE tamanho de 
24x24x16cores, pelo menos até o D7 era assim, agora num sei mais.. hehehehe

espero q ajude...
[]s


Luiz Escobar - Analista/Desenvolvedor:
WEB - HTML/JavaScript/PHP/MySQL 
WINDOWS - Delphi/ASSEMBLY/MySQL/xBase
SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP
HARBOUR 
--
Borland C++ 5.5.1 (32 bit)
Harbour 1.0.0 Intl. (Rev. 9175) 
xHarbour Compile build 1.1.0 (Simplex)
Harbour MiniGUI 1.5 Extended Edition (Build 55) - 2008.08.26
---


From: BandaLemuel 
Sent: Tuesday, September 30, 2008 1:30 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Componente


Lista

Aos poucos estou conseguindo... uma dúvida como altero o icone do componente... 
que esta aquele padrao do Delphi... ???

Wesley

From: BandaLemuel 
Sent: Monday, September 29, 2008 4:42 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Componente

Uma pergunta..

Como crio eventos que mostrem no object inpector... ???

Wesley

From: BandaLemuel 
Sent: Monday, September 29, 2008 3:03 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Componente

Pessoal

Achei a solução...

{ Mostra a tela de Configuração }
procedure TConfigbanco.MostraTelaConfiguracao;
begin
if FrmConfiguraBanco = nil then
begin
Application.CreateForm( TFrmConfiguraBanco , FrmConfiguraBanco );
FrmConfiguraBanco.ShowModal ;
end
else
FrmConfiguraBanco.ShowModal ;
end;

vlw...

Wesley

From: BandaLemuel 
Sent: Monday, September 29, 2008 2:53 PM
To: delphi-br@yahoogrupos.com.br 
Subject: [delphi-br] Componente

Lista

Estou criando um componente que vai ser responsavel por configurar o banco de 
dados do Cliente atraves de um arquivo ini, e neste componente quero colocar um 
formulario para a configuração , caso não consiga conexão... e esta dando erro 
quando ele vai puxar o formulario responsável pela configuração segue o codigo 
que chama o formulario

{ Mostra a tela de Configuração }
procedure TConfigbanco.MostraTelaConfiguracao;
var
Tela : TFrmConfiguraBanco ;
begin
if Tela = nil then
begin
Tela := TFrmConfiguraBanco.Create( nil );
Tela.ShowModal ;
end
else
Tela.ShowModal;
end;

O TFrmConfiguraBanco é um formulakrio que criei no componente, como devo 
chama-lo é assim mesmo ???

Obrigado...

Wesley

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

__ Information from ESET NOD32 Antivirus, version of virus signature 
database 3480 (20080929) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

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

__ Information from ESET NOD32 Antivirus, version of virus signature 
database 3480 (20080929) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

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

__ Information from ESET NOD32 Antivirus, version of virus signature 
database 3481 (20080929) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.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] Componente

2008-09-30 Por tôpico BandaLemuel
Obrigado... Luiz... eu consegui vlw...


From: Luiz ESCobar 
Sent: Tuesday, September 30, 2008 4:01 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Componente


Weslery, veja na parte de arquivos do grupo, lá tem 2 componentes que 
desenvolvi THINT e TFOCUSCOLOR
O arquivo é esse...
http://f1.grp.yahoofs.com/v1/IGniSJSChna82FZVoQV5XKdNBUKDNXMrP9Ia9UORZN_T9o_gMw1x74D__pVvR_bgsgwkRUbpuDceuy7to2qErbGWaRRKCShybQ/Componentes%20com%20fontes/THINT%20and%20TFOCUSCOLOR.zip
a pasta é essa...
http://br.groups.yahoo.com/group/delphi-br/files/Componentes%20com%20fontes/

Vai te ajudar muito no seu componente...
Pra criar seu icone vc vai usar o IMAGE EDITOR que vem junto com o DELPHI e 
criar um DCR, abra o DCR que esta junto o nome da imagem criada dentro do DCR 
deve ser igual ao de seu componente, tipo TNOMECOMPONENTE tamanho de 
24x24x16cores, pelo menos até o D7 era assim, agora num sei mais.. hehehehe

espero q ajude...
[]s

Luiz Escobar - Analista/Desenvolvedor:
WEB - HTML/JavaScript/PHP/MySQL 
WINDOWS - Delphi/ASSEMBLY/MySQL/xBase
SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP
HARBOUR --
Borland C++ 5.5.1 (32 bit)
Harbour 1.0.0 Intl. (Rev. 9175) 
xHarbour Compile build 1.1.0 (Simplex)
Harbour MiniGUI 1.5 Extended Edition (Build 55) - 2008.08.26
--

From: BandaLemuel 
Sent: Tuesday, September 30, 2008 1:30 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Componente

Lista

Aos poucos estou conseguindo... uma dúvida como altero o icone do componente... 
que esta aquele padrao do Delphi... ???

Wesley

From: BandaLemuel 
Sent: Monday, September 29, 2008 4:42 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Componente

Uma pergunta..

Como crio eventos que mostrem no object inpector... ???

Wesley

From: BandaLemuel 
Sent: Monday, September 29, 2008 3:03 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Componente

Pessoal

Achei a solução...

{ Mostra a tela de Configuração }
procedure TConfigbanco.MostraTelaConfiguracao;
begin
if FrmConfiguraBanco = nil then
begin
Application.CreateForm( TFrmConfiguraBanco , FrmConfiguraBanco );
FrmConfiguraBanco.ShowModal ;
end
else
FrmConfiguraBanco.ShowModal ;
end;

vlw...

Wesley

From: BandaLemuel 
Sent: Monday, September 29, 2008 2:53 PM
To: delphi-br@yahoogrupos.com.br 
Subject: [delphi-br] Componente

Lista

Estou criando um componente que vai ser responsavel por configurar o banco de 
dados do Cliente atraves de um arquivo ini, e neste componente quero colocar um 
formulario para a configuração , caso não consiga conexão... e esta dando erro 
quando ele vai puxar o formulario responsável pela configuração segue o codigo 
que chama o formulario

{ Mostra a tela de Configuração }
procedure TConfigbanco.MostraTelaConfiguracao;
var
Tela : TFrmConfiguraBanco ;
begin
if Tela = nil then
begin
Tela := TFrmConfiguraBanco.Create( nil );
Tela.ShowModal ;
end
else
Tela.ShowModal;
end;

O TFrmConfiguraBanco é um formulakrio que criei no componente, como devo 
chama-lo é assim mesmo ???

Obrigado...

Wesley

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

__ Information from ESET NOD32 Antivirus, version of virus signature 
database 3480 (20080929) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

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

__ Information from ESET NOD32 Antivirus, version of virus signature 
database 3480 (20080929) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

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

__ Information from ESET NOD32 Antivirus, version of virus signature 
database 3481 (20080929) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com

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

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



 

__ Information from ESET NOD32 Antivirus, version of virus signature 
database 3481 (20080929) __

The message was checked by ESET NOD32 Antivirus.

http://www.eset.com


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



Re: [delphi-br] URGENTE: Autenticação no GMAIL para envio de e-mail

2008-09-30 Por tôpico Jorge Ericsson
Sim, tentei na pasta system32 e tbém local onde esta o executável.


2008/9/30 Onjahyr - GMAIL [EMAIL PROTECTED]:
 E ae Jorge, blz?

 vc colocou na pasta do system32 os dois arquivos de conexão?

 Onjahyr

 Jorge Ericsson escreveu:


 Olá amigos,

 Alguém já conseguiu enviar e-mail autenticado usando uma conta do GMAIL ?

 Eu tentei vários exemplos pesquisados na REDE com Indy 10 e não
 consegui´.

 Ao meu ver o código está correto e desconfio que a minha rede
 (trabalho) está bloqueando a saída.

 Alguém que já passou por isso, poderia dá uma Luz.

 Obrigado amigos

 procedure TForm1.Button1Click(Sender: TObject);
 begin
 with MSG do
 begin
 Body.Add(Memo1.Text);
 From.Address := Edit2.Text;
 From.Name := 'Siger Suporte'; //opcional
 Recipients.Add;
 Recipients.Items[0].Address := Edit1.Text;//'[EMAIL PROTECTED]
 mailto:%2F%2F%27shaokhann%40gmail.com';
 Recipients.Items[0].Name := 'Atendimento On-Line';
 Subject := 'Suporte Técnico';
 end;
 try
 SMTP.Connect();
 SMTP.Send(MSG);
 SMTP.Disconnect;
 except
 on E : Exception do
 begin
 ShowMessage('Falha no envio!'+E.Message);
 exit;
 end;
 end;
 ShowMessage('Mensagem enviada com sucesso!');
 end;

 procedure TForm1.FormCreate(Sender: TObject);
 begin
 with SMTP do
 begin
 AuthType := atSASL; (já mudei para Default e deu o mesmo erro.
 Host := 'smtp.gmail.com';
 IOHandler:= SSLSocket;
 Password := '123456789';
 Port := StrToInt(Edit3.Text);// 995;
 Username := '[EMAIL PROTECTED] mailto:%27meusuporte%40gmail.com';
 end;
 SSLSocket.SSLOptions.Method := sslvSSLv2;
 SSLSocket.SSLOptions.Mode := sslmClient;
 end;

 --
 Att,

 Jorge Ericsson S. Pinheiro
 Analista/Projetista de Sistemas
 Ericsson Sistemas e Soluções
 http://www.jericsson.com.br http://www.jericsson.com.br
 61 9227.4785 / 3967.6172
 Brasília - DF


 



-- 
Att,

Jorge Ericsson S. Pinheiro
Analista/Projetista de Sistemas
Ericsson Sistemas e Soluções
http://www.jericsson.com.br
61 9227.4785 / 3967.6172
Brasília - DF


[delphi-br] meio off - MIgração pro Vista - Core2duo

2008-09-30 Por tôpico sergio cavalcante
Pessoal,

Aqui na empresa vamos atualizar as máquinas e queria a opinião de vocês.
Temos em mente comprar Máquinas Core2Duo com 2Ghz de Ram. Pro XP tá ótimo.

Mas, pelo que vi, o XP não utiliza as maravilhas dos processadores
multinucleados.
Então, para isso, teríamos que utilizar o Vista, certo? no caso 2Ghz ficaria
pouco pro Vista,
para uma ótima performance. Então, compraríamos 4Ghz.

Então pergunto:

1 - Utilizando o Delphi 6, teríamos algum problema em rodar os aplicativos
compilados
no Vista, nos nossos clientes que usam XP e Win 2K? Tenho quase certeza que
não, mas,
só pra me assegurar. O Vista seria o 32 bits.

2 - Com esse service pack 3 do Win XP, ele já suporta esses
processadores?(me refiro a usar os recursos plenamente)

3 - Uma versão do Delphi mais atual utilizaria melhor esse benefício?

Muito obrigado para quem responder algo...

Atenciosamente,

Sérgio Cavalcante


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



[delphi-br] Duvidas com SpyPrinter

2008-09-30 Por tôpico Marcio
Galera, estou com um probleminha

Estou desenvolvendo um programa que controla a quantidade de impressões e
baixei o SpyPrinter. Ele está funcionando belezinha. So que a quantidade de
copias sempre aparece 0. O que pode ser?: Alguem já usou o spyPrinter? 

Aguardo uma ajuda...


Márcio C. Tenreiro

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



Re: [delphi-br] meio off - MIgração pro Vista - Core2duo

2008-09-30 Por tôpico Vinicius Santos - MSI
Até onde eu sei o XP, reconhece até 2 núcleos, em qualquer Service Pack.

Vinicius dos Santos
http://www.msisolucoes.com.br

  -Mensagem Original- 
  De: sergio cavalcante
  Para: [EMAIL PROTECTED] ; delphi-br@yahoogrupos.com.br
  Enviada em: terça-feira, 30 de setembro de 2008 16:50
  Assunto: [delphi-br] meio off - MIgração pro Vista - Core2duo


  Pessoal,

  Aqui na empresa vamos atualizar as máquinas e queria a opinião de vocês.
  Temos em mente comprar Máquinas Core2Duo com 2Ghz de Ram. Pro XP tá ótimo.

  Mas, pelo que vi, o XP não utiliza as maravilhas dos processadores
  multinucleados.
  Então, para isso, teríamos que utilizar o Vista, certo? no caso 2Ghz 
ficaria
  pouco pro Vista,
  para uma ótima performance. Então, compraríamos 4Ghz.

  Então pergunto:

  1 - Utilizando o Delphi 6, teríamos algum problema em rodar os aplicativos
  compilados
  no Vista, nos nossos clientes que usam XP e Win 2K? Tenho quase certeza 
que
  não, mas,
  só pra me assegurar. O Vista seria o 32 bits.

  2 - Com esse service pack 3 do Win XP, ele já suporta esses
  processadores?(me refiro a usar os recursos plenamente)

  3 - Uma versão do Delphi mais atual utilizaria melhor esse benefício?

  Muito obrigado para quem responder algo...

  Atenciosamente,
  
  Sérgio Cavalcante

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



  


--



  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com
  Version: 8.0.173 / Virus Database: 270.7.5/1698 - Release Date: 29/9/2008 
19:25


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



[delphi-br] Estágio - Delphi

2008-09-30 Por tôpico Alexandre
Vaga para Estágio Programador Delphi, região Oeste - SP(Capital), Bolsa Auxilio 
de R$600,00 + Transporte + Refeição.
Enviar currículo para [EMAIL PROTECTED]

Alexandre


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



Re: [delphi-br] meio off - MIgração pro Vista - Core2duo

2008-09-30 Por tôpico Luiz ESCobar
Tanto XP (SP3) como Vista, rodam, Core2Duo e Core2Quad.
POREM: processador não é tudo..
boas memórias (dual-channel) e um boa motherboard é excencial...
[]s


Luiz Escobar - Analista/Desenvolvedor:
WEB - HTML/JavaScript/PHP/MySQL 
WINDOWS - Delphi/ASSEMBLY/MySQL/xBase
SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP
HARBOUR 
--
Borland C++ 5.5.1 (32 bit)
Harbour 1.0.0 Intl. (Rev. 9175) 
xHarbour Compile build 1.1.0 (Simplex)
Harbour MiniGUI 1.5 Extended Edition (Build 55) - 2008.08.26
---




From: Vinicius Santos - MSI 
Sent: Tuesday, September 30, 2008 4:59 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] meio off - MIgração pro Vista - Core2duo


Até onde eu sei o XP, reconhece até 2 núcleos, em qualquer Service Pack.

Vinicius dos Santos
http://www.msisolucoes.com.br

-Mensagem Original- 
De: sergio cavalcante
Para: [EMAIL PROTECTED] ; delphi-br@yahoogrupos.com.br
Enviada em: terça-feira, 30 de setembro de 2008 16:50
Assunto: [delphi-br] meio off - MIgração pro Vista - Core2duo

Pessoal,

Aqui na empresa vamos atualizar as máquinas e queria a opinião de vocês.
Temos em mente comprar Máquinas Core2Duo com 2Ghz de Ram. Pro XP tá ótimo.

Mas, pelo que vi, o XP não utiliza as maravilhas dos processadores
multinucleados.
Então, para isso, teríamos que utilizar o Vista, certo? no caso 2Ghz 
ficaria
pouco pro Vista,
para uma ótima performance. Então, compraríamos 4Ghz.

Então pergunto:

1 - Utilizando o Delphi 6, teríamos algum problema em rodar os aplicativos
compilados
no Vista, nos nossos clientes que usam XP e Win 2K? Tenho quase certeza 
que
não, mas,
só pra me assegurar. O Vista seria o 32 bits.

2 - Com esse service pack 3 do Win XP, ele já suporta esses
processadores?(me refiro a usar os recursos plenamente)

3 - Uma versão do Delphi mais atual utilizaria melhor esse benefício?

Muito obrigado para quem responder algo...

Atenciosamente,

Sérgio Cavalcante

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

--

No virus found in this incoming message.
Checked by AVG - http://www.avg.com
Version: 8.0.173 / Virus Database: 270.7.5/1698 - Release Date: 29/9/2008 
19:25

[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] meio off - MIgração pro Vista - Core2duo

2008-09-30 Por tôpico sergio cavalcante
Valeu Vinicius e Escobar.

Vi no site da Microsoft um Paper que mostrava isso bacaninha.
Segue em anexo o arquivo


Sérgio Cavalcante

2008/9/30 Luiz ESCobar [EMAIL PROTECTED]

   Tanto XP (SP3) como Vista, rodam, Core2Duo e Core2Quad.
 POREM: processador não é tudo..
 boas memórias (dual-channel) e um boa motherboard é excencial...
 []s


 Luiz Escobar - Analista/Desenvolvedor:
 WEB - HTML/JavaScript/PHP/MySQL
 WINDOWS - Delphi/ASSEMBLY/MySQL/xBase
 SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP
 HARBOUR --
 Borland C++ 5.5.1 (32 bit)
 Harbour 1.0.0 Intl. (Rev. 9175)
 xHarbour Compile build 1.1.0 (Simplex)
 Harbour MiniGUI 1.5 Extended Edition (Build 55) - 2008.08.26
 --

 From: Vinicius Santos - MSI
 Sent: Tuesday, September 30, 2008 4:59 PM
 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Subject: Re: [delphi-br] meio off - MIgração pro Vista - Core2duo


 Até onde eu sei o XP, reconhece até 2 núcleos, em qualquer Service Pack.

 Vinicius dos Santos
 http://www.msisolucoes.com.br

 -Mensagem Original-
 De: sergio cavalcante
 Para: [EMAIL PROTECTED] NDDV%40yahoogrupos.com.br ;
 delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Enviada em: terça-feira, 30 de setembro de 2008 16:50
 Assunto: [delphi-br] meio off - MIgração pro Vista - Core2duo

 Pessoal,

 Aqui na empresa vamos atualizar as máquinas e queria a opinião de vocês.
 Temos em mente comprar Máquinas Core2Duo com 2Ghz de Ram. Pro XP tá ótimo.

 Mas, pelo que vi, o XP não utiliza as maravilhas dos processadores
 multinucleados.
 Então, para isso, teríamos que utilizar o Vista, certo? no caso 2Ghz
 ficaria
 pouco pro Vista,
 para uma ótima performance. Então, compraríamos 4Ghz.

 Então pergunto:

 1 - Utilizando o Delphi 6, teríamos algum problema em rodar os aplicativos
 compilados
 no Vista, nos nossos clientes que usam XP e Win 2K? Tenho quase certeza
 que
 não, mas,
 só pra me assegurar. O Vista seria o 32 bits.

 2 - Com esse service pack 3 do Win XP, ele já suporta esses
 processadores?(me refiro a usar os recursos plenamente)

 3 - Uma versão do Delphi mais atual utilizaria melhor esse benefício?

 Muito obrigado para quem responder algo...

 Atenciosamente,
 
 Sérgio Cavalcante

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

 --

 No virus found in this incoming message.
 Checked by AVG - http://www.avg.com
 Version: 8.0.173 / Virus Database: 270.7.5/1698 - Release Date: 29/9/2008
 19:25

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

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

  




-- 

Atenciosamente,
--
Sérgio Cavalcante
Mitros Tecnologia


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



Re: [delphi-br] Compactação de dll, bpl e executáveis

2008-09-30 Por tôpico Daniel Bastos
Utilizei muito até ter problemas.
Exatamente como o Walter diz no post dele :)

No mais, hoje em dia nem sei se é necessário. Pois se o problema é
distribuição, o algorítmo de compressão utilizado no Inno Setup e afins é
excelente.E pra proteger a área de resources .. se eu quiser acessar o
resource de algum exe, e não conseguir, a primeira coisa que iria tentar
seria descompactar com o AsPack ou o UPX.

2008/9/30 Silvio Clécio [EMAIL PROTECTED]

 Olá pessoal,

 Bom, cada um com sua opinião, eu removo as Units da(s) clausula(s) uses
 (dá trabalho) que não serão utilizadas pelo projeto, tem delas que insere um
 monte de imagens BMP (através de arquivos *.res) dentre outras coisas, como
 strings, cursores, WAV's e etc.
 Além disso, tem programas que você acessa parte do conteúdo do EXE, DLL
 enfim, como os XN Resource Editor e Resource Hacker, e em alguns casos
 eu não quero que alguém copie algo do meu digamos EXE.
 Utilizo o software PECompact2 GUI (http://www.bitsum.com/), na maioria
 dos programas simples que eu desenvolvo uso o PECompact2 GUI com suas
 propriedades em default, mas em alguns casos eu modifico suas configurações.
 É como o próprio Walter Chagas disse: ... E a polêmica começa a se
 arrastar pelos E-Mails, mas cabe ao colega analisar com calma, ver o motivo
 para a compactação e decidir qual ferramenta utilizar e que configuração
 usar nesta ferramenta se for usá-la.
 Bom amigos, espero mesmo sem ter sido de um modo 'explícito' ter colaborado
 aqui na lista.

 Um abraço a todos!
 Silvio Clécio
 - Mensagem original 
 De: Ricardo Lima [EMAIL PROTECTED]
 Para: delphi-br@yahoogrupos.com.br
 Enviadas: Terça-feira, 30 de Setembro de 2008 9:24:07
 Assunto: [delphi-br] Compactação de dll, bpl e executáveis


 Olá pessoal!

 Estou pensando em usar o AsPack para compactar as dll, bpl e executáveis
 do sistema, já vi que a redução do tamanho é muito grande.

 Alguem sabe me informar se essa compactação prejudica de alguma forma a
 performance do carregamento ou execução do sistema?

 Obrigado.

 At.
 Ricardo Lima
 .


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a
 sua cara @ymail.com ou @rocketmail.com.
 http://br.new.mail.yahoo.com/addresses

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


 

 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






-- 
Abs
Daniel A. Bastos


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



Re: [delphi-br] Compactação de dll, b pl e executáveis

2008-09-30 Por tôpico Adriano Santos (Y!)
Só pra dar mais um pitaco: sempre utilizei o UPX em DLL, EXE e BPL, 
nunca tive qualquer problema.
[]s

-- 
Boa Leitura,

Adriano Santos
Director X-35 Consulting  Development
IT Manager SoftPark
Chief Editor Magazines ClubeDelphi  WebMobile
www.delphitodelphi.blogspot.com
www.adrianosantos.pro.br
www.devmedia.com.br
www.dug-sp.com



Daniel Bastos respondeu:

 Utilizei muito até ter problemas.
 Exatamente como o Walter diz no post dele :)

 No mais, hoje em dia nem sei se é necessário. Pois se o problema é
 distribuição, o algorítmo de compressão utilizado no Inno Setup e afins é
 excelente.E pra proteger a área de resources .. se eu quiser acessar o
 resource de algum exe, e não conseguir, a primeira coisa que iria tentar
 seria descompactar com o AsPack ou o UPX.

 2008/9/30 Silvio Clécio [EMAIL PROTECTED] 
 mailto:silvioprog%40yahoo.com.br

  Olá pessoal,
 
  Bom, cada um com sua opinião, eu removo as Units da(s) clausula(s) 
 uses
  (dá trabalho) que não serão utilizadas pelo projeto, tem delas que 
 insere um
  monte de imagens BMP (através de arquivos *.res) dentre outras 
 coisas, como
  strings, cursores, WAV's e etc.
  Além disso, tem programas que você acessa parte do conteúdo do EXE, DLL
  enfim, como os XN Resource Editor e Resource Hacker, e em alguns 
 casos
  eu não quero que alguém copie algo do meu digamos EXE.
  Utilizo o software PECompact2 GUI (http://www.bitsum.com/ 
 http://www.bitsum.com/), na maioria
  dos programas simples que eu desenvolvo uso o PECompact2 GUI com suas
  propriedades em default, mas em alguns casos eu modifico suas 
 configurações.
  É como o próprio Walter Chagas disse: ... E a polêmica começa a se
  arrastar pelos E-Mails, mas cabe ao colega analisar com calma, ver 
 o motivo
  para a compactação e decidir qual ferramenta utilizar e que configuração
  usar nesta ferramenta se for usá-la.
  Bom amigos, espero mesmo sem ter sido de um modo 'explícito' ter 
 colaborado
  aqui na lista.
 
  Um abraço a todos!
  Silvio Clécio
  - Mensagem original 
  De: Ricardo Lima [EMAIL PROTECTED] mailto:rlmariz%40gmail.com
  Para: delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br
  Enviadas: Terça-feira, 30 de Setembro de 2008 9:24:07
  Assunto: [delphi-br] Compactação de dll, bpl e executáveis
 
 
  Olá pessoal!
 
  Estou pensando em usar o AsPack para compactar as dll, bpl e executáveis
  do sistema, já vi que a redução do tamanho é muito grande.
 
  Alguem sabe me informar se essa compactação prejudica de alguma forma a
  performance do carregamento ou execução do sistema?
 
  Obrigado.
 
  At.
  Ricardo Lima
  .
 
 
  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a
  sua cara @ymail.com ou @rocketmail.com.
  http://br.new.mail.yahoo.com/addresses 
 http://br.new.mail.yahoo.com/addresses
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
  
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 
 

 -- 
 Abs
 Daniel A. Bastos

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

 
 


 No virus found in this incoming message.
 Checked by AVG - http://www.avg.com 
 Version: 8.0.173 / Virus Database: 270.7.5/1700 - Release Date: 30/9/2008 
 11:03

   



Re: [delphi-br] Saber qual campo está sendo editado

2008-09-30 Por tôpico Coutinho - Yahoo
Allisson

Use a propriedade SelectedField do dbGrid... Aí vc seleciona o campo 
pelo nome dele...
Ou seja... vc testa o campo associado à coluna sendo eitada no grid!
Também pode pelas propriedade do objeto TColumn, tipo...   
dbgrid1.Columns.Items[x].FieldName... aí é só escolher...


Espero ter ajudado...

[]
Emanuel Coutinho


Alisson escreveu:

 Quero fazer uma operação com dois campos em um DbGrid. Se o usuário 
 editar o
 campo1, o valor do campo2 deve ser alterado e vice-versa. Como saber qual
 dos dois campos está sendo alterado? Estou usando campos calculados e o
 evento OnCalcFields. É o mais indicado para isso?

 __
 Faça ligações para outros computadores com o novo Yahoo! Messenger
 http://br.beta.messenger.yahoo.com/ http://br.beta.messenger.yahoo.com/

  




[delphi-br] Problema abertura form MDI

2008-09-30 Por tôpico leacarbonera2
E ai pessoal blz...
Seguinte tenho um sistema onde utilizo forms um form Principal como MDI 
e forms fsNormal, sendo que tenho um form padrao (frmDefault) que é do 
tipo fsNormal. A pedido de um cliente, alterie a propriedade FormStyle 
para MDIChild deste form padrao, mas não tivemos os resutlados 
esperados, ai resolvi voltar para fsNormal, porem agora todos os forms 
que são herdados do frmDefault não abrem mais, está aparecendo a 
mensagem Cannot make a visible window modal... oque eu faço



[delphi-br] Zerar campo Aggregate

2008-09-30 Por tôpico stainle2003
boa noite, estou tendo dificuldade com o campo aggregate,
tenho 3 CDS, os CDS1 e CDS2 tem campos aggregates e o CDS1 tem um 
campo internalcalc que soma os aggregates do CDS1 e CDS2, porém quando 
um dos CDS1 ou CDS2 não existir registros é somado ou um valor louco 
ou um valor do CDS anterior, gostaria de ZERAR o campo, como eu 
poderia fazer isto ???


grato

Stainle



Re: [delphi-br] meio off - MIgração pro Vista - Core2duo

2008-09-30 Por tôpico Luiz Escobar
anexo ? onde ? cade ? hehehhehe
acho melhor colocar o LINK.. acho q a lista nao aceita anexo.. ;-)
[]s


  - Original Message - 
  From: sergio cavalcante 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 30, 2008 5:46 PM
  Subject: Re: [delphi-br] meio off - MIgração pro Vista - Core2duo


  Valeu Vinicius e Escobar.

  Vi no site da Microsoft um Paper que mostrava isso bacaninha.
  Segue em anexo o arquivo

  
  Sérgio Cavalcante

  2008/9/30 Luiz ESCobar [EMAIL PROTECTED]

   Tanto XP (SP3) como Vista, rodam, Core2Duo e Core2Quad.
   POREM: processador não é tudo..
   boas memórias (dual-channel) e um boa motherboard é excencial...
   []s
  
  
   Luiz Escobar - Analista/Desenvolvedor:
   WEB - HTML/JavaScript/PHP/MySQL
   WINDOWS - Delphi/ASSEMBLY/MySQL/xBase
   SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP
   HARBOUR --
   Borland C++ 5.5.1 (32 bit)
   Harbour 1.0.0 Intl. (Rev. 9175)
   xHarbour Compile build 1.1.0 (Simplex)
   Harbour MiniGUI 1.5 Extended Edition (Build 55) - 2008.08.26
   --
  
   From: Vinicius Santos - MSI
   Sent: Tuesday, September 30, 2008 4:59 PM
   To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
   Subject: Re: [delphi-br] meio off - MIgração pro Vista - Core2duo
  
  
   Até onde eu sei o XP, reconhece até 2 núcleos, em qualquer Service Pack.
  
   Vinicius dos Santos
   http://www.msisolucoes.com.br
  
   -Mensagem Original-
   De: sergio cavalcante
   Para: [EMAIL PROTECTED] NDDV%40yahoogrupos.com.br ;
   delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
   Enviada em: terça-feira, 30 de setembro de 2008 16:50
   Assunto: [delphi-br] meio off - MIgração pro Vista - Core2duo
  
   Pessoal,
  
   Aqui na empresa vamos atualizar as máquinas e queria a opinião de vocês.
   Temos em mente comprar Máquinas Core2Duo com 2Ghz de Ram. Pro XP tá ótimo.
  
   Mas, pelo que vi, o XP não utiliza as maravilhas dos processadores
   multinucleados.
   Então, para isso, teríamos que utilizar o Vista, certo? no caso 2Ghz
   ficaria
   pouco pro Vista,
   para uma ótima performance. Então, compraríamos 4Ghz.
  
   Então pergunto:
  
   1 - Utilizando o Delphi 6, teríamos algum problema em rodar os aplicativos
   compilados
   no Vista, nos nossos clientes que usam XP e Win 2K? Tenho quase certeza
   que
   não, mas,
   só pra me assegurar. O Vista seria o 32 bits.
  
   2 - Com esse service pack 3 do Win XP, ele já suporta esses
   processadores?(me refiro a usar os recursos plenamente)
  
   3 - Uma versão do Delphi mais atual utilizaria melhor esse benefício?
  
   Muito obrigado para quem responder algo...
  
   Atenciosamente,
   
   Sérgio Cavalcante
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   --
  
   No virus found in this incoming message.
   Checked by AVG - http://www.avg.com
   Version: 8.0.173 / Virus Database: 270.7.5/1698 - Release Date: 29/9/2008
   19:25
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  -- 

  Atenciosamente,
  --
  Sérgio Cavalcante
  Mitros Tecnologia

  [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] Compactação de dll, b pl e executáveis

2008-09-30 Por tôpico Joao Morais
Adriano Santos (Y!) wrote:
 Só pra dar mais um pitaco: sempre utilizei o UPX em DLL, EXE e BPL, 
 nunca tive qualquer problema.

Pra tacar fogo na thread: com o preço e capacidade em que andam os HDs, 
você saberia dar um único motivo razoável para usar upx?

Joao Morais


Re: [delphi-br] Problema abertura form MDI

2008-09-30 Por tôpico Daniel Bastos
Essa mensagem aparece quando vc tenta dar um ShowModal em um formulário que
já está visível.
Verifique se por engano isso não aconteceu

2008/9/30 leacarbonera2 [EMAIL PROTECTED]

 E ai pessoal blz...
 Seguinte tenho um sistema onde utilizo forms um form Principal como MDI
 e forms fsNormal, sendo que tenho um form padrao (frmDefault) que é do
 tipo fsNormal. A pedido de um cliente, alterie a propriedade FormStyle
 para MDIChild deste form padrao, mas não tivemos os resutlados
 esperados, ai resolvi voltar para fsNormal, porem agora todos os forms
 que são herdados do frmDefault não abrem mais, está aparecendo a
 mensagem Cannot make a visible window modal... oque eu faço


 

 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






-- 
Abs
Daniel A. Bastos


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



Re: [delphi-br] Compactação de dll, b pl e executáveis

2008-09-30 Por tôpico Adriano Santos (Y!)
João Morais,

Não sei qual o nicho de mercado que trabalha e como são seus clientes em 
relação a tecnologia, mas te digo. Motivos tive de sobra.
Imagine um sistema dividido em 5 arquivos de 20 Mb cada. 20 Mb de 
executável é bem difícil de atualizar quando não se tem banda larga e o 
micros dos clientes são lixo. Pra quem trabalha modularizado com 
arquivos de 400 Kb a 1Mb, não vale a pena, porém o nicho de mercado que 
trabalhei até bem pouco tempo exigia isso. A palavra chave era 
distribuição. Algumas das últimas empresa que trabalhei possuiam 
clientes bem fracos em infra.

Falta de banda larga, usuários fracos de conhecimento e computadores 
sucateados. Pra nós que vivemos de tecnologia, pagar R$ 120,00, R$ 
300,00 num HD é ridículo. Recentemente montei uma estrutura de trabalho 
em casa que é show de bola. Não economizei. Mas tem cliente que não 
gasta R$ 1,00 em equipamento.

Uma das empresas que trabalhei tinha como clientes transportadoras. As 
mais fracas transportadoras. E acredite: tinha nego querendo trabalhar 
com Pentium 233, 333 e afins. Qdo muito compravam um micro mais novo 
para servidor pagando em 12x no Carrefour, porém as 
estaçõesah...prefiro não comentar.

O sistema? Começaram mal. O sistema foi muito mal estruturado e eram 5 
executáveis com 20Mb cada um. Convencer o cliente de baixar 100Mb por 
semana para atualizar o sistema dele era bem complicado.

Com UPX os módulos ficavam com 5Mb cada. Bem mais fácil fazer atualização.

Acho que tem mais de um motivo razoável ai né? rsrsrs
Pois é, trabalhar com gente que tem conciência de que precisa gastar 
dinheiro é fácil.

[]s

Adriano Santos


Joao Morais respondeu:

 Adriano Santos (Y!) wrote:
  Só pra dar mais um pitaco: sempre utilizei o UPX em DLL, EXE e BPL,
  nunca tive qualquer problema.

 Pra tacar fogo na thread: com o preço e capacidade em que andam os HDs,
 você saberia dar um único motivo razoável para usar upx?

 Joao Morais

  

-- 
Boa Leitura,

Adriano Santos
Director X-35 Consulting  Development
IT Manager SoftPark
Chief Editor Magazines ClubeDelphi  WebMobile
www.delphitodelphi.blogspot.com
www.adrianosantos.pro.br
www.devmedia.com.br
www.dug-sp.com



Re: [delphi-br] Compactação de dll, b pl e executáveis

2008-09-30 Por tôpico Joao Morais
Adriano Santos (Y!) wrote:
 Não sei qual o nicho de mercado que trabalha e como são seus clientes em 
 relação a tecnologia, mas te digo. Motivos tive de sobra.  snip
 Falta de banda larga, usuários fracos de conhecimento e computadores 
 sucateados. snip tem cliente que não 
 gasta R$ 1,00 em equipamento.  snip
 O sistema? Começaram mal. O sistema foi muito mal estruturado e eram 5 
 executáveis com 20Mb cada um. Convencer o cliente de baixar 100Mb por 
 semana para atualizar o sistema dele era bem complicado.
 
 Com UPX os módulos ficavam com 5Mb cada. Bem mais fácil fazer atualização.
 
 Acho que tem mais de um motivo razoável ai né? rsrsrs

Você citou um dos itens que eu costumo ouvir: atualização. O outro seria 
o clássico deixar o sistema enxuto.

O que coisas como UPX fazem é transformar um binário nativo em um 
embrulho com um pequeno gatilho na ponta. O gatilho abre o embrulho na 
memória e toma todo aquele espaço até que a aplicação seja fechada. Por 
outro lado uma aplicação nativa é dividida em páginas e o sistema 
operacional carrega apenas o que precisa, bloqueando o executável. Por 
este motivo você não consegue apagá-lo nem renomeá-lo. Na falta de 
memória, o que foi previamente carregado e está sem uso é descarregado 
para dar lugar a coisas mais importantes naquele momento. Quando alguma 
parte descarregada for necessária, é trazida diretamente do executável 
no disco.

No seu cenário, você poderia compactar no servidor e descompactar a 
atualização no cliente. Um bom algoritmo fará um trabalho melhor do que 
um upx porque não precisa adicionar o gatilho no pacote. E 1 gb de 
memória é muito mais caro do que 1 gb de HD.

Reconheço que existe ao menos uma aplicação para um compactador de 
executável: usar em demo de uma aplicação popular e que não precise de 
instalação. Mesmo assim, um .zip não faria mal pra ninguém. Agora, pra 
sistema em produção...

Joao Morais


Res: [delphi-br] Compactação de dll, bpl e exe cutáveis

2008-09-30 Por tôpico Silvio Clécio
Olá pessoal,
 
Se alguém descobrir o comentário que coloquei nas propriedades do EXE, abandono 
definitivamente o PECompact2 GUI!
Infelizmente não tenho um prêmio para oferecer, mas isso é só para descontrair 
um pouco, o arquivo Project1.res.zip está com o resource, não vale quebrar a 
senha deste arquivo, tem que pegar do EXE, rsrsrsrsrsr.
Pessoal, sei que o tempo da maioria de vocês é curto, só que o software faz 
algo (pessoalmente não sei o que é) que já tentei de todas as formas acessar a 
versão, WAV, BMP etc., de um EXE compactado por ele e não consegui, então mesmo 
consumindo alguns % a mais de memória, às vezes vale a pena usá-lo, caso queira 
proteger algo do resource.
Eu não compactei o ícone, somente a versão do EXE, onde tem um comentário X, 
compactei com senha o resource (Project1.res.zip) porque senão era só ver nele, 
vou esperara um tempo, se ninguém descobrir o suposto comentário, posto aqui a 
senha deste arquivo.
Apesar disso soar como [OFF TOPIC], acho que vai esclarecer a dúvida de muitos 
colegas, e minha intenção não é desafiar ninguém, quem sou eu para isso? Só 
quero saber se posso esconder meu resource em alguns casos.
O arquivo está disponível temporariamente para download no link: 
http://geocities.yahoo.com.br/silvioprog/Teste_com_PECompact2.zip
 
Um abraço a todos!
Silvio Clécio
 
- Mensagem original 
De: Daniel Bastos [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Terça-feira, 30 de Setembro de 2008 17:49:00
Assunto: Re: [delphi-br] Compactação de dll, bpl e executáveis


Utilizei muito até ter problemas.
Exatamente como o Walter diz no post dele :)

No mais, hoje em dia nem sei se é necessário. Pois se o problema é
distribuição, o algorítmo de compressão utilizado no Inno Setup e afins é
excelente.E pra proteger a área de resources .. se eu quiser acessar o
resource de algum exe, e não conseguir, a primeira coisa que iria tentar
seria descompactar com o AsPack ou o UPX.

2008/9/30 Silvio Clécio [EMAIL PROTECTED] com.br

 Olá pessoal,

 Bom, cada um com sua opinião, eu removo as Units da(s) clausula(s) uses
 (dá trabalho) que não serão utilizadas pelo projeto, tem delas que insere um
 monte de imagens BMP (através de arquivos *.res) dentre outras coisas, como
 strings, cursores, WAV's e etc.
 Além disso, tem programas que você acessa parte do conteúdo do EXE, DLL
 enfim, como os XN Resource Editor e Resource Hacker, e em alguns casos
 eu não quero que alguém copie algo do meu digamos EXE.
 Utilizo o software PECompact2 GUI (http://www.bitsum. com/), na maioria
 dos programas simples que eu desenvolvo uso o PECompact2 GUI com suas
 propriedades em default, mas em alguns casos eu modifico suas configurações.
 É como o próprio Walter Chagas disse: ... E a polêmica começa a se
 arrastar pelos E-Mails, mas cabe ao colega analisar com calma, ver o motivo
 para a compactação e decidir qual ferramenta utilizar e que configuração
 usar nesta ferramenta se for usá-la.
 Bom amigos, espero mesmo sem ter sido de um modo 'explícito' ter colaborado
 aqui na lista.

 Um abraço a todos!
 Silvio Clécio
 - Mensagem original 
 De: Ricardo Lima [EMAIL PROTECTED] com
 Para: [EMAIL PROTECTED] os.com.br
 Enviadas: Terça-feira, 30 de Setembro de 2008 9:24:07
 Assunto: [delphi-br] Compactação de dll, bpl e executáveis


 Olá pessoal!

 Estou pensando em usar o AsPack para compactar as dll, bpl e executáveis
 do sistema, já vi que a redução do tamanho é muito grande.

 Alguem sabe me informar se essa compactação prejudica de alguma forma a
 performance do carregamento ou execução do sistema?

 Obrigado.

 At.
 Ricardo Lima
. 


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

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



Re: [delphi-br] meio off - MIgração pro Vista - Core2duo

2008-09-30 Por tôpico Walter Chagas Jr (BOL)
E HD..

De nada adianta ter 2GB de memória e processador ultima geração se o HD for 
lento. Vira um gargalo que cê nem imagina...


[]s



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

  - Original Message - 
  From: Luiz ESCobar 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 30, 2008 5:25 PM
  Subject: Re: [delphi-br] meio off - MIgração pro Vista - Core2duo


  Tanto XP (SP3) como Vista, rodam, Core2Duo e Core2Quad.
  POREM: processador não é tudo..
  boas memórias (dual-channel) e um boa motherboard é excencial...
  []s

  Luiz Escobar - Analista/Desenvolvedor:
  WEB - HTML/JavaScript/PHP/MySQL 
  WINDOWS - Delphi/ASSEMBLY/MySQL/xBase
  SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP
  HARBOUR --
  Borland C++ 5.5.1 (32 bit)
  Harbour 1.0.0 Intl. (Rev. 9175) 
  xHarbour Compile build 1.1.0 (Simplex)
  Harbour MiniGUI 1.5 Extended Edition (Build 55) - 2008.08.26
  --

  From: Vinicius Santos - MSI 
  Sent: Tuesday, September 30, 2008 4:59 PM
  To: delphi-br@yahoogrupos.com.br 
  Subject: Re: [delphi-br] meio off - MIgração pro Vista - Core2duo

  Até onde eu sei o XP, reconhece até 2 núcleos, em qualquer Service Pack.

  Vinicius dos Santos
  http://www.msisolucoes.com.br

  -Mensagem Original- 
  De: sergio cavalcante
  Para: [EMAIL PROTECTED] ; delphi-br@yahoogrupos.com.br
  Enviada em: terça-feira, 30 de setembro de 2008 16:50
  Assunto: [delphi-br] meio off - MIgração pro Vista - Core2duo

  Pessoal,

  Aqui na empresa vamos atualizar as máquinas e queria a opinião de vocês.
  Temos em mente comprar Máquinas Core2Duo com 2Ghz de Ram. Pro XP tá ótimo.

  Mas, pelo que vi, o XP não utiliza as maravilhas dos processadores
  multinucleados.
  Então, para isso, teríamos que utilizar o Vista, certo? no caso 2Ghz 
  ficaria
  pouco pro Vista,
  para uma ótima performance. Então, compraríamos 4Ghz.

  Então pergunto:

  1 - Utilizando o Delphi 6, teríamos algum problema em rodar os aplicativos
  compilados
  no Vista, nos nossos clientes que usam XP e Win 2K? Tenho quase certeza 
  que
  não, mas,
  só pra me assegurar. O Vista seria o 32 bits.

  2 - Com esse service pack 3 do Win XP, ele já suporta esses
  processadores?(me refiro a usar os recursos plenamente)

  3 - Uma versão do Delphi mais atual utilizaria melhor esse benefício?

  Muito obrigado para quem responder algo...

  Atenciosamente,
  
  Sérgio Cavalcante

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

  --

  No virus found in this incoming message.
  Checked by AVG - http://www.avg.com
  Version: 8.0.173 / Virus Database: 270.7.5/1698 - Release Date: 29/9/2008 
  19:25

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

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



   

  __ Informação do ESET NOD32 Antivirus, versão da vacina 3484 
(20080930) __

  A mensagem foi verificada pelo ESET NOD32 Antivirus.

  http://www.eset.com


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



Re: [delphi-br] meio off - MIgração pro Vista - Core2duo

2008-09-30 Por tôpico Walter Chagas Jr (BOL)
poe o arquivo na seção de arquivos da lista ou manda o link do paper pra nós. A 
lista não permite anexos.


[]s



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

  - Original Message - 
  From: sergio cavalcante 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 30, 2008 5:46 PM
  Subject: Re: [delphi-br] meio off - MIgração pro Vista - Core2duo


  Valeu Vinicius e Escobar.

  Vi no site da Microsoft um Paper que mostrava isso bacaninha.
  Segue em anexo o arquivo

  
  Sérgio Cavalcante

  2008/9/30 Luiz ESCobar [EMAIL PROTECTED]

   Tanto XP (SP3) como Vista, rodam, Core2Duo e Core2Quad.
   POREM: processador não é tudo..
   boas memórias (dual-channel) e um boa motherboard é excencial...
   []s
  
  
   Luiz Escobar - Analista/Desenvolvedor:
   WEB - HTML/JavaScript/PHP/MySQL
   WINDOWS - Delphi/ASSEMBLY/MySQL/xBase
   SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP
   HARBOUR --
   Borland C++ 5.5.1 (32 bit)
   Harbour 1.0.0 Intl. (Rev. 9175)
   xHarbour Compile build 1.1.0 (Simplex)
   Harbour MiniGUI 1.5 Extended Edition (Build 55) - 2008.08.26
   --
  
   From: Vinicius Santos - MSI
   Sent: Tuesday, September 30, 2008 4:59 PM
   To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
   Subject: Re: [delphi-br] meio off - MIgração pro Vista - Core2duo
  
  
   Até onde eu sei o XP, reconhece até 2 núcleos, em qualquer Service Pack.
  
   Vinicius dos Santos
   http://www.msisolucoes.com.br
  
   -Mensagem Original-
   De: sergio cavalcante
   Para: [EMAIL PROTECTED] NDDV%40yahoogrupos.com.br ;
   delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
   Enviada em: terça-feira, 30 de setembro de 2008 16:50
   Assunto: [delphi-br] meio off - MIgração pro Vista - Core2duo
  
   Pessoal,
  
   Aqui na empresa vamos atualizar as máquinas e queria a opinião de vocês.
   Temos em mente comprar Máquinas Core2Duo com 2Ghz de Ram. Pro XP tá ótimo.
  
   Mas, pelo que vi, o XP não utiliza as maravilhas dos processadores
   multinucleados.
   Então, para isso, teríamos que utilizar o Vista, certo? no caso 2Ghz
   ficaria
   pouco pro Vista,
   para uma ótima performance. Então, compraríamos 4Ghz.
  
   Então pergunto:
  
   1 - Utilizando o Delphi 6, teríamos algum problema em rodar os aplicativos
   compilados
   no Vista, nos nossos clientes que usam XP e Win 2K? Tenho quase certeza
   que
   não, mas,
   só pra me assegurar. O Vista seria o 32 bits.
  
   2 - Com esse service pack 3 do Win XP, ele já suporta esses
   processadores?(me refiro a usar os recursos plenamente)
  
   3 - Uma versão do Delphi mais atual utilizaria melhor esse benefício?
  
   Muito obrigado para quem responder algo...
  
   Atenciosamente,
   
   Sérgio Cavalcante
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   --
  
   No virus found in this incoming message.
   Checked by AVG - http://www.avg.com
   Version: 8.0.173 / Virus Database: 270.7.5/1698 - Release Date: 29/9/2008
   19:25
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   [As partes desta mensagem que não continham texto foram removidas]
  
   
  

  -- 

  Atenciosamente,
  --
  Sérgio Cavalcante
  Mitros Tecnologia

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



   

  __ Informação do ESET NOD32 Antivirus, versão da vacina 3484 
(20080930) __

  A mensagem foi verificada pelo ESET NOD32 Antivirus.

  http://www.eset.com


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



Re: [delphi-br] Compactação de dll, b pl e executáveis

2008-09-30 Por tôpico Adriano Santos (Y!)
João,

Concordo em gênero e número contigo. Sei muito bem como funcionam o 
UPX,VirtualCompress e o AsPack.
Meu principal problema onde trabalhei, como mencionei, era distribuição 
do sistema e os usuários que eram bem ruins. Descompactar um arquivo 
.zip, vixi...era o maior trabalho cara. Então, quando entrei na empresa 
estavam usando esse método. Compactavam com UPX e enviavam ao servidor FTP.
Assim o cliente baixava e jogava direto na pasta do executável original 
com orientação do suporte técnico. A média de escolaridade de nossos 
usuários era em torno da 4° série, sem brincadeira. Gente que não 
conseguia fazer nada além das atribuições do dia-a-dia. Havia uma 
dificuldade muito grande em termos de utilização do computador no geral.

Antes de sair da empresa desenvolvi o esquema de atualização que 
mantinha o executável atualizado alocado dentro do banco de dados e o 
sistema sozinho fazia a conferencia. Se o executável local fosse mais 
velho que o que estava no servidor (SGBD), copiava de lá. Caso 
contrário, atualizada o servidor.

Fiz outro sistema para atualizar sozinho da internet, ai acabaram 95% 
dos problemas de atualização. O próximo passo seria diminuir a 
quantidade de componentes de terceiro para, consequentemente, diminuir o 
tamanho dos executáveis.

Ai, sai da empresa.

Adriano Santos

Joao Morais respondeu:

 Adriano Santos (Y!) wrote:
  Não sei qual o nicho de mercado que trabalha e como são seus 
 clientes em
  relação a tecnologia, mas te digo. Motivos tive de sobra. snip
  Falta de banda larga, usuários fracos de conhecimento e computadores
  sucateados. snip tem cliente que não
  gasta R$ 1,00 em equipamento. snip
  O sistema? Começaram mal. O sistema foi muito mal estruturado e eram 5
  executáveis com 20Mb cada um. Convencer o cliente de baixar 100Mb por
  semana para atualizar o sistema dele era bem complicado.
 
  Com UPX os módulos ficavam com 5Mb cada. Bem mais fácil fazer 
 atualização.
 
  Acho que tem mais de um motivo razoável ai né? rsrsrs

 Você citou um dos itens que eu costumo ouvir: atualização. O outro seria
 o clássico deixar o sistema enxuto.

 O que coisas como UPX fazem é transformar um binário nativo em um
 embrulho com um pequeno gatilho na ponta. O gatilho abre o embrulho na
 memória e toma todo aquele espaço até que a aplicação seja fechada. Por
 outro lado uma aplicação nativa é dividida em páginas e o sistema
 operacional carrega apenas o que precisa, bloqueando o executável. Por
 este motivo você não consegue apagá-lo nem renomeá-lo. Na falta de
 memória, o que foi previamente carregado e está sem uso é descarregado
 para dar lugar a coisas mais importantes naquele momento. Quando alguma
 parte descarregada for necessária, é trazida diretamente do executável
 no disco.

 No seu cenário, você poderia compactar no servidor e descompactar a
 atualização no cliente. Um bom algoritmo fará um trabalho melhor do que
 um upx porque não precisa adicionar o gatilho no pacote. E 1 gb de
 memória é muito mais caro do que 1 gb de HD.

 Reconheço que existe ao menos uma aplicação para um compactador de
 executável: usar em demo de uma aplicação popular e que não precise de
 instalação. Mesmo assim, um .zip não faria mal pra ninguém. Agora, pra
 sistema em produção...

 Joao Morais

  

-- 
Boa Leitura,

Adriano Santos
Director X-35 Consulting  Development
IT Manager SoftPark
Chief Editor Magazines ClubeDelphi  WebMobile
www.delphitodelphi.blogspot.com
www.adrianosantos.pro.br
www.devmedia.com.br
www.dug-sp.com



[delphi-br] Verificar se a tabela encontra-se vazia antes de abrir form

2008-09-30 Por tôpico Ricardo Mendes
Oi galera, 
Gostaria de uma sugestão..
Eu preciso verificar se algumas tabelas tem registro antes de abrir um 
determinado form...
Atualmente tenho todos os meus IBDataSet num data Modulo.estou tentando 
fazer o codigo abaixo...
Mas não está funcionando conforme eu quero...


  if not(DM.IBVendedor.Eof) then
  begin
 MessageDlg('Nenhum vendedor foi cadastrada ainda.'+#13+
#10+'Favor cadastrar vendedor para para continuar.', 
mtInformation, [mbOK], 0);
 Exit;
  end;

fico no aguardo de uma ajuda...
Obrigado...

Ricardo Mendes



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



Res: [delphi-br] Verificar se a tabela encontra-se vazia antes de abrir form

2008-09-30 Por tôpico Silvio Clécio
Olá pessoal,
 
Ricardo, tenta assim:
if DM.IBVendedor.IsEmpty then
  MessageDlg('Nenhum vendedor cadastrado.' + sLineBreak +
    'Por favor, cadastre um vendedor para para continuar.',
    mtInformation, [mbOK], 0);
 
Um abraço a todos!
Silvio Clécio
 
- Mensagem original 
De: Ricardo Mendes [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 1 de Outubro de 2008 0:48:05
Assunto: [delphi-br] Verificar se a tabela encontra-se vazia antes de abrir form


Oi galera, 
Gostaria de uma sugestão..
Eu preciso verificar se algumas tabelas tem registro antes de abrir um 
determinado form...
Atualmente tenho todos os meus IBDataSet num data Modulo.estou tentando 
fazer o codigo abaixo...
Mas não está funcionando conforme eu quero...

if not(DM.IBVendedor. Eof) then
begin
MessageDlg(' Nenhum vendedor foi cadastrada ainda.'+#13+
#10+'Favor cadastrar vendedor para para continuar.', mtInformation, [mbOK], 0);
Exit;
end;

fico no aguardo de uma ajuda...
Obrigado...

Ricardo Mendes
. 


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

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