RES: [delphi-br] Sobre Lázarus - Fellipe H

2007-03-05 Por tôpico Vitor Luiz Redes
Cara, como vocês viajam!

O Kylix não pegou porque não tem como, a culpa é da borland
porque o mundo não curte usar linux pra desktop cara? Da onde? O Lazarus é
legal, baixei, instalei, testei, mas sem chance de desenvolver nele, não tem
5% do que o delphi oferece, desenvolver comercialmente no lazarus, pra mim
não dá certo...

 

 

 

Vitor Luiz Redes

---

Msn: [EMAIL PROTECTED]

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Luis Lopes
Enviada em: segunda-feira, 5 de março de 2007 08:26
Para: delphi-br@yahoogrupos.com.br
Assunto: Res: [delphi-br] Sobre Lázarus - Fellipe H

 

Adreano,

Me desculpe, mas, se não existem 1000 desenvolvedores Kylix, a culpa é da
própria Borland, que lançou uma ferramente que não funciona. Cheia de bugs!
Ou vc acha que se o Delphi fosse assim teria mais de 5 milhões de
desenvolvedores?!

[]´s

Luis Alberto
Belo Horizonte - MG

- Mensagem original 
De: Andreano Lanusse [EMAIL PROTECTED] mailto:alanusse%40codegear.com
com
Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br;
[EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br
Enviadas: Segunda-feira, 5 de Março de 2007 1:48:36
Assunto: RE: [delphi-br] Sobre Lázarus - Fellipe H

Edilson,

sinceramente, nós da Borland somos os maiores interessados em ter
ferramentas para diversas linguagens, assim está sendo agora para PHP e será
para outras no futuro.

O que falamos de Kylix não é baseado em contra cheque, temos todos os
números do que passou com o Kylix, posso te dizer que tem mais de 5 milhões
de desenvolvedores Delphi no mundo e posso te afirmar que não existiram e
não existem 1000 de Kylix.

Então mobilizar toda uma empresa por um produto que os desenvolvedores no
mundo não se interessaram não faz sentido.

O fato de ter na lista 10, 20, 30, ... pessoas que usam não quer dizer que
existe milhões de pessoas.

A Borland é uma empresa séria, tão séria que todos aqui que usam Delphi,
talvez desde Delphi 1 vem tendo compatibilidade ano a ano, não tem que
refazer projeto para mudar de versão de Delphi.

Nós oferecemos suporte a .NET sim, porque os desenvolvedores precisam ter
suporte a essa tecnologia, tem desenvolvedores que não querem saber de .NET
e tem outros que não querem saber de Win32, então atendemos aos dois grupos.

Se você quer uma solução que roda em Linux, faça uma aplicação Web, pois
Desktop você vai perder dinheiro. Então você pode usar Java, nos temos o IDE
para Java que é o JBuilder, se não quer Java, temos agora Delphi para PHP
para desenvolver aplicações Web e faça o deploy da sua aplicação em Windows,
Linux, Solaris, Unix, AS/400.

[]'s

Andreano Lanusse | CodeGear Product Line Manager Latin America | phone.
+1-(831) 431-5051 | mobile. +1 (831) 332-5100
CodeGear
http://www.codegear http://www.codegear.com .com
http://www.codegear http://www.codegear.com .com Artigos:
http://dn.codegear. http://dn.codegear.com/br com/br http://dn.codegear.
http://dn.codegear.com/br com/br 
Blogs: http://blogs. http://blogs.codegear.com/andreanolanusse
codegear.com/andreanolanusse http://blogs.
http://blogs.codegear.com/andreanolanusse codegear.com/andreanolanusse 

-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

__
Fale com seus amigos de graça com o novo Yahoo! Messenger 
http://br.messenger http://br.messenger.yahoo.com/ .yahoo.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] StringGrid (CLX)

2007-01-22 Por tôpico Vitor Luiz Redes
Você pode usar um TClientDataSet virtual...
Crie os campos que precisa nele, para cria-lo para inserir dados, faça o 
seguinte:

if ClientDataSet.Active then
ClientDataSet.EmptyDataSet()
else
ClientDataSet.CreateDataSet();

A partir daqui, vc pode inserir seus dados tranquilamente, com Insert, 
Edit, Post, Delete, enfim... assim você pode usar DataAware sem problemas...


Vitor Luiz Redes
Analista de Sistemas
Redsystem Software / Bureau Software
Messenger: [EMAIL PROTECTED]

Phone: 3379-6939
Cel. Phone: 9677-8445

  - Original Message - 
  From: Romario (Listas) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Saturday, January 20, 2007 11:23 AM
  Subject: Re: [delphi-br] StringGrid (CLX)


  Ôxe! Eu adoraria se o princípio fosse o mesmo. (rsrs)

  No DBGrid você associa um campo da tabela à coluna onde quer que apareça 
  o CheckBox. No meu caso, não existe esse campo e nenhum dos outros 
  também. Entendeu porque preciso que seja uma StringGrid?

  Valeu pela força!

  Sds,

  Romario

  Marcos Douglas escreveu:
   
   Romario,
   
   Segue o link http://delphi.about.com/od/usedbvcl/l/aa082003a.htm 
   http://delphi.about.com/od/usedbvcl/l/aa082003a.htm
   Como eu não utilizo StringGrid pra nada, não posso garantir que vá 
   funcionar,
   pois o link é para DBGrid, mas é o mesmo princípio para qq outro componente.
   Veja que no final do link tb ensina adicionar um Combo, DBLookup, etc...
   
   PS: Pq vc não pode utilziar nenhum componente data-aware? Só não me diga que
   é pq o projeto é OO que vc tem que utilizar somente componentes no-aware,
   ok? ;)
   
   PS2: Obrigado pelo email contendo o componente. Vou dar uma testada.
   
   Abraços,
   --
   Marcos Douglas


  ___ 
  Yahoo! Mail - Sempre a melhor opção para você! 
  Experimente já e veja as novidades. 
  http://br.yahoo.com/mailbeta/tudonovo/ 


   


--


  Internal Virus Database is out-of-date.
  Checked by AVG Free Edition.
  Version: 7.1.410 / Virus Database: 268.16.7/620 - Release Date: 8/1/2007


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



Re: [delphi-br] PROBLEMA P DESTRUIR FORM

2007-01-18 Por tôpico Vitor Luiz Redes
Nunca trabalhei com MDI mas na teoria a forma de criação do formulário é 
diferente, ao invés de:
Formulario := TForm.Create(SELF);
é:
Formulario := TMdiChild.Create(Application);
ou coisa do tipo.

Atribuir NIL a uma variável que ainda não foi destruída não tem lógica, 
quando você for destrui-la, ela simplesmente não será encontrada.
O que você tem que ver ae, é se você está usando o ponteiro depois dele ser 
destruído, um exemplo é...

Form.ShowModal();
Form.FazerQualquerCoisa();

Aqui, quando você atribui Action := caFree no OnClose, ele destrói o 
formulário em questão, e na linha subsequente você tenta usa-lo novamente, isso 
vai causar um access violation.
Claro que no seu caso, isso pode nem existir, mas é um dica...


Vitor Luiz Redes
Analista de Sistemas
Redsystem Software / Bureau Software
Messenger: [EMAIL PROTECTED]

Phone: 3379-6939
Cel. Phone: 9677-8445

  - Original Message - 
  From: Fábio - CS Informatica 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, January 18, 2007 9:51 AM
  Subject: Re: [delphi-br] PROBLEMA P DESTRUIR FORM


  valeu galera pela força...

  - Original Message - 
  From: Renato Lorandi 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, January 18, 2007 8:21 AM
  Subject: Res: [delphi-br] PROBLEMA P DESTRUIR FORM

  amigo, tente acrescetar esta linha antes do action...

  nomedoform:=nil
  Action:=caFree;

  blz...

  - Mensagem original 
  De: Fábio - CS Informatica [EMAIL PROTECTED]
  Para: delphi-br@yahoogrupos.com.br
  Enviadas: Quarta-feira, 17 de Janeiro de 2007 19:15:49
  Assunto: [delphi-br] PROBLEMA P DESTRUIR FORM

  Olá colegas,

  estou migrando do D5 para o D7, só q estou com problemas qdo fecho o form,
  estou utilizando MDI, qdo tento destruir algum form aberto (MDIChild), 
utilizando
  a seguinte linha de código no Evento OnClose do form:

  Action:=caFree;

  até fecha o form, mais apresenta uma mensagem de Acess Violation at Adress 
004C81EA

  agradeço a atenção dos colegas...

  Fábio.

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

  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Links do Yahoo! Grupos

  __
  Fale com seus amigos de graça com o novo Yahoo! Messenger 
  http://br.messenger.yahoo.com/ 

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

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



   


--


  Internal Virus Database is out-of-date.
  Checked by AVG Free Edition.
  Version: 7.1.410 / Virus Database: 268.16.7/620 - Release Date: 8/1/2007


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



Re: [delphi-br] Re: DataSetProvider perde propriedade DataSet

2007-01-17 Por tôpico Vitor Luiz Redes
Provavelmente você deve ter DataSets em algum Data Module, ou em algum 
outro form do seu projeto, o que acontece é o seguinte:
Quando você chama o formulário, e o Data Module com o DataSet em questão 
não está criado, ele perde a referência simplesmente porque o objeto ainda não 
está criado.
Sempre que você for alterar, criar ect, novas coisas em seu projeto, abra 
os módulos de data antes de tudo, assim as referência não são perdidas.


Vitor Luiz Redes
Analista de Sistemas
Redsystem Software / Bureau Software
Messenger: [EMAIL PROTECTED]

Phone: 3379-6939
Cel. Phone: 9677-8445

  - Original Message - 
  From: thiagotosta 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 17, 2007 9:12 AM
  Subject: [delphi-br] Re: DataSetProvider perde propriedade DataSet


  Sim, essa é a saída. Mas eu gostaria de saber o motivo do problema. 
  Se seria o número de DSProviders no Remote.

  --- Em delphi-br@yahoogrupos.com.br, Dimas Fernando 
  [EMAIL PROTECTED] escreveu
  
   Aconteceu algo parecido comigo, porem utilizo IB OBJECTS.. as 
  vezes alguns
   componentes perdiam a referencia do DataSource (ficando vazios).. 
   no oncreate dos formularios onde isso aconteceu.. eu atribuia 
  novamente os DataSource 
   aos componentes.. 
   Nao tive mais problemas.. e o mais interessante..nao eram em todos 
  os componentes.. 
   so em alguns... 
   
   
   
   - Original Message - 
   From: thiagotosta 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Monday, January 15, 2007 9:26 AM
   Subject: [delphi-br] DataSetProvider perde propriedade DataSet
   
   
   Em uma aplicação multicamadas os DSProviders do Remote Data 
  Module 
   estão perdendo a propriedade DataSet (ficando vazia), obrigando 
  o 
   programador a atribuir as propriedades toda a vez que executa o 
   programa. Alguém já passou por um problema destes? O problema 
  poderia 
   estar ocorrendo pelo número de DSProviders do Remote (são 
  vrios na 
   aplicação)? Obrigado!
   
   
   
   
   
   
   --
  ---
   
   
   No virus found in this incoming message.
   Checked by AVG Free Edition.
   Version: 7.5.432 / Virus Database: 268.16.7/620 - Release Date: 
  8/1/2007 16:12
   
   
   [As partes desta mensagem que não continham texto foram removidas]
  



   


--


  Internal Virus Database is out-of-date.
  Checked by AVG Free Edition.
  Version: 7.1.410 / Virus Database: 268.16.7/620 - Release Date: 8/1/2007


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



Re: [delphi-br] Action Toolbar Editável pelo usuár io

2007-01-17 Por tôpico Vitor Luiz Redes
Tem um componente que chama customize dlg... na paleta Additional, você 
pode chamar o dialogo da sua aplicação e permitir que o usuário faça o que 
quiser, e salvar as configurações em um campo de um banco de dados, ou num 
arquivo ini mesmo...
Dê uma olhada no componente.


Vitor Luiz Redes
Analista de Sistemas
Redsystem Software / Bureau Software
Messenger: [EMAIL PROTECTED]

Phone: 3379-6939
Cel. Phone: 9677-8445

  - Original Message - 
  From: Leodinei Bielak 
  To: delphi-br 
  Sent: Wednesday, January 17, 2007 11:23 AM
  Subject: [delphi-br] Action Toolbar Editável pelo usuário


  Olá.
  Eu já vi um sistema que tinha a opção de mostrar o Editor de um
  ActionManager e permitia o usuário editar os icones da ActionToolbar.
  Alguém sabe como fazer isso?
  Tem outra maneira de permitir o usuário editar uma toolbar baseado em Actions?
  Valeu.

  -- 
  Leodinei Bielak

  In theory, there is no difference between theory and practice.

  In practice, however..


   


--


  Internal Virus Database is out-of-date.
  Checked by AVG Free Edition.
  Version: 7.1.410 / Virus Database: 268.16.7/620 - Release Date: 8/1/2007


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



Re: [delphi-br] Erro ao acessar Fire Bird

2006-11-28 Por tôpico Vitor Luiz Redes
Faça assim:

procedure blablabla;
var
VPar : String;
begin
VPar := 'PESSOA';
OnGetTableName( SELF, sds, VPar )
end;


Vitor Luiz Redes
Analista de Sistemas
Redsystem Software / Bureau Software
Messenger: [EMAIL PROTECTED]

Phone: 3379-6939
Cel. Phone: 9677-8445

  - Original Message - 
  From: Moked - Humberto (Brazil) 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, November 27, 2006 1:28 PM
  Subject: RES: [delphi-br] Erro ao acessar Fire Bird


  Pessoal, acho que o problema é que eu não defini no evento GetTablename do 
DataSetProvider o nome da tabela, porém não estou conseguindo passar via código 
os parâmetros para o evento GetTableName do Dsp. Segue abaixo a forma como eu 
tentei fazer:

  OnGetTableName (Self,sds,'PESSOA');

  O erro mostrado é: Constant object cannot be passed as var parameter.

  Obrigado.

  

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Moked - 
Humberto (Brazil)
  Enviada em: domingo, 26 de novembro de 2006 13:32
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Erro ao acessar Fire Bird

  Bem, estou tentando acessar o banco de dados somente criando os
  objetos via código. porém estou tendo alguma dificuldade, pois apesar
  de parecer estar tudo correto, da o seguinte erro: Missing data
  provider or data package

  Segue abaixo a minha procedure:

  procedure TCliente.ConectarBD;
  begin

  //Conectando ao banco de dados.
  FsdsCliente := TSQLDataSet.Create(FsdsCliente);
  FcdsCliente := TClientDataSet.Create(FcdsCliente);
  FdspCliente := TDataSetProvider.Create(FdspCliente);
  FdsCliente := TDataSource.Create(FdsCliente);

  FsdsCliente.Datasource := FdsCliente;
  FsdsCliente.SQLConnection := dm.scsisgel;
  FsdsCliente.CommandText := 'SELECT * FROM Cliente ' +
  'WHERE fl_ativo = 1';

  FdspCliente.DataSet := FsdsCliente;
  FcdsCliente.ProviderName := 'FdspCliente';
  FdsCliente.DataSet := FcdsCliente;

  FsdsCliente.Active := True;
  FcdsCliente.Active := True;

  FcdsCliente.Close;
  FcdsCliente.Open;
  FcdsCliente.First;
  //

  end;

  Alguém ai pode me ajudar? Thks.

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



   


--


  Internal Virus Database is out-of-date.
  Checked by AVG Free Edition.
  Version: 7.1.409 / Virus Database: 268.14.0/524 - Release Date: 8/11/2006


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



Re: [delphi-br] Problema com DevExpress

2006-01-12 Por tôpico Vitor Luiz Redes
Todas as suites de componentes da DevExpress, tem uma unit de constantes, 
os labels são preenchidos a partir dali, não lembro ao certo o nome da Unit, 
mas abra os pacotes e procure, dae é só traduzir as constantes...
  - Original Message - 
  From: Jônatas Renan 
  To: delphi-br@yahoogrupos.com.br ; [EMAIL PROTECTED] 
  Sent: Wednesday, January 11, 2006 7:24 PM
  Subject: [delphi-br] Problema com DevExpress


  Gostaria de saber se há a possibilidade de passar aquelas formulários pré
  compilados
  do DevExpress para portugues, supondo ao usar um Express Bars e colocar um
  componente
  TdxBarManager depois de compilado ele adiciona algumas interfaces para
  configuração de
  menu e para mostrar e esconder butões em tempo de Execução, no canto do seu
  menu
  aparece um botão que abre um popup onde aparece um botão Add and Remove
  Buttons
  e este botão abre uma interface parecida com a do Office para edição de menu
  e de botões
  estas interfaces podem ser traduzidas de alguma forma? muito obrigado a
  todos!

  --
  =
Jônatas Renan - Freaker
  MSN: [EMAIL PROTECTED]
  =


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






  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: RES: [delphi-br] Distribuir Form através de BPL

2005-12-14 Por tôpico Vitor Luiz Redes
Já fiz forms dentro das bpl´s herdarem forms de um projeto a parte... o 
único problema é q a visualização do form só é permitida se a bpl e o projeto 
estiverem no mesmo grupo de projetos...
Acho oque o contrário tb dá certo...
Tente adicionar o projeto, dpr, e a bpl em um mesmo grupo de projetos e 
faça o teste...
Agora se o cara não tiver acesso ao .pas e nem ao .dfm acho que só 
registrando a classe do seu form mesmo !
Vitor.

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Pegar o Nome do Componente

2005-12-12 Por tôpico Vitor Luiz Redes
if TPanel( Sender ).Color = clActiveBorder then
TPanel( Sender ).Color := clBlack
else
TPanel( Sender ).Color := clActiveBorder;

Vitor.

  - Original Message - 
  From: Gerson Thomaz Santos 
  To: Delphi-BR 
  Sent: Monday, December 12, 2005 6:59 PM
  Subject: [delphi-br] Pegar o Nome do Componente


  GeleiraCaros amigos,

  Creio que ja deve ter sido postado na lista, mas como eu ja procurei entra as 
mensagens antigas e não encontrei, 

  alguem sabe uma maneira bem simples de pegar o nome do componente que eu 
cliquei:

  O objetivo real é o seguinte:

  Ao clicar em um Painel, eu verifico se ele esta em azul, se sim mudo ele pra 
amarelo. Até ai tudo bem, eu poderia usar:

  if Panel1.color = 'clNavy' then Panel1.color:='clYellow';

  mas ai é q o bicho pega.

  tenho q fazer essa verificação em um quadro de paineis que tem só 672 paineis 
hehehe agora ficou chato né ter q fazer em um por um...


  então o que eu queria era algo tipo:

  if PAINEL_QUE_EU_CLIQUEI.color = 'clNavy' then 
PAINEL_QUE_EU_CLIQUEI.color:='clYellow';

  Onde o PAINEL_QUE_EU_CLIQUEI fosse uma variavel mesmo que recebesse o nome do 
bixo, ai eu faço a rotina apenas no OnClick do Painel1 e faço todos os outros 
671 paineis terem o mesmo  painel1onclick...



  UFA... espero que tenham entendido..

  abração a todos...  


  Atenciosamente,
  Gerson Thomaz Santos
  Analista de Sistema





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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] SQL: Consulta Ordem Alfab (p2)

2005-12-09 Por tôpico Vitor Luiz Redes
Olhe, não tenho certeza se existe o findnearest... mas vc pode fazer um 
loop quando não localizar o registro... assim...

if not Query.Locate( DESCRICAO', Edit.Text, [ loPartialKey ] ) then
for contador := 1 to Length( Edit.Text ) do
if Query.Locate( DESCRICAO', Copy ( Edit.Text, 1, Length( Edit.Text 
) - Contador ), [ loPartialKey ] ) then
Exit;

Digitei direto no mail mesmo, não sei se está com algum erro... mas tente 
ae...

Vitor.


  - Original Message - 
  From: fernandoaldrighi 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, December 09, 2005 12:14 PM
  Subject: [delphi-br] SQL: Consulta Ordem Alfab (p2)


  Pessoal, ontem pedi ajuda e muitos fizeram 
  comentarios, ajudando. Muito obrigado.

  Sobre a duvida que tinha, de via SQL
  fazer uma consulta que apresentase
  o que o usuario informou, mas
  permitindo que o usuario navegasse 
  nos registros, tanto acima, quanto abaixo,
  foi resolvido, usando LOCATE.

  So que, se o usuario informar um nome
  que nao existe, por exemplo:
  PAPEL CARBONADO

  No cadastrado nao tem produtos
  que contem no seu nome este texto.
  E o LOCATE nao esta posicionando
  no registro que vem logo apos.

  A consulta esta ficando no inicio
  dos registros.

  Como fazer, para caso o USUARIO
  informe um texto que NAO existe,
  a consulta posicionar-se, no 
  texto seguinte

  um exemplo:
  Usuario informa PAPEL CARB
  mas nao existe nenhum produto que contem
  estas letras no nome.
  O mais proximo e´ PAPEL CARMIM

  Em PARADOX eu usava FINDNEAREST
  Tenho algo parecido em FIREBIRD, via SQL ?





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Re: SQL: Consulta em ordem alfabetica

2005-12-08 Por tôpico Vitor Luiz Redes
pq não usa um Query mesmo e faz com like ?

WHERE UPPER( TABELA.CAMPO ) LIKE 'A%'

para retornar os registros contrários, ou seja os que NÃO começam com 'A', 
faça o seguinte...

WHERE UPPER( TABELA.CAMPO ) NOT LIKE 'A%'

Vitor.


  - Original Message - 
  From: fernandoaldrighi 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, December 08, 2005 12:00 PM
  Subject: [delphi-br] Re: SQL: Consulta em ordem alfabetica


  Obrigado Gabriel pelos comentarios.
  O habito do ibQuery e´ tao grande
  que eu ja havia esquecido do ibTable.


  Estou fazendo uma consulta,
  usnado o DBGRID e IBTABLE 
  da palheta INTERBASE no Delphi.


  Como fazer para que seja
  mostrado no Grid os produtos
  que o Usuario digitou no EDIT1 ?

  No Paradox eu fazia assim:
  ...
  Produtos.IndexName := 'Descricao';
  Produtos.FindNearest ([edit1.text]);

  E no ibTable, como fazer ?

  (eu preciso mostrar hoje a tarde para o Cliente).








  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Consulta em ordem decrescente

2005-12-08 Por tôpico Vitor Luiz Redes
Olhe, qualquer coisa me desculpe... mas tente da seguinte forma...
Crie uma coluna a mais no seu select e ordene por ela...

assim:

SELECT BLA, BLA, BLA...
  MEDIA + NOTA_REDACAO AS CAMPO_ORDEM
FROM BLA BLA BLS
ORDER BY 4 DESC

Vitor.

  - Original Message - 
  From: Topolniak 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, December 08, 2005 11:29 AM
  Subject: [delphi-br] Consulta em ordem decrescente


  Olá pessoal, bom dia.
  Me deparei com um problema de última hora aqui e resolvi pedir a ajuda de 
  vcs..

  Estou fazendo uma lista de classificação de alunos no vestibular...essa 
  lista tem que ser ordenada em ordem decrescente por média...mas se o cara 
  tirou nota menor que 10 (dez) na prova de redação, independente da média 
  dele ele tem que ir pro final da lista pois está reprovado


  Segue o meu sql abaixo:

  with Module.Mestre do
  Begin
Close;
SQL.Clear;
SQL.Add('select nomealuno, opcao1, NPESCRITA, NOTAREDACAO, SOMA, 
  MEDIA');
SQL.Add('from candidato');
SQL.Add('where opcao1 =:Curso');
SQL.Add('and anosemestre=:anosemestre');
SQL.Add('and treineiro=''Não''');
SQL.Add('order by Media DESC,NOTAREDACAO');
ParamByName('Curso').AsString:=DBCurso.Text;
ParamByName('anosemestre').AsString:=FVestiba.Anovigente.Text;
Open;
TIBOFloatField(module.Mestre.FieldByName('MEDIA')).DisplayFormat := 
  '0.00';
  end;

  Então, ele traz a NOTAREDACAO, SOMA e MEDIA, ordena-se por média...mas um 
  aluno que tirou zero em uma redação apareçe com media maior...preciso que 
  ele vá para o final da lista...

  Se alguém puder ajudar...agradeço.

  []'s
  Topolniak. 



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Re: SQL: Consulta em ordem alfabetica

2005-12-08 Por tôpico Vitor Luiz Redes
Ah sim...
Da maneira como quer... acredito que com Locate...

Abra a Query utilizando os parâmetros normais, não do Edit...
Depois de aberta...

Locate( 'CAMPO', VALOR, [ loPartialKey ]  ).

Isso vai posicionar o ponteiro no primeiro registro q corresponder a 
pesquisa... sem cortar os outros registros, assim, o usuário pode pesquisar 
acima e abaixo da query...

Vitor.

  - Original Message - 
  From: fernandoaldrighi 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, December 08, 2005 2:34 PM
  Subject: [delphi-br] Re: SQL: Consulta em ordem alfabetica


  Vitor (obrigado pela intencao de ajudar)
  mas acredito que pela tua dica,
  eu obrigaria o Usuario retornar para o EDIT.

  O que preciso é que quando o Usuario
  chegar no ultimo produto da consulta,
  apareca os produtos que estao abaixo 
  (em ordem alfabetica) que nao apareceram
  primeiramente por serem diferentes
  do que o Usuario colocou no EDIT.

  Entendeu ?


  Exemplo: Usuario informa: Agua com gas
  e´mostrado todos produtos que comecam
  com 'AGUA COM GAS'

  Usuario vai ate o ultimo produto
  que que seja AGUA COM GAS,
  e ao querer descer mais 
  (usando a seta para baixo do teclado),
  deve aparecer os proximos produtos
  (exemplo: AGUA SEM GAS)

  Como fazer, via query ?





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Driver DBExpress do D7 funciona com quais versoes do FireBird

2005-12-02 Por tôpico Vitor Luiz Redes
Não estou utilizando o 2.0 ainda. Mas com as outras versões, funciona.

Vitor

  - Original Message - 
  From: Paulo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, December 02, 2005 8:53 AM
  Subject: [delphi-br] Driver DBExpress do D7 funciona com quais versoes do 
FireBird


  Pessoal:
  (ja' havia enviado esta mensagem, mas nao a vi na lista)

  O driver DBExpress do D7 funciona com quais
  versoes do FireBird (1.0, 1.5, 2.0) ?

  Grato pela atencao de todos
  Paulo


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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Tratar/Validar/Outras Operações... Em CAMPOs ou DBWAREs

2005-11-23 Por tôpico Vitor Luiz Redes
O Evento OnExit, é passível de erros se vc não utilizar controle de 
validação que recebem foco... ex: TSpeedButton...
Não utilizo DbAwares, mas acredito que o evento OnChange seja mais 
específico para este tipo de coisa...
Agora, para validar dados digitados, campos requeridos, os eventos, before, 
after do TDataSet servem... para validar erros, OnReconcileError...

  - Original Message - 
  From: User-BA 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, November 23, 2005 8:37 AM
  Subject: [delphi-br] Tratar/Validar/Outras Operações... Em CAMPOs ou DBWAREs



  Olá!

  Onde é melhor para:

  - Se interceptar e anular erros de valores inseridos,
  - Executar funções/procedimentos que carregam valores para outros Campos

  ...

  Validações de CPG, CGC,
  Erros em valores inseridos,
  Executar SQLs para carregar valores para outros DBEdits?

  Se ...

  No OnExit dos componentes DBWares ou nos Eventos do TField.

  ...

  OnExit Do DBedit...
  OnSetText do Campo...
  OnValidate do Campo?

  Se puderem, me esclareçam
  a respeito da funcionabilidade e ordem que ocorre
  os Eventos OnGetText, OnSetText e OnValidate.

  Qual deles ocorre primeiro?

  Se ...

  O objetivo é poder interceptar ações,
  e tomar decisões sobe o que deve ser feito,
  no caso de ter que se abortar um procedimento
  antes de ser efetivado no campo,
  ou antecipar outras ações caso o valor
  foi inserido de acordo.

  Desculpem as redundâncias :)

  Trabalho com DBExpress - Query,provider,clientdataset,firebird.

  Obrigado pelas forças.
  Luciano-User-BA





  
  ___ 
  Yahoo! Acesso Grátis: Internet rápida e grátis. 
  Instale o discador agora!
  http://br.acesso.yahoo.com/



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Inserir Registro data banco de Dados

2005-11-22 Por tôpico Vitor Luiz Redes
Se vc quiser inserir a data do banco de dados, no servidor, tente da 
seguinte forma:

query.Sql.Add 
('Values(:Login,:Senha,:Nome,:Endereco,CURRENT_DATE,:Propaganda)');

Se quiser pegar a data da estação mesmo, acredito que a forma que está 
fazendo esteja correta...

Vitor.

  - Original Message - 
  From: HNS Informática 
  To: Lista1 
  Sent: Wednesday, November 16, 2005 1:24 PM
  Subject: [delphi-br] Inserir Registro data banco de Dados


  Pessoal, quando uso update consegui fazer pegar a data do banco, mas quando 
vou inserir um novo registro não consigo, veja como estou fazendo, mas não 
funciona:

  query.close;
  query.sql.Clear;
  query.Sql.Add ('insert into Usuarios 
,Senha,Nome,Endereco,Datacad,Propaganda)');
  query.Sql.Add ('Values(:Login,:Senha,:Nome,:Endereco,:Datacad,:Propaganda)');

  query.ParamByName('Login').value := editusuario.text;
  query.ParamByName('Senha').value := editsenha.text;
  query.ParamByName('Nome').value := editnome.text;
  query.ParamByName('Endereco').value := editendereco.text;
  query.ParamByName('Datacad').value := now();
  query.ParamByName('Propaganda').value := 'Sim'
  query.ExecSql;

  alguma sugestão para fazer funcionar?
  abraços amigos

  Charles A. Chiodi.

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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Re: Grade de Produtos

2005-11-21 Por tôpico Vitor Luiz Redes
José, mas desta maneira, o cliente teria de cadastrar um produto novo, para 
cada tipo, cor, modelo, ect...

Cou propor uma maneira aqui...

características 
codigo
descricao
tipo { Cor, número, com cadarço, sem, com mola, com turbina }

cadastro de produtos
cod_produto NUMERIC PK 
dsc_produto  VARCHAR(100)

produtos / caracteristicas
cod_produto
cod_caracteristica

Assim, o cadastramento do produto fica independente do cadastramento de 
características, e ainda, quando o cliente cadastrar um produto, e atribuir 
suas devidas características, dificilmente ele precisará mexer no produto 
novamente. Ex. Quando chegar um novo número do produto, é só adicionar uma 
característica ao produto. Não há necessidade de um novo cadastramento.

E quanto ao campo 'tipo' da tabela características, poderia ser uma tabela 
também, se os tipos fossem muito diversos.

   Bom, flw.

Vitor.




  - Original Message - 
  From: José Ricardo Aviles 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Sunday, November 20, 2005 10:53 PM
  Subject: [delphi-br] Re: Grade de Produtos


  Caro Junior.

  Realmente este é um problema pelo qual todos os programadores passam 
  e não há como realmente encontrar uma solução efetiva e simples.

  Vc pode ter 2 possibilidades
  1- a tabela de produtos com um campo de chave primária ex.: 
  cod_produto NUMERIC PK 
  dsc_produto  VARCHAR(100)
  e cadastrar todos os produtos por exemplo
  1, camisa tipo 1 branca p
  2, camisa tipo 1 branca m
  3, camisa tipo 1 branca g
  4, camisa tipo 2 branca p
  etc...
  esta é a solução mais simples de se implementar, mas é a menos 
  elaborada com relação a extração de dados para relatórios, vc não 
  poderia ter um relatorio de estoque do tamanho P apenas isto seria 
  passível e erro se o produto não seguisse um padrão rígido de 
  cadastro (algo que nunca vi um cliente fazer!).

  2-tabela com multiplas chaves
  cadastro de tamanho
  cod_cor numeric PK
  dsc_cor VARCHAR(20)

  cadastro de tamanho
  cod_tam numeric PK
  dsc_tam VARCHAR(20)

  cadastro de produtos
  cod_produto NUMERIC PK 
  cod_cor numeric PK FK
  cod_tam numeric PK FK
  dsc_produto  VARCHAR(100)

  e as vendas e o estoque seguem o mesmo padrão, é mais trabalhoso de 
  se implementar mas é relamente a solução mais efetiva, se o cliente 
  lhe pedir um relatório de vendas com vários critério vc prontamente 
  saberá quais campos buscar.

  Espero ter ajudado.

  Jose Ricardo Aviles
  --- Em delphi-br@yahoogrupos.com.br, Junior Terenzi 
  [EMAIL PROTECTED] escreveu
   Alguem tem alguma ideia de como criar uma grade de produtos?
   Eu desenvolvi um sistema para controle de loja de roupas e agora o
   cliente quer controlar os produtos por tamanhos, cores, etc. 
  Exemplo
   Camisa é o produto 500. Camisa tamanhos P-M-G-GG serão todas com o
   codigo 500, mas preciso controlar o estoque separado por tamanho. 
  Eu
   pensei em criar uma tabela para cadastrar os tipos de grade, para 
  dar
   flexibilidade ao sistema.
   Seria algo assim: 
   
   tipo_grade (codigo, descricao, nome_coluna, nome_linha)
   1 - CAMISA MASCULINA - CAMISA - TAMANHO
   2 - CAMISA INFANTIL - CAMISA - TAMANHO
   
   detalhe_grade (sequencial, codigo, tipo, descricao)
   1 - 1 - Linha - Adulto
   2 - 1 - Coluna - P
   3 - 1 - Coluna - M
   4 - 1 - Coluna - G
   5 - 1 - Coluna - GG
   1 - 2 - Linha - Infantil
   2 - 2 - Coluna - 8
   3 - 2 - Coluna - 10
   4 - 2 - Coluna - 12
   5 - 2 - Coluna - 14
   
   Agora estou quebrando a cabeça para saber como fazer pra controlar 
  o
   estoque por produto.
   E na hora da venda, vou ter que informar o produto 500 e o 
  tamanho, etc.
   
   Alguem tem alguma idéia melhor? Algum exemplo pra fornecer?
   
   Obrigado antecipadamente
   
   Abracos
   
   Junior




  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Re: Grade de Produtos

2005-11-21 Por tôpico Vitor Luiz Redes
Olhe, no seu caso, o único porém, seria trocar a manuteção do estoque para 
o código da característica do produto...

Ao invés de controlar pelo produto, contrlle pela característica... por 
exemplo:

características 
 codigo
 descricao
 tipo { Cor, número, com cadarço, sem, com mola, com turbina }
 
 cadastro de produtos
 cod_produto NUMERIC PK 
 dsc_produto  VARCHAR(100)
 
 produtos / caracteristicas
 codigo (incremental, ou incremental por produto)
 cod_produto
 cod_caracteristica

estoque
 característica
 saldo
   outras informações...

Na verdade o processo é o mesmo, para agilizar, você poderia inserir 
algumas características automaticamente, quando um produto fosse inserido... 
tipo, por grupo de produtos...

Por ex: Se um produto do grupo 'Nike' for inserido, dispare um trigger, ou 
uma rotina para inserir as característica, 'amarelo', 'ronaldinho', '34', '35', 
direto na tabela de produtos / características...

É só um exemplo, mas acho que é uma maneira de controlar, é só adaptar para 
a sua realidade, qualquer coisa, poste ae, que tentamos ajudar, blz ?

Vitor.



  - Original Message - 
  From: José Ricardo Aviles 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, November 21, 2005 11:05 AM
  Subject: [delphi-br] Re: Grade de Produtos


  Valeu victor, excelente solução. Mas e quanto ao estoque???
  e quando o dono da empresa quiser saber em um relatório da ficha de 
  movimentação de estoque de todos os produtos tamanho p da cor azul, 
  claro que há uma maneira de se fazer isso, mais imagina a 
  trabalheira para o programador para fazer isso.


  --- Em delphi-br@yahoogrupos.com.br, Vitor Luiz Redes 
  [EMAIL PROTECTED] escreveu
   José, mas desta maneira, o cliente teria de cadastrar um 
  produto novo, para cada tipo, cor, modelo, ect...
   
   Cou propor uma maneira aqui...
   
   características 
   codigo
   descricao
   tipo { Cor, número, com cadarço, sem, com mola, com turbina }
   
   cadastro de produtos
   cod_produto NUMERIC PK 
   dsc_produto  VARCHAR(100)
   
   produtos / caracteristicas
   cod_produto
   cod_caracteristica
   
   Assim, o cadastramento do produto fica independente do 
  cadastramento de características, e ainda, quando o cliente 
  cadastrar um produto, e atribuir suas devidas características, 
  dificilmente ele precisará mexer no produto novamente. Ex. Quando 
  chegar um novo número do produto, é só adicionar uma característica 
  ao produto. Não há necessidade de um novo cadastramento.
   
   E quanto ao campo 'tipo' da tabela características, poderia 
  ser uma tabela também, se os tipos fossem muito diversos.
   
  Bom, flw.
   
   Vitor.
   
   
   
   
 - Original Message - 
 From: José Ricardo Aviles 
 To: delphi-br@yahoogrupos.com.br 
 Sent: Sunday, November 20, 2005 10:53 PM
 Subject: [delphi-br] Re: Grade de Produtos
   
   
 Caro Junior.
   
 Realmente este é um problema pelo qual todos os programadores 
  passam 
 e não há como realmente encontrar uma solução efetiva e simples.
   
 Vc pode ter 2 possibilidades
 1- a tabela de produtos com um campo de chave primária ex.: 
 cod_produto NUMERIC PK 
 dsc_produto  VARCHAR(100)
 e cadastrar todos os produtos por exemplo
 1, camisa tipo 1 branca p
 2, camisa tipo 1 branca m
 3, camisa tipo 1 branca g
 4, camisa tipo 2 branca p
 etc...
 esta é a solução mais simples de se implementar, mas é a menos 
 elaborada com relação a extração de dados para relatórios, vc 
  não 
 poderia ter um relatorio de estoque do tamanho P apenas isto 
  seria 
 passível e erro se o produto não seguisse um padrão rígido de 
 cadastro (algo que nunca vi um cliente fazer!).
   
 2-tabela com multiplas chaves
 cadastro de tamanho
 cod_cor numeric PK
 dsc_cor VARCHAR(20)
   
 cadastro de tamanho
 cod_tam numeric PK
 dsc_tam VARCHAR(20)
   
 cadastro de produtos
 cod_produto NUMERIC PK 
 cod_cor numeric PK FK
 cod_tam numeric PK FK
 dsc_produto  VARCHAR(100)
   
 e as vendas e o estoque seguem o mesmo padrão, é mais trabalhoso 
  de 
 se implementar mas é relamente a solução mais efetiva, se o 
  cliente 
 lhe pedir um relatório de vendas com vários critério vc 
  prontamente 
 saberá quais campos buscar.
   
 Espero ter ajudado.
   
 Jose Ricardo Aviles
 --- Em delphi-br@yahoogrupos.com.br, Junior Terenzi 
 [EMAIL PROTECTED] escreveu
  Alguem tem alguma ideia de como criar uma grade de produtos?
  Eu desenvolvi um sistema para controle de loja de roupas e 
  agora o
  cliente quer controlar os produtos por tamanhos, cores, etc. 
 Exemplo
  Camisa é o produto 500. Camisa tamanhos P-M-G-GG serão todas 
  com o
  codigo 500, mas preciso controlar o estoque separado por 
  tamanho. 
 Eu
  pensei em criar uma tabela para cadastrar os tipos de grade, 
  para

Re: [delphi-br] I N T E R B A S E - Campo data Nulo ??????

2005-11-17 Por tôpico Vitor Luiz Redes
Tente assim...

parambyname('p_data').Clear;

Vitor.


  - Original Message - 
  From: Alcistemas Informática 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, January 10, 2006 11:00 AM
  Subject: Re: [delphi-br] I N T E R B A S E - Campo data Nulo ??


  já  tentei da erro!!!


  - Original Message - 
  From: Marcelo Moacir Florindo [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Tuesday, November 15, 2005 5:11 PM
  Subject: Re: [delphi-br] I N T E R B A S E - Campo data Nulo ??


   parambyname('p_data').value :=  null;
  
  
   - Original Message - 
   From: Alcistemas Informática [EMAIL PROTECTED]
   To: delphi-br@yahoogrupos.com.br
   Sent: Tuesday, November 15, 2005 10:39 AM
   Subject: [delphi-br] I N T E R B A S E - Campo data Nulo ??
  
  
   Como gravar um campo nulo em banco de dados firebird ?
   ex: parambyname('p_data').value :=  ???
  
  
  
  
  
  
   ___
   Yahoo! Acesso Grátis: Internet rápida e grátis.
   Instale o discador agora!
   http://br.acesso.yahoo.com/
  
  
  
  
  
   -- 
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
  
  
  
   Links do Yahoo! Grupos
  
  
  
  
  
  
  
  
  
  
  
  
  
  
   -- 
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
  
  
  
   Links do Yahoo! Grupos
  
  
  
  
  
  
   





  
  ___ 
  Yahoo! Acesso Grátis: Internet rápida e grátis. 
  Instale o discador agora!
  http://br.acesso.yahoo.com/





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] try except

2005-11-11 Por tôpico Vitor Luiz Redes
Só para lembrar, que... quando vc estiver 'rodando' o projeto 'por dentro' 
do Delphi, ou seja, executando ele a partir do Delphi, as Exceptions padrão 
sempre serão mostradas ANTES das personalizadas.
Rode o projeto 'por fora' para testar a Exception personalizada. Ou ainda, 
veja em Tools - Debugger Options... algumas opções para personalizar o 
tratamento de exceptions.

Vitor.

  - Original Message - 
  From: Alexandre Yahoo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, November 11, 2005 9:54 AM
  Subject: Re: [delphi-br] try except


  pq provavelmente o erro naum eh da classe EAdoError...eu geralmente pego 
qualquer tipo d erro assim:

  try
DadosMod.SaveToFile(txtArq.Text);
  except
On E : Exception do
  Application.MessageBox('Erro Tal','Erro', MB_ICONERROR + MB_OK);
  end;
  essa variavel E, acho q dah pra vc ver a classe do erro...c vc quiser soh 
pegar essa classe coloque e.ClassName c eu naum me engano e debuga pra ver 
qual eh...ai vc troca o eAdoError...pelo menos eh assim q eu faço...naum sei c 
tem outro jeito...

- Original Message - 
From: leonardo-fl 
To: delphi-br 
Sent: Thursday, November 10, 2005 12:13 AM
Subject: [delphi-br] try except


Opa! Valeu aí à galera que me ajudou com o problema da senha no access!
Mas aproveitando o ensejo (hehe), queria aproveitar e perguntar uma coisa:
Eu tava aqui tentando fazer o seguinte: um Edit onde vc põe a senha do 
banco e um botão que tenta conectar ao banco. Mas como eu uso o try except 
nesse caso para personalizar a mensagem de erro, caso a senha esteja errada?

Obs.: Eu tava tantando algo desse tipo:

//connect é uma string já com a senha do Edit
ADOConnection1.ConnectionString:=connect; 
try
  ADOConnection1.Connected:=True;
except
  on EADOError do MessageDlg('Senha inválida', MtInformation, [MbOK], 0);
end;
//mas isso não deu certo: a mensagem padrão do Delphi aparece de qualquer 
jeito

Valeu!

Leonardo-fl


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






-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





  Yahoo! Grupos, um serviço oferecido por: 
PUBLICIDADE
  
 


  --
Links do Yahoo! Grupos

  a.. Para visitar o site do seu grupo na web, acesse:
  http://br.groups.yahoo.com/group/delphi-br/

  b.. Para sair deste grupo, envie um e-mail para:
  [EMAIL PROTECTED]

  c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do 
Serviço do Yahoo!. 



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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: Re: [delphi-br] OFF Toppic: Desabafo..

2005-11-11 Por tôpico Vitor Luiz Redes
Só um comentário.
Eu acho sacanagem, por causa de alguns erros ficarem falando com a boca 
cheia como se tivessem cheios de razão. Os caras estão mudando o portal da 
clubedelphi, e o que será que estão visando com isso se não a melhoria do 
atendimento para com os clientes, no caso, nós ?
Sinceramente, eu acho que é possível esperar um pouco ou mandar e-mails 
diretamente para o Guinter, ou para alguns outros que também escrevem para a 
revista. Perguntando o que está acontecendo, ect... e não agindo como aqueles 
clientes que todo mundo aqui detesta.

Agora, quantas dores de cabeça foram evitadas graças a revista, ou o portal 
? 

Vitor.

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: Re: [delphi-br] OFF Toppic: Desabafo..

2005-11-11 Por tôpico Vitor Luiz Redes
É bem isso mesmo Walter. O problema é que, se tem um cara que liga falando 
um monte de bobagens sobre o software que o cara desenvolveu, ele acha um 
absurdo a pessoa estar reclamando por 'tão pouca coisa'. Mas na hora de 
reclamar ninguém pensa nisso...

Mas blz, acho que está a questão já foi resolvida.

Vitor.
  - Original Message - 
  From: Walter Alves Chagas Junior 
  To: 'delphi-br@yahoogrupos.com.br' 
  Sent: Friday, November 11, 2005 4:24 PM
  Subject: RES: Re: [delphi-br] OFF Toppic: Desabafo..


  Olha,

  Eu apenas relatei que tou com problemas também. Passei os telefones de lá
  pro pessoal ligar e tentar resolver a coisa por lá mesmo. Mas o fato do
  portal estar com problemas não quer dizer também que a Clubedelphi é alguma
  instituição picareta ou meia boca. Eu, particularmente, acho ela excelente.
  Veja bem, além da revista, que é muito boa, eles vira e mexa estão
  promovendo eventos e tudo mais. É uma instituição que está de parabens pelos
  ótimos serviços prestados a comunidades. 

  Reclamar do problema é valido, agora chamar os caras de picaretas ou falar
  que a ClubeDelphi é uma piada em organização, peraí né gente! Não vamos
  chegar a este nível uma vez que ainda não há nada que se caracterizou como
  atitude leziva aos associados ou que justificasse tais adjetivos. A revista,
  por exemplo, chega pra mim todo mes sem furo. Tá certo que o portal tá com
  problema, mas também não é nada que não possa ser resolvido e que esteja
  sendo prejudicial a todo mundo né.


  []s

  Walter Alves Chagas Junior
  Projeto e desenvolvimento
  Telemont Engenharia de telecomunicações
  Belo Horizonte - MG - Brazil
  [EMAIL PROTECTED]
  Fone: (31) 3389-8215 Fax: (31) 3389-8200


  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  nome de Vitor Luiz Redes
  Enviada em: sexta-feira, 11 de novembro de 2005 14:00
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: Re: [delphi-br] OFF Toppic: Desabafo..


  Só um comentário.
  Eu acho sacanagem, por causa de alguns erros ficarem falando com a boca
  cheia como se tivessem cheios de razão. Os caras estão mudando o portal da
  clubedelphi, e o que será que estão visando com isso se não a melhoria do
  atendimento para com os clientes, no caso, nós ?
  Sinceramente, eu acho que é possível esperar um pouco ou mandar e-mails
  diretamente para o Guinter, ou para alguns outros que também escrevem para a
  revista. Perguntando o que está acontecendo, ect... e não agindo como
  aqueles clientes que todo mundo aqui detesta.

  Agora, quantas dores de cabeça foram evitadas graças a revista, ou o
  portal ? 

  Vitor.

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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



  Links do Yahoo! Grupos









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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] QuickReport Impressão Bordas

2005-11-10 Por tôpico Vitor Luiz Redes
Tente utilizar a propriedade Frame do componentes...

Vitor.

  - Original Message - 
  From: Thiago Oliveira 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, November 10, 2005 5:23 PM
  Subject: [delphi-br] QuickReport Impressão Bordas


  E ai galera,

  Relatório QuickReport, eu tenho um relatório aqui mas estou tendo problemas
  para fazer bordas em um determinado texto, as bordas eu faço com QRShape1 e
  ou QRImage1 mas o que se vê na tela com Preview não é o que se imprime, e
  fica uma bagunça, alguem sabe de algum componente que me ajude nisso,
  exatamente o que faço é tenho um QRmemo e insiro 20 string para ele e ao
  redor coloco um borda é bem simples mas na tela me aparece uma coisa e
  quando imprimo o espaço está maio ou menor...

  Se alguem puder ajudar.

  Valeu.
  Thiago


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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 





Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Fechar Mdi

2005-10-13 Por tôpico Vitor Luiz Redes
Tente assim:

if not Assigned( Tela ) then
begin
Tela := TModeloBase.Create;
Tela.MdiParent:= self;
end;
Tela.Show;


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Ailton Branco 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, October 11, 2005 11:17 AM
  Subject: [delphi-br] Fechar Mdi


  Criei minha tela no delphi 2005 desta forma

  procedure TPrincipal.Button1_Click(sender: System.Object; e: 
System.EventArgs);
  Var Tela : TModeloBase;
  begin
Tela := TModeloBase.Create;
Tela.MdiParent:= self;
Tela.Show;
  end;

  mas quando eu pressiono novamente o botao o sistema cria mais uma tela igual 
e eu gostaria de ter apenas uma aberta portanto se existir gostaria que o 
sistema apenas mostrasse e nao criar uma nova...


  alguem pode me ajudar ???

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





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 






Re: [delphi-br] Controle de Usuarios

2005-10-05 Por tôpico Vitor Luiz Redes
Eu costumo fazer ambos os controles, cada um na sua... controle sobre 
tabelas e permissões referentes ao banco, NO BANCO, e controle de menus, 
permissões, configurações, preferências, atalhos, ajustes, aparência, ect... no 
sistema.


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Luis Lopes 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, October 05, 2005 10:15 AM
  Subject: Re: [delphi-br] Controle de Usuarios


  Aqui na empresa, e em outras onde trabalhei, a opção
  foi usar um usuário, somente, para acesso da aplicação
  ao banco de dados e fazer o controle de acesso na
  aplicação, ou seja, armazenando usuários e permissões
  em tabelas do banco.

  []´s

  Luis Alberto.

  --- Leandro Carbonera [EMAIL PROTECTED]
  escreveu:

   
   E ai companheiros delphianos.
   
   Estou com uma duvida quanto ao controle de usuarios
   em um sistema, e
   gostaria da opinião de vcs. Estou utilizando delphi
   7 e Firebird 1.5, qual é
   a melhor forma de fazer este controle, criar uma
   tabela no banco para
   armazenar os usuarios e as permissões, ou controlar
   pelo Firibird, atraves
   atraves dos USERS e ROLES e GRANTS
   
   Qual é a opinião de vcs
   
   
   Att.
   
   Leandro Carbonera
   Suporte Técnico - RBR Informática
   
   Fone: 54 343 1788
   [EMAIL PROTECTED]
   www.rbrinformatica.com.br
   
   
 
   
 
   
  
  ___
   
   Novo Yahoo! Messenger com voz: ligações, Yahoo!
   Avatars, novos emoticons e muito mais. Instale
   agora! 
   www.yahoo.com.br/messenger/
   
   
   -- 
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA
   MENSAGEM 
   
   Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
   
   Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou
   [EMAIL PROTECTED]

   Links do Yahoo! Grupos
   
   
   
   http://br.yahoo.com/info/utos.html
   

   
   
   








  
  ___ 
  Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e 
muito mais. Instale agora! 
  www.yahoo.com.br/messenger/


  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
  PlayStation 2 a partir de R$ 659! Parcele! Celular Motorola com 
câmera a partir de R$ 449! 
  Siemens SL65 com câmera a partir de R$ 730!  Câmeras Digitais a 
partir de apenas R$ 399! Parcele! 
  CD Players Pioneer a partir de R$ 369! MP3 Player iPod a partir 
de R$ 799! Parcele! 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 






Re: [delphi-br] Mapear imagem

2005-09-28 Por tôpico Vitor Luiz Redes
Tente usar assim...

if Assigned( OWNER*.FindComponent( 'NOMEDAIMAGEM' ) ) then
Localiza ( OWNER*.FindComponent( 'NOMEDAIMAGEM' ) as TImage );'


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Filipe Xavier Ramalho 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, September 28, 2005 11:55 AM
  Subject: RES: [delphi-br] Mapear imagem


  Edmilson, vamos ver se entendi, vc colocou o nome do TImage no banco de
  dados? se foi isso vc pode usar a função FindComponent para localizar o
  TImage com aquele nome.

  Espero ter ajudado.

  Filipe
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  nome de Edimilson
Enviada em: quarta-feira, 28 de setembro de 2005 11:49
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Mapear imagem


Caros amigos, tenho a seguinte situação:

- No banco de dados tenho todos os estados cadastrados,;
- Tenho o mapa do Brasil em imagem (bmp), uma única imagem;

a partir de um grid a pessoa pode clicar em qualquer estado, neste
momento preciso ressaltar no mapa qual o estado que selecionou.

fiz da seguinte maneira. coloquei diversos Timage em cima do mapa e
renomiei cada qual, então conforme escolhe mando realcar com um ponto
no estado marcado:

procedure TF_mapa.Localiza(Imagem: TImage);
begin
   imagem.Picture.LoadFromFile('teste.jpg');
end;

mas o problema é que neste jeito o parametro é TImage e no banco de
dados o nome é string e dá erro de tipo de dados.

Localiza(imgNorte); = funciona pois imgNorte é um Timage mas quando
for do banco não dá.

aguardo sugestões.

Edimilson.




--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]



  Yahoo! Grupos, um serviço oferecido por:



  
  --
Links do Yahoo! Grupos

  a.. Para visitar o site do seu grupo na web, acesse:
  http://br.groups.yahoo.com/group/delphi-br/

  b.. Para sair deste grupo, envie um e-mail para:
  [EMAIL PROTECTED]

  c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
  Serviço do Yahoo!.



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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Alterar Cores de Componente Desabilitado

2005-09-28 Por tôpico Vitor Luiz Redes
Acho que o único modo de fazer o que vc está falando seria utilizar a 
propriedade ReadOnly... e não a Enabled...


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Romario (Listas) 
  To: Delphi-br (Lista de Discussão) 
  Sent: Wednesday, September 28, 2005 2:30 AM
  Subject: [delphi-br] Alterar Cores de Componente Desabilitado


  Alguém sabe se existe uma forma de alterar a cor de fundo e a cor da 
  fonte quando um componente está desabilitado?

  A cor de fundo de um TMemo eu consegui alterar, mas para outros 
  componentes (TEdit, TMaskEdit e TComboBox) não obtive sucesso.

  Também experimentei desativar a TabSheet em que os componentes estão, 
  mas ficou pior ainda.

  Existe alguma outra forma de bloquear os componentes sem que eles percam 
  as propriedades de cor (fundo e fonte)?

  Obrigado!

  Sds,

  Romario




  
  ___ 
  Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e 
muito mais. Instale agora! 
  www.yahoo.com.br/messenger/ 


  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] showmessage

2005-09-28 Por tôpico Vitor Luiz Redes
Declare a unit Dialogs, na uses.

constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Cícero 
  To: Listadelphi (E-mail) 
  Sent: Wednesday, September 28, 2005 4:10 PM
  Subject: [delphi-br] showmessage


  Mudeu agora para delphi7 com XP. Olha que mensagem de erro conviencente...

  [Error] adoconnection1.pas(44): Undeclared identifier: 'showmessage'

  showmessage('minha mensagem'); 

  nao funciona.,. e agora.


  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Mudar Cor Do Texto Do Botão

2005-09-27 Por tôpico Vitor Luiz Redes
Veja se a propriedade ParentFont não está setada como TRUE.


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Cleiton 
  To: Delhpi 
  Sent: Tuesday, September 27, 2005 1:38 PM
  Subject: [delphi-br] Mudar Cor Do Texto Do Botão


  Olá a todos ...

  Como faço para alterar a cor do texto de um botão?

  Estou utilizando no seu sistema botões do tipo Tbutton e estava tentando 
aterar a cor do seu texto pela propriedade 'font, mas a cor não muda. Até fica 
negrito, itálico mas a fonte e a cor da fonte utilizada não consigo mudar.

  Seria essa propriedade mesmo que devo alterar?
  -- 
  Esta mensagem foi verificada pelo sistema de antivírus e
  acredita-se estar livre de perigo.



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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Controle de Usuários

2005-09-27 Por tôpico Vitor Luiz Redes
Paleta IBAdmin, o componente IBSecurityService faz isso pra vc... as outras 
suites de acesso tb tem componentes particulares...


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Wilson Valdevite 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 27, 2005 2:12 PM
  Subject: [delphi-br] Controle de Usuários


  Pessoal...

  Preciso saber como efetuo a inclusão, exclusão e autoriozação de usuários no 
FB atravéz do Delphi.
  Alguém tem alguma coisa sobre isso???


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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Duvida Urgente...

2005-09-27 Por tôpico Vitor Luiz Redes
Tente colcoar com aspas ... '1'..
Se for em tempo de execução 
Filter := QuotedStr( '1' );


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: thiago castro 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, September 27, 2005 3:28 PM
  Subject: [delphi-br] Duvida Urgente...


  Pessoal estou precisando de uma ajudinha urgente...
  É o seguinte eu tenho uma tabela (Paradox) com os seguintes campos...

  Matricula
  Nome
  1
  2
  3
  4
  5
  6
  7
  (Isso mesmo campos com numeros... 180 na verdade)
  estou com o seguinte problema, como faço para fazer um filtro usando os 
campos com nomes em numeros?

  ex table1.filter := 1 = 0;ex table1.filter := 1 = 1;



  pois os campos são numericos tbem 0 ou 1.

  ele esta me retornando um erro! pois não aceita nome dos campos como 
numeros... existe alguma outra possibilidade de fitrar só os registros com 1 e 
só os com 0 dessa tabela?


  Thiago de Castro X. da Silveira

  Pré-Vestibular Pitágoras 
  Unidades Centro, Savassi e Belvedere.
  Setor TI
  telefone: +55 (31) 3274-1088 
  e-mails:
  [EMAIL PROTECTED]
  [EMAIL PROTECTED]


  
  -
  Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e 
muito mais. Instale agora!

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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] delphi com linguagem C

2005-09-26 Por tôpico Vitor Luiz Redes
Que eu saiba não, mas você pode criar bibliotecas em C e chamar as funções 
e procedimentos pelo Delphi.
Mas por que você gostaria de programar em C no Delphi ? Acho difícil 
existir alguma coisa que o Delphi não substitua...


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Cleudes 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, September 26, 2005 11:58 AM
  Subject: [delphi-br] delphi com linguagem C


  Olá pessoal, alguém sabe se o DELPHI trabalha com a linguagem C  os 
  dois juntos, ou seja, posso chamar comandos em C que o delphi aceita, 
  como faço isso? Desde já agradeço à todos.




  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Nao mostrar formulario apos CreateForm

2005-09-22 Por tôpico Vitor Luiz Redes
Veja se a propriedade Visible do seu Form está = True...


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: ricknetbr 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, September 21, 2005 9:42 PM
  Subject: [delphi-br] Nao mostrar formulario apos CreateForm


  Ola, amigos...
  Acho até idiota essa minha pergunta, mas estou quebrando a cuca =(

  Tenho alguns formularios criados de forma dinamica
  (TApplication.CreateForm) onde preciso fazer alteracoes em algumas
  propriedades dos componentes deste formulario, conforme a escolha do
  usuario. 

  O problema é que apos eu criar o formulario, ao alterar as cores dos
  edits  , da uma piscada nos componentes.. Teria como eu criar o
  formulario, fazer as modificacoes e depois eu mostrar o formulario?


  Obrigado





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Iniciante

2005-09-22 Por tôpico Vitor Luiz Redes
Olhe Fabiano, eu fiz um rapidão aqui, não um componente, coloquei em um 
TForm mesmo, mas pode te dar uma idéia né... veja ae...

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls;

type
  TSinalizacao = ( sPARE, sATENCAO, sCONTINUE );

  TForm1 = class(TForm)
Button1: TButton;
Timer1: TTimer;
procedure Button1Click(Sender: TObject);
procedure Timer1Timer(Sender: TObject);
  private
{ Private declarations }
vSemaforo : TShape;
vVermelho, vAmarelo, vVerde : TShape;
Sinalizacao : TSinalizacao;
  public
{ Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
vSemaforo := TShape.Create( SELF );
vSemaforo.Parent := SELF;
vSemaforo.Left := 8;
vSemaforo.Top := 8;
vSemaforo.Height := 233;
vSemaforo.Width := 65;
vSemaforo.Pen.Style := psClear;
vSemaforo.Brush.Color := clBlack;

vVermelho := TShape.Create( vSemaforo );
vVermelho.Parent := SELF;
vVermelho.Left := 12;
vVermelho.Top := 16;
vVermelho.Shape := stCircle;
vVermelho.Height := 41;
vVermelho.Width := 57;

vAmarelo := TShape.Create( vSemaforo );
vAmarelo.Parent := SELF;
vAmarelo.Left := 12;
vAmarelo.Top := 80;
vAmarelo.Shape := stCircle;
vAmarelo.Height := 41;
vAmarelo.Width := 57;

vVerde := TShape.Create( vSemaforo );
vVerde.Parent := SELF;
vVerde.Left := 12;
vVerde.Top := 144;
vVerde.Shape := stCircle;
vVerde.Height := 41;
vVerde.Width := 57;

Sinalizacao := sPARE;
Timer1.Enabled := TRUE
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
case Sinalizacao of
sPARE :
begin
vVermelho.Brush.Color := clRed;
vAmarelo.Brush.Color := clBlack;
vVerde.Brush.Color := clBlack;
Sinalizacao := sCONTINUE;
Timer1.Interval := 5000
end;
sATENCAO :
begin
vVermelho.Brush.Color := clBlack;
vAmarelo.Brush.Color := clYellow;
vVerde.Brush.Color := clBlack;
Sinalizacao := sPARE;
Timer1.Interval := 2000
end;
sCONTINUE :
begin
vVermelho.Brush.Color := clBlack;
vAmarelo.Brush.Color := clBlack;
vVerde.Brush.Color := clGreen;
Sinalizacao := sATENCAO;
Timer1.Interval := 5000
end;
end;

end;

end.



constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Fabiano 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, September 21, 2005 3:00 PM
  Subject: [delphi-br] Iniciante


  Olá pessoal! Boa tarde!

  Sou iniciante no grupo e vou me apresentar rapidamente.
  Meu nome é Fabiano, tenho 21 anos e estou no 2º ano de Sistemas de Informação.
  Iniciamos, no começo deste ano, os estudos com Delphi.

  Preciso da ajuda de vocês.
  Tenho que criar um componente parecido com um semáforo de trânsito, que tenha 
uma propriedade para configurar o tempo que ficará acesa cada lâmpada 
(vermelha, amarela, verde) e outra propriedade que indicará se o semáforo está 
ligado ou não.
  Comecei a cria-lo, herdando um TShape. Montei um quadro que ficará de fundo 
do semáforo, mas não estou conseguindo criar outros 3 shapes circulares para 
representar cada lâmpada do semáforo.

  Alguém tem alguma idéia para me ajudar?

  Obrigado!

  Fabiano.

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





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:

Re: [delphi-br] Duvida Combom Box?

2005-09-22 Por tôpico Vitor Luiz Redes
Propriedade Style = csDropDownFixed


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Guigos 
  To: Delphi-Br 
  Sent: Thursday, September 22, 2005 11:16 AM
  Subject: [delphi-br] Duvida Combom Box?


  Ola, Galera

  tenhu uma duvida, tenho um combo box que lista os estados. E eu gostaria 
  de inibir a digitação nele, sendo que nos itens do combo ja possui os 
  estados.
  Gostaria de uma rotina quenao deixasse o  usuário digite um estado 
  errado ou nem digitasse nada no combo, gostaria de travar a digitação 
  dentro do combo.

  Grato

  Luis




  
  ___ 
  Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e 
muito mais. Instale agora! 
  www.yahoo.com.br/messenger/ 


  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Luz

2005-09-15 Por tôpico Vitor Luiz Redes
Olhe, acredito que tudo isso que está mencionando querer fazer, vai 
depender e MUITO, da central telefônica que trabalhará... existem centrais que 
fazem algumas coisas e outras que não fazem, e outras mais caras, que fazem 
tudo.
Acho que você devia começar a pesquisar sobre centrais telefônicas e não 
sobre como ligar um telefone comum ao computador... :D Flw.

constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] OFF - Oportunidade

2005-09-14 Por tôpico Vitor Luiz Redes
Ahh.
Talvez você deva fazer uma prova então né ? Entre todos os programadores do 
mundo, o melhor entra. ;D

constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Rogério 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, September 14, 2005 8:38 AM
  Subject: Re: [delphi-br] OFF - Oportunidade


  É Sr. Walter sabe tudo!!!

  Não é que o pessoal não sabe, mas o pessoal tem muito trabalho então o 
  pessoal esquece de um detalhe importante.

  Cidade: Blumenau
  UF: SC
  País: Brasil

  O salário será à combinar - dependerá de avaliação.
  Mas pelas respostas que tive até agora - acho que ninguém aqui da lista está 
  apto.
  Talvez tenha sido um erro postar a msg aqui (vivendo e aprendendo).

  Interessa somente pessoas da região.

  Rogério Ricardo Fernandes
  Desenvolvimento http://www.strategies.inf.br

  - Original Message - 
  From: Walter Alves Chagas Junior [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Tuesday, September 13, 2005 5:38 PM
  Subject: RES: [delphi-br] OFF - Oportunidade


  No site desta empresa, o endereço é de Santa Catarina. É que o pessoal posta
  anuncio mas não sabe por detalhes importantes  :-(

  []s

  Walter Alves Chagas Junior
  Projeto e desenvolvimento
  Telemont Engenharia de telecomunicações
  Belo Horizonte - MG - Brazil
  [EMAIL PROTECTED]
  Fone: (31) 3389-8215 Fax: (31) 3389-8200


  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  nome de Jéferson
  Enviada em: terça-feira, 13 de setembro de 2005 17:21
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] OFF - Oportunidade


  Qual região do pais?


  - Original Message - 
  From: Levi Ribeiro de Freitas [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Tuesday, September 13, 2005 4:52 PM
  Subject: RES: [delphi-br] OFF - Oportunidade


  Favor informar salário.

  Levi

  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Rogério
  Enviada em: terça-feira, 13 de setembro de 2005 16:40
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] OFF - Oportunidade

  Desculpem pelo OFF.

  Necessita-se programador em Delphi, com desejáveis conhecimentos:
  _Automação Comercial;
  _SQL;
  _Orientação à Objetos.

  Enviar currículo para: [EMAIL PROTECTED] assunto: Programador Delphi


  Grato,

  Rogério Ricardo Fernandes
  Desenvolvimento
  http://www.strategies.inf.br

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



  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]

  Links do Yahoo! Grupos












  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]

  Links do Yahoo! Grupos













  ___
  Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA.
  Participe! www.yahoo.com.br/messenger/promocao


  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]

  Links do Yahoo! Grupos








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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]

  Links do Yahoo! Grupos











  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR 

Re: Res: [delphi-br] Componente para acessar Firebird

2005-09-14 Por tôpico Vitor Luiz Redes
Pelo que eu conheço, o DBX, IBO e MDO são ótimas suites de acesso, agora, 
as outras não posso opinar, mas acredito que não seja necessário.
Sugiro que procure material sobre as três acima, e que escolha a que melhor 
lhe aprouver.
As duas últimas são constantemente atualizadas, e as comunidades são 
ativas, inclusive na lista FireBird-BR, discutem, as vezes, sobre isso...
A DBX tb é, de certa forma, atualizada, bugs são corrigidos, ect... eu uso 
a DBX, por pura facilidade mesmo, e por outra vantagem, dependendo do tipo de 
desenvolvimento aplicado no projeto ( se é que isso existe :DD), você pode 
simplesmente instalar outro banco de dados e setar os parâmetros de conexão do 
próprio executável, o que é ótimo. Mas... cada um é cada um... 

constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Francisco Thiago 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, September 14, 2005 1:35 PM
  Subject: Re: Res: [delphi-br] Componente para acessar Firebird


  Colega este é o tipo de discussão que gera mta polêmica.

  Faz o seguinte: associe-se a Firebase (lista de firebird e interbase) 
  www.firebase.com.br

  E depois procure no histórico de mensagens. Vc vai encontrar mto material 
  sobre...

  Qtn ao livro do Cantú... É um ótimo livro, com certeza... Só tenho medo de 
  ele ser bairrista no quesito componente de acesso. Digo que tenho MEDO pq 
  ainda não li... quer dizer, vi o índice :D

  []'s

  Francisco Thiago de Almeida
  Enter  Plug Informática
  Divisão: Desenvolvimento e Banco de dados
  Franca / SP
  msn: [EMAIL PROTECTED]


  - Original Message - 
  From: Paulo Daniel Dorensbach [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Wednesday, September 14, 2005 1:16 PM
  Subject: Re: Res: [delphi-br] Componente para acessar Firebird


   Obrigado Stock, agora vou testar estes e ver qual fica
   melhor pra min.
  
   Um abracO!!!
  
   --- Stock [EMAIL PROTECTED] escreveu:
  
DBX, IBO, Zeos, MDO (eu uso e prefiro), BDE (cai
   fora), IBX (deve perder a
   compatibilidade logo)...
   fica a seu criterio escolher um que melhor atenda
   sua forma de programar...
   qualquer coisa da uma olhadinha no livro Firebird
   Essencial de Carlos H
   Cantu, uma verdadeira mao na roda
  
   [EMAIL PROTECTED]
   600 modelos de sites profissionais - Imperdivel
   http://www.kitsites.com/index.php?ref=50
  
  
   __
   Converse com seus amigos em tempo real com o Yahoo! Messenger
   http://br.download.yahoo.com/messenger/
  
  
   -- 
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
  
   Para ver as mensagens antigas, acesse:
   http://br.groups.yahoo.com/group/delphi-br/messages
  
   Para falar com o moderador, envie um e-mail para:
   [EMAIL PROTECTED] ou [EMAIL PROTECTED]
  
   Links do Yahoo! Grupos
  
  
  
  
  
  
  
   





  
  ___ 
  Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe! www.yahoo.com.br/messenger/promocao 


  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Arquivo.DAT

2005-09-14 Por tôpico Vitor Luiz Redes
Olhe, eu dei uma procurada no google, e encontrei algumas coisas 
interessantes... provavelmente é gerado por fontes em Cobol mesmo, a versão não 
tem como saber, acho...mas...

Nesse Fórum tem algumas informações de como utilizar o Rebuild para 
Exportar o arquivo para txt, acho que para você já seria uma mão na roda, caso 
não disponha da estrutura do arquivo.

http://forum.abril.com.br/info/forum.php?topico=144940
http://forum.abril.com.br/info/topicos.php?area=105go_to=2

Bom, pode ser tb, que não seja Cobol, dae a dica do colega tb faria 
sentido, mas acho que o Database Desktop abre direto, independente da extensão 
do arquivo... tenta ae, e qualquer coisa dê um retorno.



constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Levi Ribeiro de Freitas 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, September 14, 2005 5:35 PM
  Subject: RES: [delphi-br] Arquivo.DAT


  Renomeia para extensão dbf e tenta abrir no paradox.
  Alguns programadores trocam as extensoes para segurança.

  Levi

_  

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Cícero
  Enviada em: quarta-feira, 14 de setembro de 2005 16:33
  Para: Listadelphi (E-mail)
  Assunto: [delphi-br] Arquivo.DAT


  Galera estou com um sistema que não deu para descobrir se eh delphi ou
  vb.
  O fato eh que o danado do sistema veio com um formato de base de dados que
  não conheço.
  tabela.DAT
  tabela.IDX

  Que tipo de gerenciador eh esse? Como posso importar para o Access por
  exemplo, para depois levar para sql-server?



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]




  Yahoo! Grupos, um serviço oferecido por:  

  PUBLICIDADE



  http://br.rd.yahoo.com/SIG=12fuup636/M=365837.7000707.7924794.2369893/D=brc
  lubs/S=2137111264:HM/Y=BR/EXP=1126733518/A=2950750/R=2/id=noscript/SIG=10tif
  t5qr/*http://br.movies.yahoo.com/ 

_  

  Links do Yahoo! Grupos


  *  Para visitar o site do seu grupo na web, acesse:
  http://br.groups.yahoo.com/group/delphi-br/


  *  Para sair deste grupo, envie um e-mail para:
  [EMAIL PROTECTED]
  mailto:[EMAIL PROTECTED] 


  *  O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
  Serviço do Yahoo! http://br.yahoo.com/info/utos.html . 




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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Simpledataset

2005-09-05 Por tôpico Vitor Luiz Redes
Propriedade PacketRecords...


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Rodrigo Pereira 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, September 05, 2005 3:05 PM
  Subject: [delphi-br] Simpledataset


  ola a todos,

  tenho um cadastro em que eu utilizo um simpledataset para acesso via um 
sqlconection a questao é que a tabela esta com mais de 500.000 registros e o 
programa leva um tempao para abrir o cadastro, tem alguma configuracao pra o 
simpledataset me retornar apenas uns 20 registros por vez, conforme eu vou 
navegando???


  grato

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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Tem como alterar VALORES do DataSet SEM ALTERAR O SEU ESTADO???

2005-09-01 Por tôpico Vitor Luiz Redes
Cara, eu costumo travar o cadastramento do mestre, até que os detalhes 
estejam prontos, desta forma, você só estaria trabalhando com um número e não 
necessitaria de consultas extras...
Só que uso um framework com poo e não DataControls, portanto a lógica pode 
ser um pouco diferente, mas acredito que sirva...


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Francisco Thiago 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, September 01, 2005 6:16 PM
  Subject: Re: [delphi-br] Tem como alterar VALORES do DataSet SEM ALTERAR O 
SEU ESTADO???


  Seria uma saída... mas por se tratar de uma aplicação multicamadas, não 
  seria a mais viável.. uma vez que o sistema teria que fazer uma consulta ao 
  servidor a cada nova inserção no filho... e consumiria um tempo, coisa que o 
  usuário não gostaria mto :(

  Mas estou quase chegando a uma conclusão aqui se conseguir, passo o 
  código pra vc's


  []'s e obrigado

  Francisco Thiago de Almeida
  Enter  Plug Informática
  Divisão: Desenvolvimento e Banco de dados
  Franca / SP
  msn: [EMAIL PROTECTED]

  - Original Message - 
  From: Joao Morais [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Thursday, September 01, 2005 5:56 PM
  Subject: Re: [delphi-br] Tem como alterar VALORES do DataSet SEM ALTERAR O 
  SEU ESTADO???


   Francisco Thiago wrote:
  
   Sua solução seria uma saída, mas eu posso trabalhar com Mestre/Detalhe.. 
   e
   neste caso, eu não teria a chave do mestre para aplicar aos Detalhes :(
  
   E gerar a chave no cliente?
  
   --
   João Morais
  
  
   -- 
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
  
   Para ver as mensagens antigas, acesse:
   http://br.groups.yahoo.com/group/delphi-br/messages
  
   Para falar com o moderador, envie um e-mail para:
   [EMAIL PROTECTED] ou [EMAIL PROTECTED]
  
   Links do Yahoo! Grupos
  
  
  
  
  
  
  
   




  
  ___ 
  Yahoo! Messenger com voz: PROMOÇÃO VOCÊ PODE LEVAR UMA VIAGEM NA CONVERSA. 
Participe! www.yahoo.com.br/messenger/promocao 


  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]




--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] converter currency em inteiro

2005-08-29 Por tôpico Vitor Luiz Redes
Integer := Trunc( Extended );


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: bene20032004 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, August 29, 2005 7:26 PM
  Subject: [delphi-br] converter currency em inteiro


  Pessoal, parece baba, mas estou levando uma surra nisso !
  Alguém poderia me dizer como faz isso ?
  Muito obrigado por enquanto !




  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Re: Pintar Célula Do DBGrid

2005-08-26 Por tôpico Vitor Luiz Redes
O código é mais ou menos assim...

if Odd( ctrlPesquisa.Text, DATASET.RecNo ) then
 GRID.Canvas.Brush.Color := clSilver
else
 GRID.Canvas.Brush.Color := clWhite;
GRID.DefaultDrawColumnCell( Rect, Field, State );



constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Ref. leiautes Bancarios

2005-08-26 Por tôpico Vitor Luiz Redes
Ae, tenta esse grupo aqui, o componente tem o lay-out do Banco do Brasil...

Site do grupo:
  http://www.yahoogrupos.com.br/groups/delphi-boleto



constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Coluna não existe (Continua)

2005-08-26 Por tôpico Vitor Luiz Redes
Olhe, pode ser que a dica seja inútil, mas já vi problemas assim, não com a 
mesma mensagem, mas com mensagens parecidas e aparentemente inexplicáveis... 
confira todos os componentes DBAware que você está utilizando no formulário em 
que o erro é disparado, talvez algum componentes esteja com a propriedade 
DataSource apontado para algum DataSource que não é o certo...


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Rodrigo Mota 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, August 26, 2005 4:31 PM
  Subject: RES: [delphi-br] Coluna não existe (Continua)


  Estou usando o Trio SQLDataSet, DataSetProvider, ClientDataSet
  Isso que vc falow abaixo não precisa fazer não, os dados retornados na
  consulta (SQL), são armazenados para manipulação 
  No ClientDataSet la vc altera e tal faz o que vc quiser...ate gerar XML
  se quisertb ..daí vc da um ApplyUpdate(0); e 
  Prontoele joga no banco somente os dados que foram alterados...

  Se vc ainda não usa esses componentes...kara são bem bacanas...só que
  estou apanhando agora...pra ficar bom depois
  Mais ta valendo...

  Abraços,

  Rodrigo
  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  Em nome de Alisson Ricardo Viol Gazda
  Enviada em: sexta-feira, 26 de agosto de 2005 09:44
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Coluna não existe (Continua)

  Bom dia.

  Se eu entendi bem, vc está pegando uma query e está tentando alterar o
  dados do resultado? Se for isso mesmo, o erro está aí. Quando você tem
  uma query aquilo é necessariamente uma consulta. Caso você queira
  alterar algum dado via SQL, vc precisa utilizar as intruções INSERT INTO
  TABELA(CAMPOS1, CAMPO2) VALUES (VALOR1, VALOR2), ou somente para
  atualizar UPDATE TABELA SET CAMPO1=VALOR1, CAMPO2=VALOR2 WHERE CLÁUSULA
  QUE RETORNE OS REGISTROS QUE VC QUER ALTERAR. Normalmente uso assim.

  Espero que tenha ajudado
  Alisson Ricardo Viol Gazda
- Original Message - 
From: Rodrigo Mota 
To: delphi-br@yahoogrupos.com.br 
Sent: Friday, August 26, 2005 9:05 AM
Subject: RES: [delphi-br] Coluna não existe (Continua)


Oi galera 

Então nesse meu SQL--- select * from FUNCIONARIOS,
INFCONTRATACAO WHERE INF_FUN_ID = FUN_ID
  Ele funciona rodo essa instrução e ele me da os dados, só que
quando altero...ele da o erro
Fiz também o que os meus amigos me mandaram SQL--- select * from
FUNCIONARIOS, INFCONTRATACAO WHERE infcontratacao.INF_FUN_ID =
funcionarios.FUN_ID

Adriano fiz a sua dica e também continua dando o mesmo erro:
DataBase Server Error: Unknown Column 'inf_fun_id' in 'where clause'.

Estou apanhando desse Trio de Componentes, se alguém tiver mais coisas
para mandar
Estou no aguardo...

Valew,

Rodrigo




Nobre colega.

Tente seu sql assim:

select * from FUNCIONARIOS, INFCONTRATACAO WHERE
infcontratacao.INF_FUN_ID =
funcionarios.FUN_ID

Isso deve resolver.

Adriano Montatna


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em
nome de Rodrigo Mota
Enviada em: quinta-feira, 25 de agosto de 2005 17:51
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Coluna não existe

Boa tarde galera,

Estou com um problema, estou usando DBexpress com db Mysql Uso o trio
ClientDataset, DatasetProvider e SqlDataset

No meu SqlFuncionariosCont tenho isso na propriedade: CommandText

select * from FUNCIONARIOS, INFCONTRATACAO WHERE INF_FUN_ID = FUN_ID

Quando entro na tela altero algo no cadastro
(DM.cdsFuncionariosCont.ApplyUpdates(0); ele da a seguinte msg.

DataBase Server Error: Unknown Column 'inf_fun_id' in 'where clause' 

Essa coluna inf_fun_id, esta na minha tabela que eu relaciono acima,
  ela
existe, na tabela INFCONTRATACAO.

Já tentei um monte de coisa e nda..se alguém puder ajudar...valew



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



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]

Links do Yahoo! Grupos










--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.344 / Virus Database: 267.10.15/81 - Release Date:
24/8/2005




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
[EMAIL 

Re: [delphi-br] Pintar Célula Do DBGrid

2005-08-25 Por tôpico Vitor Luiz Redes
Acho que não precisa de tudo isso não hein...
No evento DrawColumnCell...

begin
if DATASET.FieldByName( 'CLIENTE' ).AsString = ctrlPesquisa.Text then
GRID.Canvas.Font.Style := [ fsBold ]
else
GRID.Canvas.Font.Style := [ ];
GRID.DefaultDrawColumnCell( Rect, Field, State );
end;

Onde...
DATASET = TTable, TQuery, TSQLQuery, TSimpleDataSet, enfim, o 
componente que estás a usar para acessar os dados, e que está ligado ao 
DATASOURCE do DBGrid.
GRID = O próprio DBGrid...


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Eduardo Silva ® 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, August 25, 2005 9:33 AM
  Subject: RES: [delphi-br] Pintar Célula Do DBGrid


  Amigo, veja este código

  É um bom começo, se alguém quiser dar uma melhorada nele, ou mesmo
  contribuir para esta dica, a comunidade agradece e eu tambem

  procedure TfrmSIAE0101pq.gridSIAE0101pqDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
  var
 I, J, K, L: Integer;
 Fonte : TFont;
 Area  : TRect;
 Cor   : TColor;
 T1, T2, P1: Integer;
 Trecho1, Trecho2, Trecho3 : String;
 Texto, Pesquisar  : String;
  begin
 Area  := Rect;
 Texto := Column.Field.AsString;
 Pesquisar := Trim(edtInformacao.Text);
 T1:= Length(Texto);
 T2:= Length(Pesquisar);
 P1:= Pos(UpperCase(Pesquisar), UpperCase(Texto));

 if (P1 = 0) Then
Exit;

 //CONTEÚDO DESMEMBRADO DA CÉLULA
 Trecho1 := Copy(Texto, 1, P1 - 1);
 Trecho2 := Copy(Texto, P1, T2);
 Trecho3 := Copy(Texto, P1 + T2, T1);

 //CONFIGURAÇÃO ORIGINAL DO DBGRID
 Fonte := gridSIAE0101pq.Font;
 Cor   := gridSIAE0101pq.Color;

 with gridSIAE0101pq.Canvas Do
 begin
//INICIO DO TEXTO
I  := TextWidth(Trecho1);
Area.Right := Area.Right - I;
TextRect(Area, Area.Left, Area.Top, Trecho1);

//TRECHO LOCALIZADO
Brush.Color := clBtnFace;
Font.Color  := clYellow;
Font.Style  := [fsBold] + Fonte.Style;
Font.Size   := Fonte.Size;
if (gdSelected in State) then
begin
   Brush.Color := clRed;
   Font.Color  := clYellow;
end;
J  := TextWidth(Trecho2);
Area.Left  := Area.Left + I + 1;
Area.Right := Area.Left + J + 1;
TextRect(Area, Area.Left, Area.Top, Trecho2);

//FIM DO TEXTO
Brush.Color := Cor;
Font.Assign(Fonte);
if (gdSelected in State) then
begin
   Brush.Color := clHighlight;
   Font.Color  := clHighlightText;
end;
L  := TextWidth(Trecho3);
Area.Left  := Area.Right;
Area.Right := Area.Right + L;
TextRect(Area, Area.Left, Area.Top, Trecho3);
 end;
  end;
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  nome de Cleiton
Enviada em: quinta-feira, 25 de agosto de 2005 08:18
Para: Delhpi
Assunto: [delphi-br] Pintar Célula Do DBGrid


Olá pessoal...

Tenho um formulário para pesquisa em que utilizo um edit e um DBgrid.

O usuário digita por exemplo o nome do cliente no edit e no dbgrid é
  marcado o cliente desejado.

Teria como eu destacar de outra cor ou até mesmo deixar em negrito a
  célula do DBgrid que possui o cliente pesquisado?

Alguém sabe como fazer isso?

Obrigado a todos.
--
Esta mensagem foi verificada pelo sistema de antivírus e
acredita-se estar livre de perigo.



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



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]



  Yahoo! Grupos, um serviço oferecido por:



  
  --
Links do Yahoo! Grupos

  a.. Para visitar o site do seu grupo na web, acesse:
  http://br.groups.yahoo.com/group/delphi-br/

  b.. Para sair deste grupo, envie um e-mail para:
  [EMAIL PROTECTED]

  c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
  Serviço do Yahoo!.



__ NOD32 1.1201 (20050825) Information __

This message was checked by NOD32 antivirus system.
http://www.nod32.com


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



  -- 
   FAVOR REMOVER 

Re: [delphi-br] Como ver o campo alterado no dataset

2005-08-25 Por tôpico Vitor Luiz Redes
Use assim...
if SimpleDataSet.FieldByName( 'TELEFONE' ).OldValue  
SimpleDataSet.FieldByName( 'TELEFONE' ).Value then
ShowMessage( 'Changed' );



constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Ailton Branco 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, August 24, 2005 10:24 AM
  Subject: [delphi-br] Como ver o campo alterado no dataset


  Eu uso o DbExpress (SimpleDataset) , carrego o registro no data set e altero 
um dos campos (ex: Telefone)...

  Tem jeito de na hora do post eu comparar o valor do registro anterior e o 
valor do registro atual...

  ja ouvi que tem jeito mas nao consigo achar como 


  abraços

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






  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Pintar Célula Do DBGrid

2005-08-25 Por tôpico Vitor Luiz Redes
Algo assim, acho que resolve...

if Pos( ctrlPesquisa.Text, DATASET.FieldByName( 'CLIENTE' ).AsString )  0 then
GRID.Canvas.Font.Style := [ fsBold ]
else
GRID.Canvas.Font.Style := [ ];
GRID.DefaultDrawColumnCell( Rect, Field, State );



constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Eduardo Silva ® 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, August 25, 2005 2:20 PM
  Subject: RES: [delphi-br] Pintar Célula Do DBGrid


  Essa dica é legal se vc digitar o valor exato da tabela, se for um valor
  parcial, como fazemos?
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  nome de Vitor Luiz Redes
Enviada em: quinta-feira, 25 de agosto de 2005 13:55
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Pintar Célula Do DBGrid


Acho que não precisa de tudo isso não hein...
No evento DrawColumnCell...

begin
if DATASET.FieldByName( 'CLIENTE' ).AsString = ctrlPesquisa.Text then
GRID.Canvas.Font.Style := [ fsBold ]
else
GRID.Canvas.Font.Style := [ ];
GRID.DefaultDrawColumnCell( Rect, Field, State );
end;

Onde...
DATASET = TTable, TQuery, TSQLQuery, TSimpleDataSet, enfim, o
  componente que estás a usar para acessar os dados, e que está ligado ao
  DATASOURCE do DBGrid.
GRID = O próprio DBGrid...


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message -
  From: Eduardo Silva ®
  To: delphi-br@yahoogrupos.com.br
  Sent: Thursday, August 25, 2005 9:33 AM
  Subject: RES: [delphi-br] Pintar Célula Do DBGrid


  Amigo, veja este código

  É um bom começo, se alguém quiser dar uma melhorada nele, ou mesmo
  contribuir para esta dica, a comunidade agradece e eu tambem

  procedure TfrmSIAE0101pq.gridSIAE0101pqDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
  var
 I, J, K, L: Integer;
 Fonte : TFont;
 Area  : TRect;
 Cor   : TColor;
 T1, T2, P1: Integer;
 Trecho1, Trecho2, Trecho3 : String;
 Texto, Pesquisar  : String;
  begin
 Area  := Rect;
 Texto := Column.Field.AsString;
 Pesquisar := Trim(edtInformacao.Text);
 T1:= Length(Texto);
 T2:= Length(Pesquisar);
 P1:= Pos(UpperCase(Pesquisar), UpperCase(Texto));

 if (P1 = 0) Then
Exit;

 //CONTEÚDO DESMEMBRADO DA CÉLULA
 Trecho1 := Copy(Texto, 1, P1 - 1);
 Trecho2 := Copy(Texto, P1, T2);
 Trecho3 := Copy(Texto, P1 + T2, T1);

 //CONFIGURAÇÃO ORIGINAL DO DBGRID
 Fonte := gridSIAE0101pq.Font;
 Cor   := gridSIAE0101pq.Color;

 with gridSIAE0101pq.Canvas Do
 begin
//INICIO DO TEXTO
I  := TextWidth(Trecho1);
Area.Right := Area.Right - I;
TextRect(Area, Area.Left, Area.Top, Trecho1);

//TRECHO LOCALIZADO
Brush.Color := clBtnFace;
Font.Color  := clYellow;
Font.Style  := [fsBold] + Fonte.Style;
Font.Size   := Fonte.Size;
if (gdSelected in State) then
begin
   Brush.Color := clRed;
   Font.Color  := clYellow;
end;
J  := TextWidth(Trecho2);
Area.Left  := Area.Left + I + 1;
Area.Right := Area.Left + J + 1;
TextRect(Area, Area.Left, Area.Top, Trecho2);

//FIM DO TEXTO
Brush.Color := Cor;
Font.Assign(Fonte);
if (gdSelected in State) then
begin
   Brush.Color := clHighlight;
   Font.Color  := clHighlightText;
end;
L  := TextWidth(Trecho3);
Area.Left  := Area.Right;
Area.Right := Area.Right + L;
TextRect(Area, Area.Left, Area.Top, Trecho3);
 end;
  end;
-Mensagem original-
De: delphi-br@yahoogrupos.com.br
  [mailto:[EMAIL PROTECTED]
  nome de Cleiton
Enviada em: quinta-feira, 25 de agosto de 2005 08:18
Para: Delhpi
Assunto: [delphi-br] Pintar Célula Do DBGrid


Olá pessoal...

Tenho um formulário para pesquisa em que utilizo um edit e um

Re: [delphi-br] Tfield required false. Erro no metodo post que o campo não está preenchido.

2005-08-25 Por tôpico Vitor Luiz Redes
Atribua 0 ou '' para ele antes de gravar...


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Cleyton 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, August 25, 2005 3:21 PM
  Subject: [delphi-br] Tfield required false. Erro no metodo post que o campo 
não está preenchido.


  Olá Pessoal.

  Estou com um probleminha aqui. 

  Uso Delphi 7, Firebird 1.5 e DbExpress.

  No BD existe um campo not null.
  Ocorre que ao preechencer o clientdataset preciso deixar este campo 
  em branco ao aplicar o método post.
  Vou preencher este campo not null somente antes do applyupdates, pela 
  confirmação do usuário.

  Ocorre que ao dar o clientdataset.post o delphi dá a mensagem de erro 
  que este campo não está preenchido.
  Mesmo estando o Tfield com a repriedade required setada para false, o 
  delphi ainda dá a mensagem.

  Como resolver isto para que eu possa aplicar o método post sem 
  preencher este campo ?

  Uso o trio ClientDataset, DatasetProvider e SqlDataset

  cleyton.





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Somar!?

2005-08-23 Por tôpico Vitor Luiz Redes

SELECT SUM( FALTAS )
   FROM TABELA
GROUP BY SALA 

Tente assim...

Vitor Redes.

  - Original Message - 
  From: ctrlpel 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, August 23, 2005 6:32 PM
  Subject: [delphi-br] Somar!?


  Preciso somar um campo de determinados registro de uma tabela em SQL.

  Ex.: Aluno Turma  Faltas
   Leonardo1  10
   Juliana 2  09
   Débora1  15
   Luiz   3  11

 Faltas da Turma 1 Total = 25
 

  Alguem pode me ajudar?

  Obrigado.




  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Check Box no DBGrid

2005-08-23 Por tôpico Vitor Luiz Redes
Os Infopowers com certeza tem, o QuantumGrid também, e se não me engano tem 
na JediVCL, só procurar no Google, que você acha fácil o terceiro, os dois 
primeiros são pagos...


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Claudiney Cogo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, August 23, 2005 5:12 PM
  Subject: [delphi-br] Check Box no DBGrid


  Olá gente...

  Estou com este dilema, que muita gente já deve estar cansado de ver perguntas 
a respeito.
  Colocar num DBGrid alguns campos booleanos usando check box.
  Li algumas coisas sobre isso e tudo o que encontrei é feito na mão mesmo, 
desenhando os check box em cima da minha grid. Funciona, mas não achei muito 
pratico.
  Pergunta... Esta é a única maneira de se fazer? Ou alguém tem alguma maneira 
mais simples? Ou até mesmo algum outro componente DBGrid de terceiros que 
contenha esta opção.

  No mais, obrigado antecipadamente.
  Claudiney.

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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] menu Popup em grid(botão direito )...

2005-08-23 Por tôpico Vitor Luiz Redes
O DBGrid tem uma propriedade chama PopupMenu, associe seu TPopupMenu ali, e 
quando o grid for clicado com o botão direito do mouse...


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: José Maria 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, August 23, 2005 7:14 AM
  Subject: [delphi-br] menu Popup em grid(botão direito)...


  Olá PessoALL,

   Alguém sabe como fazer? Quero mostrar um grid com vários
  registros. Ao selecionar um registro do grid com o botão direito do
  mouse, abrir um meno com novas ações. É possível isto? Se possível, me
  mande algum exemplo em PVT. 

  []s
  José Maria
  jmchenri arroba uem.br.




  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Distribuicao Delphi + ClientDataSet + DbExpress + Firebird Embarcado

2005-08-23 Por tôpico Vitor Luiz Redes
Vou arriscar cara, mas acho que falta o midas.dll, já tive de distribuir o 
ps2mon.dll tb, mas não me recordo por quê, teste com os dois separados para 
saber se ambos são necessários ou não...


constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;

end.
  - Original Message - 
  From: Francisco Trindade 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, August 23, 2005 2:10 PM
  Subject: [delphi-br] Distribuicao Delphi + ClientDataSet + DbExpress + 
Firebird Embarcado


  Bom dia pessoal,

  estou tentando fazer um instaladador para um programa que usa ClientDataSet 
  + DbExpress + Firebird Embarcado. 
  O problema eh que aparentemente estou me esquecendo de algum arquivo 
  necessario ao programa, visto que em determinadas maquinas ocorre erro de 
  acesso ao banco.

  Os arquivos que estou distribuindo junto com o programa sao os seguintes:

  Firebird Embarcado:
  Source: \bd\FBE\FB\*;
  Source: bd\FBE\Readme.txt
  Source: \bd\FBE\fbembed.dll
  Source: \bd\FBE\firebird.conf
  Source: \bd\FBE\ib_util.dll
  Source: \bd\FBE\IDPLicense.txt;
  Source: \bd\FBE\IPLicense.txt
  Source: \bd\FBE\ArquivoBD.fdb;

  DbExpress
  Source: \dbexpint.dll

  Gostaria de saber se alguem pode me ajudar nessa questao, dizendo se esses 
  saor os arquivos necessarios ou existem mais algum do qual estou me 
  esquecendo.

  Obrigado pela ajuda,
  Francisco Trindade
  [EMAIL PROTECTED]


  -- 
  --
  Francisco Trindade


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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] try..except não funciona com DBExpress(?)

2005-06-03 Por tôpico Vitor Luiz Redes
Olhe, se não me engano, o seu bloco Try está errado, tente assim ...

conn.StartTransaction(TD);
try
try
csdCliente.ApplyUpdates(0);
 except
   conn.RollBack(TD);
finally
conn.Commit(TD);
end
end;

Foi mal se estiver com algo errado, eu não testei ... mas assim deve 
funcionar ...

Vitor Redes

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Re: Help!!! Função para retornar nº positivo - Como se faz?

2005-06-01 Por tôpico Vitor Luiz Redes
Comentário inútil o que eu vou fazer agora, mas não posso deixar de faze-lo 
...

Olhe a Rússia e os EUA hoje em dia ...


  - Original Message - 
  From: Francisco Thiago 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, June 01, 2005 4:29 PM
  Subject: Re: [delphi-br] Re: Help!!! Função para retornar nº positivo - Como 
se faz?


  Uma vez eu li uma história:

  Os americanos precisavam escrever, em papel, no espaço. Mas canetas não 
  funcionam lá (pcausa do vácuo, eu acho).

  Então investiram bilhões em pesquisa e equipamento e então conseguiram uma 
  caneta azul que escrevia no vácuo e apagava e tudo mais...



  Os Russos usaram lápis e borracha







  - Original Message - 
  From: Fernando [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Wednesday, June 01, 2005 4:03 PM
  Subject: [delphi-br] Re: Help!!! Função para retornar nº positivo - Como se 
  faz?


  Boa tarde colega.

  Utilize a função que retorna o absoluto do valor.
  Exemplo:

  Abs(100) = 100
  Abs(-100) = 100

  Atenciosamente,
  Fernando.
--

  No virus found in this outgoing message.
  Checked by AVG Anti-Virus.
  Version: 7.0.323 / Virus Database: 267.4.0 - Release Date: 01/06/05


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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]

  Links do Yahoo! Grupos












  
  
  Yahoo! Mail, cada vez melhor: agora com 1GB de espaço grátis! 
http://mail.yahoo.com.br 


  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]




--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Tutorial - Romario

2005-05-20 Por tôpico Vitor Luiz Redes
Atribua -1 ao código ...

Vitor Redes
  - Original Message - 
  From: Cristiano Rodrigo Gomes 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, May 20, 2005 8:16 AM
  Subject: [delphi-br] Tutorial - Romario


  Romario valeu, consegui finalmente criar um bd e ligar uma tabela ao form. 
  Valeu mesmo.

  Depois neste exemplo que vc mandou tentei acrescentar os botões, novo, 
  alterar, excluir, cancelar e gravar.

  Só encontrei problemas no botão gravar, mas tbém acho q tem relação com o 
  botão novo, pois qdo clico para ele gravar ele exibe a seguinte mensagem : 
  projetc sgc raised.. field 'agen_codi' must have a value

  O que acontece ele não está gerando o código de auto inclemento, se eu 
  pessoalmente digitar o próximo código no dbedit do código ele grava 
  normalmente porém se não fizer isso ele mostra aquela mensagem.

  Obs. criei o trigger no bd para gera o próximo código.

  Ah, tbém se puder me mandar o exemplo de como ficaria o commit para os 
  botões novo, gravar, cancelar e alterar vou ficar muito grato.


  Espero poder me ajudar.

  Grato

  Cristiano.

  _
  MSN Hotmail, o maior webmail do Brasil. http://www.hotmail.com



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]




--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] locate com chave composta

2005-05-18 Por tôpico Vitor Luiz Redes
Locate( 'CHAVE1;CHAVE2', VarArrayOf( [ CODIGO, CODIGO ] ), [] ) ...

Tente assim, caso não dê certo, informe, blz ?

Vitor Redes


  - Original Message - 
  From: Info Desenvolvimento 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, May 18, 2005 9:54 AM
  Subject: [delphi-br] locate com chave composta


  Como faço para dar um locate com chave composta

  PAULO FERNANDES



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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]




--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] DISCUSSÃO COMMIT

2005-05-17 Por tôpico Vitor Luiz Redes
Cristiano, não tenho certeza, mas o Paradox tem algo como DBISaveChanges, 
acredito que o componente TTable tenha esse método, eu vi em alguma aplicação, 
mas infelizmente não posso confirmar, é só uma dica ... na realidade, a 
aplicação que eu vi, tinha uma chama a este método e um comentário, dizendo que 
tal método deveria salvar os dados. Agora, não tenho certeza.

Vitor Redes


  - Original Message - 
  From: Cristiano Rodrigo Gomes 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, May 17, 2005 9:46 AM
  Subject: [delphi-br] DISCUSSÃO COMMIT


  Olá pessoal lendo a respeito do COMMIT no grupo me surgiram algumas dúvidas 
  a respeito e gostaria que alguém pudesse ajudar pois pretendo utilizá-lo em 
  meu sistema...

  1 - Afinal é possível ou não utilizá-lo em tabelas paradox?

  2 - Se possível como ficaria por exemplo os botões, novo, gravar e cancelar 
  de um cadastro por exemplo?

  3 - Se não for possível, gostaria de saber realmente como faria para não 
  correr o risco de perder dados digitados, ou seja, ele realmente gravar logo 
  após confirmar...


  Espero receber ajuda.

  Grato.

  Cristiano.

  _
  MSN Busca: fácil, rápido, direto ao ponto.  http://search.msn.com.br



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]




--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Erro em PROCEDURE

2005-05-16 Por tôpico Vitor Luiz Redes
Eduardo, não está retornando valor algum, porque não existe o campo. Não 
existe Retunrs na procedure, e a mesma não está atribuindo valor a nenhum 
campo. Pelo que entendi esta é uma procedure para atualizar o estoque.


Vitor Redes.

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Como alinhar um MaskEdit

2005-05-16 Por tôpico Vitor Luiz Redes
O Rubem, aqui da lista, publicou um artigo na clube delphi, ano passado, se 
não me engano ... procure nos arquivos da lista ... ou, Rubem, você não lembra 
o link ?

Vitor Redes


  - Original Message - 
  From: Adalberto Sousa Monteiro 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, May 16, 2005 12:56 PM
  Subject: [delphi-br] Como alinhar um MaskEdit


  Bom dia a todos,
  Gostaria de saber se alguem sabe me dizer como faço para mostrar um campo
  numerico/valor em um MaskEdit alinhado a direita?

  E tambem, como faço para a digitação nesse maskedit, vir da direita para
  esquerda.

  Se alguem puder me dar uma força

  Desde ja agradeço



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]




--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Algoritmo

2005-05-16 Por tôpico Vitor Luiz Redes
Geralmente você pode usar somente as dll´s disponibilizadas pela empresa 
que fabricou a impressora, dll´s de terceiros são proibidas.
Ainda bem que isso é possível, brincar com os protocolos não é tão legal 
... hehehe.
Mas o melhor é você entrar em contato com o órgão responsável na Bahia 
mesmo, não tem jeito.

Vitor Redes


  - Original Message - 
  From: jrgaraujo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, May 16, 2005 7:02 PM
  Subject: [delphi-br] Algoritmo


  Pessoal, Alguem tem alguma informacao sobre o que é preciso para 
  homologar o programa aplicativo para impressora fiscal aqui na Bahia?

  Sobre o algoritmo que eles pedem, precisa ser do sistema todo ou 
  apenas das rotinas principais?

  Valeu?





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]




--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Auto-Incremento

2005-05-12 Por tôpico Vitor Luiz Redes
Criem um campo CODIGOQUEOCLIENTEQUERQUESEJANAOSEIPORQUE 
varchar 1milhão ... pronto, vc só vai precisar ordenar em raríssimos casos !
  - Original Message - 
  From: Eduardo E. J. Menoncello 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 12, 2005 4:00 PM
  Subject: RES: [delphi-br] Auto-Incremento


  E se tivesse letra no código?


  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  Em nome de Wilson Valdevite
  Enviada em: quinta-feira, 12 de maio de 2005 15:22
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Auto-Incremento

  eu só ordenaria a importação dos dados pelo campo de auto incremento.
  Caso tenha algum código pulado, trataria isso para o material ficar com
  o mesmo código, como já fiz várias vezes...
- Original Message - 
From: Eduardo E. J. Menoncello 
To: delphi-br@yahoogrupos.com.br 
Sent: Thursday, May 12, 2005 12:48 PM
Subject: RES: [delphi-br] Auto-Incremento


Então vou dar um exemplo pra você:

Você consegue um cliente que quer mudar o seu software.

Mas ele vende um chapéu panamá que sabe que o código dele é 324.
E ele tem o direito de querer que o código dele seja 324.

Como você faria isso?

Falaria que o cliente está errado por querer manter os produtos como
  ele
conhece?

[]'s

Eduardo E. J. Menoncello

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Wilson Valdevite
Enviada em: quinta-feira, 12 de maio de 2005 12:44
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Auto-Incremento

Eduardo, voce tem seu ponto de vista e sua forma de trabalhar e eu
  tenho
a minha...
Seus clientes estão acostumados com essa forma e os meus com a minha
forma
O meu auto-incremento não é totalmente interno e eu só uso ele para
diminuir o tamanho das tabelas, índices e outras coisas chatas de se
trabalhar para evitar codificação que para mim é desnecessária.
Eu trabalho dessa forma, e você trabalha de sua forma mas ambos
procurando a mesma coisa: que os programas rodem da melhor forma
possível e é isso que importa, não acha?

Outra coisa: todos os meus clientes sabem que os campos desabilitados
não podem ser editados e eu sempre explico o motivo.
Me desculpe a franqueza mas acho que cada um tem sua forma de
  trabalho.

Eu trabalho assim e não troco meus campos de auto incremendo por nada
nesse mundo pois quero ficar despreocupado com mais uma rotina para
gerar isso e não ficar brigando para uma rotina que gera isso talvez
para cada tabela. Agora se você não vê necessidade nisso, não posso
fazer nada pois é sia visão de trabalho e não a minha.

[]'s

Wilson Valdevite

  - Original Message - 
  From: Eduardo E. J. Menoncello 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 12, 2005 12:22 PM
  Subject: RES: [delphi-br] Auto-Incremento


  Pra que os usuários precisam saber? É interno.
  Se eles precisam saber, então eles podem querer alterar.
  Se eles querem alterar, não pode ser auto-incremento.
  Se não pode ser auto-incremento, você tem que fazer um algoritmo pra
  satisfazer.

  Abraços

  Eduardo E. J. Menoncello

  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br
  [mailto:[EMAIL PROTECTED]
  Em nome de Wilson Valdevite
  Enviada em: quinta-feira, 12 de maio de 2005 12:16
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Auto-Incremento

  particularmente eu não vejo problema nenhum nisso... eu só não
  libero
a
  edição desse item da tabela pois em alguns momentos o usuário
necessita
  saber desse valor
- Original Message - 
From: Eduardo E. J. Menoncello 
To: delphi-br@yahoogrupos.com.br 
Sent: Thursday, May 12, 2005 10:29 AM
Subject: RES: [delphi-br] Auto-Incremento


Sim, esse é outro problema, porque o ideal é que existam 2
  códigos.
Um
visível e outro interno, para controle do programa. Com essa
  estrutura,
você pode deixar um código que o usuário vê e pode alterar, sem
  precisar
se preocupar com sua chave que é o interno. Aliás, você não vai
mesmo
conseguir editar um código de auto-incremento, e por isso que eu
acho
ele problemático. O bom mesmo é que você crie uma forma que gere
  um
auto-incremento ou então crie um algoritmo que resolva o problema,
  como
eu sugeri.

Abraços

Eduardo

-Mensagem original-
De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED]
Em nome de Info Desenvolvimento
Enviada em: quinta-feira, 12 de maio de 2005 09:58
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Auto-Incremento


Re: [delphi-br] Auto-Incremento

2005-05-12 Por tôpico Vitor Luiz Redes
Resposta inútil a sua hein ?
Faz um tempo que não escrevo pro Fórum, reconheço que a minha resposta foi 
um pouco agressiva, mas é uma solução não é ? Tirando a parte de 1 milhão de 
casas ...

Isso que importa, que solucione ... porque a discussão dos colegas não iria 
chegar a lugar algum ...

Mas respondendo a primeira pergunta ...

Eu só vejo vantagens. O controle é interno, menos suscetível a erros, e 
você pode fazer da maneira como bem lhe aprouver. Eu uso stored procedures e 
uma tabela a parte para manter os incrementos, simplesmente para não criar 
geradores para todas as tabelas (trabalho com firebird).


  - Original Message - 
  From: Ricardo Cabral 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 12, 2005 7:15 PM
  Subject: Re: [delphi-br] Auto-Incremento


  Ddpois do filme O Náufrago, tem gente aí que tá nervoso!!!

  Vitor Luiz Redes [EMAIL PROTECTED] escreveu:Criem um campo 
CODIGOQUEOCLIENTEQUERQUESEJANAOSEIPORQUE 
  varchar 1milhão ... pronto, vc só vai precisar ordenar em raríssimos casos !
- Original Message - 
From: Eduardo E. J. Menoncello 
To: delphi-br@yahoogrupos.com.br 
Sent: Thursday, May 12, 2005 4:00 PM
Subject: RES: [delphi-br] Auto-Incremento


E se tivesse letra no código?


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Wilson Valdevite
Enviada em: quinta-feira, 12 de maio de 2005 15:22
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Auto-Incremento

eu só ordenaria a importação dos dados pelo campo de auto incremento.
Caso tenha algum código pulado, trataria isso para o material ficar com
o mesmo código, como já fiz várias vezes...
  - Original Message - 
  From: Eduardo E. J. Menoncello 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, May 12, 2005 12:48 PM
  Subject: RES: [delphi-br] Auto-Incremento


  Então vou dar um exemplo pra você:

  Você consegue um cliente que quer mudar o seu software.

  Mas ele vende um chapéu panamá que sabe que o código dele é 324.
  E ele tem o direito de querer que o código dele seja 324.

  Como você faria isso?

  Falaria que o cliente está errado por querer manter os produtos como
ele
  conhece?

  []'s

  Eduardo E. J. Menoncello

  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  Em nome de Wilson Valdevite
  Enviada em: quinta-feira, 12 de maio de 2005 12:44
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Auto-Incremento

  Eduardo, voce tem seu ponto de vista e sua forma de trabalhar e eu
tenho
  a minha...
  Seus clientes estão acostumados com essa forma e os meus com a minha
  forma
  O meu auto-incremento não é totalmente interno e eu só uso ele para
  diminuir o tamanho das tabelas, índices e outras coisas chatas de se
  trabalhar para evitar codificação que para mim é desnecessária.
  Eu trabalho dessa forma, e você trabalha de sua forma mas ambos
  procurando a mesma coisa: que os programas rodem da melhor forma
  possível e é isso que importa, não acha?

  Outra coisa: todos os meus clientes sabem que os campos desabilitados
  não podem ser editados e eu sempre explico o motivo.
  Me desculpe a franqueza mas acho que cada um tem sua forma de
trabalho.

  Eu trabalho assim e não troco meus campos de auto incremendo por nada
  nesse mundo pois quero ficar despreocupado com mais uma rotina para
  gerar isso e não ficar brigando para uma rotina que gera isso talvez
  para cada tabela. Agora se você não vê necessidade nisso, não posso
  fazer nada pois é sia visão de trabalho e não a minha.

  []'s

  Wilson Valdevite

- Original Message - 
From: Eduardo E. J. Menoncello 
To: delphi-br@yahoogrupos.com.br 
Sent: Thursday, May 12, 2005 12:22 PM
Subject: RES: [delphi-br] Auto-Incremento


Pra que os usuários precisam saber? É interno.
Se eles precisam saber, então eles podem querer alterar.
Se eles querem alterar, não pode ser auto-incremento.
Se não pode ser auto-incremento, você tem que fazer um algoritmo pra
satisfazer.

Abraços

Eduardo E. J. Menoncello

-Mensagem original-
De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED]
Em nome de Wilson Valdevite
Enviada em: quinta-feira, 12 de maio de 2005 12:16
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Auto-Incremento

particularmente eu não vejo problema nenhum nisso... eu só não
libero
  a
edição desse item da tabela pois em alguns momentos o usuário
  necessita
saber desse valor
  - Original Message - 
  From: Eduardo E. J

=?iso-8859-1?Q?Re:_RES:_RES:__=5Bdelphi-br=5D_=5BOFF_TOPIC=5D_Tecnologo_X?= =?iso-8859-1?Q?_Bacharelado_X_Certifica=E7=E3o?=

2005-05-05 Por tôpico Vitor Luiz Redes
Ciências da Computação realmente tem a noite, mas Engenharia de Computação 
só a tarde ou de manhã, aqui em Curitiba, pelo menos até onde eu sei. É um saco 
isso, na verdade.

Vitor Luiz Redes.

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] SimpleDataset ou DataSetProvider + ClientDataSet ?? Tem alguma diferença ??

2005-04-26 Por tôpico Vitor Luiz Redes


Francisco ... gostaria de saber quais bugs vocês se referem tanto ... 
sempre ouvi dizer sobre esses tais bugs e sinceramente, nunca me deparei com 
eles ... as únicas coisas que  devem ser levadas em consideração quanto ao uso 
do TSimpleDataSet, ao meu ver, são suas restrições a sistemas multicamadas ...
Agora, se alguém ae já passou por situações bugadas do TSimpleDataSet, 
por favor, manifeste-se ...

Vitor Luiz Redes

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Como abilitar os Hints de toda a aplicação ?

2005-02-18 Por tôpico Vitor Luiz Redes

Poderia melhorar ...

for n := 0 to ( Application.ComponentCount - 1 ) do
  begin
  if ( FCadcli.components[n].ClassType = TWinControl ) then
  TWinControl (FCadcli.components[n]).Showhint:=True;

  end ;

Mas obviamente, só funcionaria para componentes que estão criados no momento da 
função, portanto, seria interessante chamar um procedimento deste tipo, 
passando componente como parâmetro ...

Vitor Redes.




  - Original Message - 
  From: Otavio Gasparovic do Nascimento 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, February 18, 2005 11:30 AM
  Subject: RES: [delphi-br] Como abilitar os Hints de toda a aplicação ?


  uma idéia seria:

  var n : LongInt ;
  begin
  for n := 0 to ( FCadcli.ComponentCount - 1 ) do
begin
if ( FCadcli.components[n].ClassType = TDBMemo ) then
TDBMemo (FCadcli.components[n]).Showhint:=True;
if ( FCadcli.components[n].ClassType = TEdit ) then
TDBEdit (FCadcli.components[n]).Showhint:=True;
if ( FCadcli.components[n].ClassType = TMaskEdit ) then
TDBEdit (FCadcli.components[n]).Showhint:=true;

end ;
  end;

  para cada tipo de componente..

  espero ter ajudado.


  Otavio - Cidreira/RS
  [EMAIL PROTECTED]



  -Mensagem original-
  De: Marcelo Silva [mailto:[EMAIL PROTECTED]
  Enviada em: sexta-feira, 18 de fevereiro de 2005 12:20
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] Como abilitar os Hints de toda a aplicação ?



  Pessoal tentei o compando (Application.ShowHint := True) para abilitar todos
  os hints de todos os forms existentes na aplicação mas não da certo...
  alguém tem alguma dica para eu não precisar entrar em um por um para
  abilitar ?


  Marcelo Silva
  Cel. 11 9693-4251
  ICQ - 49224093
  MSN [EMAIL PROTECTED]
--

  Internal Virus Database is out-of-date.
  Checked by AVG Anti-Virus.
  Version: 7.0.300 / Virus Database: 265.8.7 - Release Date: 10/02/2005


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



  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]

  Links do Yahoo! Grupos











  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Salvando TXT

2005-02-18 Por tôpico Vitor Luiz Redes

Ele irá salvar no formato TXT.

Vitor Redes.


  - Original Message - 
  From: Gabriel Moricz 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, February 16, 2005 4:38 PM
  Subject: [delphi-br] Salvando TXT




  Pessoal..

  Tirem uma duvida minha...

  Se eu deu um assignfile, e salva-lo, acredito eu que ele vai salvar o 
  texto em formato Win..Existe alguma forma ele salvar em formato Ms-
  Dos


  Aguardo retorno...

  Muito Obrigado...


  Gabriel Moricz








  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
São Paulo Rio de Janeiro Curitiba Porto Alegre Belo 
Horizonte Brasília  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Apagar data de tabela paradox

2005-01-13 Por tôpico Vitor Luiz Redes

O problema é que 0 É uma data, se não me engano 30/12/1899 ... portanto não 
é um valor nulo ...
No paradox eu não sei, mas em bancos de dados, uma data pode ser nula sim, 
como qualquer outro campo ...

---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Usuário mudou as configurações de aparência e bagunçou o sistema!

2005-01-12 Por tôpico Vitor Luiz Redes

Deixe o Parent Font dos componentes = FALSE


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: Christian Balz 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 12, 2005 2:24 PM
  Subject: RES: [delphi-br] Usuário mudou as configurações de aparência e 
bagunçou o sistema!


  Adriano,



  As cores eu consegui resolver, o meu problema realmente é com as fontes.



  Mas fico grato pela sua atenção,


  []'s

  Christian Balz



_  

  De: Adriano Regiani [mailto:[EMAIL PROTECTED] 
  Enviada em: quarta-feira, 12 de janeiro de 2005 15:08
  Para: delphi-br@yahoogrupos.com.br
  Assunto: RES: [delphi-br] Usuário mudou as configurações de aparência e
  bagunçou o sistema!




 Boa tarde Christian,

   As cores, configure como a cor mesmo (usando o código dela, ou aquelas
  clBlues, clWhite etc), não use as clBtnFace e demais, pois estas pegam as
  cores da aparência do Windows.


  Adriano Navarrete Regiani


  Analista de Sistemas

  Alcis - excelência em tempo real
  Av. Engenheiro Luis Carlos Berrini,1461 4° andar
  Cep 04571-011 Brooklin Novo

  São Paulo - SP - Brasil 
  mailto:[EMAIL PROTECTED]
  Phone/Fax: + 55 (11) 5506.5442 
  Phone/Fax: + 55 (11) 5506.5442 


  -Mensagem original-
  De: Walter Alves Chagas Junior [mailto:[EMAIL PROTECTED]
  Enviada em: quarta-feira, 12 de janeiro de 2005 14:05
  Para: 'delphi-br@yahoogrupos.com.br'
  Assunto: RES: [delphi-br] Usuário mudou as configurações de aparência e
  bagunçou o sistema!



  Tá, mas e se o usuário mudar a aparência de novo?



  []s

  Walter Alves Chagas Junior
  Projeto e desenvolvimento
  Telemont Engenharia de telecomunicações
  [EMAIL PROTECTED]
  Fone: (31) 3389-8215 Fax: (31) 3389-8200



   -Mensagem original-
   De: Filipe [mailto:[EMAIL PROTECTED]
   Enviada em: quarta-feira, 12 de janeiro de 2005 12:00
   Para: delphi-br@yahoogrupos.com.br
   Assunto: Re: [delphi-br] Usuário mudou as configurações de aparência e
   bagunçou o sistema!
   
   
   
   Tente Compilá-lo com a nova aparência.
 - Original Message - 
 From: Christian Balz 
 To: delphi-br@yahoogrupos.com.br 
 Sent: Wednesday, January 12, 2005 12:18 PM
 Subject: [delphi-br] Usuário mudou as configurações de 
   aparência e bagunçou o sistema!
   
   
 Ola pessoal,
   
   
   
 Tenho um usuário que modificou as configurações de 
   aparência do Windows XP,
 como tamanho e tipo de fontes. O problema é que estas 
   configurações estão
 afetando a aplicação porque elas acabam por redimensionar alguns
 componentes, além de alterar algumas fontes do sistema, 
   como por exemplo, no
 MainMenu, StatusBar entre outros.
   
   
   
 Existe a possibilidade fazer com que o sistema não seja 
   afetado por estas
 configurações. Fazer com que a aplicação não assuma as 
   fontes do Windows?
   
   
   
 []'s
   
 Christian Balz
   
   
   
 [As partes desta mensagem que não continham texto foram removidas]
   
   



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]







  Yahoo! Grupos, um serviço oferecido por:



  PUBLICIDADE

  http://br.rd.yahoo.com/SIG=12a1jg6tk/M=264379.5078783.6203979.1588051/D=brc
  lubs/S=2137111264:HM/EXP=1105633056/A=2332652/R=0/id=noscript/SIG=119058f8i/
  *http:/br.download.yahoo.com/messenger/ 



_  

  Links do Yahoo! Grupos

  *  Para visitar o site do seu grupo na web, acesse:
  http://br.groups.yahoo.com/group/delphi-br/

  *  Para sair deste grupo, envie um e-mail para:
  [EMAIL PROTECTED]
  mailto:[EMAIL PROTECTED] 

  *  O uso que você faz do Yahoo! Grupos está sujeito aos Termos
  http://br.yahoo.com/info/utos.html  do Serviço do Yahoo!. 



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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




[As partes desta mensagem que não

Re: [delphi-br] Apagar data de tabela paradox

2005-01-12 Por tôpico Vitor Luiz Redes


Já tentou Campo.Clear ?


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: alisson_delphi 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, January 12, 2005 4:15 PM
  Subject: [delphi-br] Apagar data de tabela paradox



  Galera, preciso apagar uma data de uma tabela paradox.
  Na tabela esta marcando 30/12/1899, o campo é do tipo date.
  Como eu faço para apaga-lo ?

  Já tentei:
  tabelacampodata.asdatetime := 0;
  tabela.fieldbyname('data').AsDateTime := 0;
  tabelacampodata.isnull;

  Nada deu certo.
  To deseperado.
  Obrigado






  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
 
  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Re: Redimensionamento da Aplicação

2005-01-07 Por tôpico Vitor Luiz Redes

Quando o controle deve ficar a esquerda e acima, a propriedade deve ser, 
left true, e top true ... e assim por diante ... desta maneira, quando a tela 
for modificada, maximizada ou seja lá o que acontecer, o controle permanecerá 
no seu lugar de origem ...


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: Douglas - CPD 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, January 07, 2005 10:10 AM
  Subject: RES: [delphi-br] Re: Redimensionamento da Aplicação


  Gostaria de saber de qual forma, se utiliza a propriedade anchor, para fazer
  esse redimensionamento ?



  
  

  Douglas - CPD
  SISTEMAS - Torres
  (   Ramal 225
  *   [EMAIL PROTECTED]
  *   [EMAIL PROTECTED]


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] [OFF TOPIC] - Orgulho de ser Gaucho

2004-12-21 Por tôpico Vitor Luiz Redes

Me desculpem mais uma mensagem sobre o assunto .. mas isso é ridículo !!! 
Se forem mandar Off Topics, por favor, mandem algo que talvez faça com que os 
outros creçam, ou que pelo menos, adquiram um pouco mais de conhecimento !!!
Quer dizer que os Gaúchos são as melhores pessoas do mundo então ?  Uma 
coisa é se indiguinar com o fato de que os Gaúchos são meio perseguidos, 
outra é ficar arranjando motivos ridículos para se auto afirmar ...
Off Topic bem Off Topic mesmo, é para listas que tem poucos integrantes, e 
não para listas extremamente movimentadas ...


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] DBexpress + DBGrid

2004-12-20 Por tôpico Vitor Luiz Redes

Memo.Lines.Add('CODIGO = '+ClientDataSet.FieldByName('CODIGO').AsString);
Memo.Lines.Add('NOME = '+ClientDataSet.FieldByName('NOME').AsString)

Coloque a rotina acima em algum button ou coisa parecida, mude o registro 
selecionado no grid e teste ...


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: Wenceslau Miranda 
  To: [EMAIL PROTECTED] ; [EMAIL PROTECTED] ; [EMAIL PROTECTED] 
  Sent: Sunday, December 19, 2004 7:59 PM
  Subject: [delphi-br] DBexpress + DBGrid


  gostaria de saber se algum membro do grupo conseguiu passar o centeúdo de uma 
linha ou coluna selecionada em um DBgrid para um Memo ou Listbox, pois estou 
quebrando a cabeça aqui e nada. Sou iniciante em delphi e toda  ajuda será bem 
vinda,
  Etou usando o s componentes da palheta dbExpress sqlconexion, sqlDataset, 
datasetprovider, clietdataset, datasource, ligados ao BD Firebird. consegui uma 
rotina na internet mas não funcionou com o clientdataset.
  Seugue essa rotina em anexo. 
  Se alguém puder me dar uma luz ficarei muito grato.


  
  -
  Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! 
agora.

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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
 
  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Chamar uma função a partir de uma variável

2004-12-20 Por tôpico Vitor Luiz Redes

variavel := teste;
showmessage(variavel);

ou showmessage(Teste);




---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: Juarez Nasato 
  To: [EMAIL PROTECTED] 
  Sent: Monday, December 20, 2004 8:57 AM
  Subject: [delphi-br] Chamar uma função a partir de uma variável


  Olá a todos,

  Tenho a função:

  function TDtmImportarRegistros.teste():string;
  begin
 result:= 'hello';
  end;

  e quero chamá-la a partir do conteúdo de uma variável:

  procedure TfrmImportarRegistros.Button1Click(Sender: TObject);
  var
 var, res : string;
  begin
 var := 'teste()';
 res := pchar(var);
 showmessage(res);
  end;
  Tentei com pchar, mas não funcionou, alguém tem alguma dica
  Obrigado,
  []s
  Juarez

  
  -
  Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador do Yahoo! 
agora.

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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
São Paulo Rio de Janeiro Curitiba Porto Alegre Belo 
Horizonte Brasília  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Erro no ShowModal ? FactorPlus

2004-12-20 Por tôpico Vitor Luiz Redes

Talvez seja alguma instrução no OnShow do formulário ...


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: Listas - Giratto Sistemas 
  To: [EMAIL PROTECTED] 
  Sent: Monday, December 20, 2004 12:45 PM
  Subject: [delphi-br] Erro no ShowModal ? FactorPlus


  Galera, bom dia !

  Estou com uma mensagem de erro que nao consegui resolver, é o seguinte:

  Em um botao de minha toolbar eu estou executando o seguinte texto:

   FmGerenciamento := TFmGerenciamento.Create(self);
   FmGerenciamento.ShowModal;
   FmGerenciamento.Release;

  Na hora em que o sistema vai executar o ShowModal, ele me retorna a 
  seguinte mensagem:

   Project FactorPlus.exe raised exception class EInvalidOperation with 
  message 'Cannot make a visible window modal'. Process stopped. Use Step 
  or Run to continue. 

  Galera não estava dando erro antes, do nada sem mudanças nenhuma ele 
  passou a dar erro, se mudei algum parametro foi sem querer.

  Espero que alguem possa me ajudar, pois chequei componente por 
  componente e todos estao como visible = true.

  Marcelo Giratto



  -- 
  No virus found in this outgoing message.
  Checked by AVG Anti-Virus.
  Version: 7.0.296 / Virus Database: 265.5.4 - Release Date: 15/12/2004



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
São Paulo Rio de Janeiro Curitiba Porto Alegre Belo 
Horizonte Brasília  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Cadastro de Cidades do Brasil

2004-12-10 Por tôpico Vitor Luiz Redes


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Chamar form

2004-12-10 Por tôpico Vitor Luiz Redes

´Já que você irá usar um Formulário de outro projeto, adicione o Formulário 
ao segundo projeto, o chame o executável passando um parâmetro, como por 
exemplo ...

Winexec('executavel chamabancos' 

E no executável que contém o banco, ao ser mostrado, teste o parâmetro 
passado ... 
if ParamStr(0) = 'chamarbanco' then
begin
banco.showmodal;
application.terminate ...
end

Mas claro, o descrito acima é uma gambiarra, ao meu ver ... acho que melhor 
compartilhar o TForm com os dois projetos mesmo ...


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: Valcir José Tasquim 
  To: [EMAIL PROTECTED] 
  Sent: Friday, December 10, 2004 11:30 AM
  Subject: [delphi-br] Chamar form


  Bom dia!!!

  Tenho dois Sistemas que executam independente um do outro, só que preciso 
chamar o Form de cadastro de cheques do sistema principal, dentro do outro 
executavel.
  Como eu posso fazer ou qual comando eu poderia usar, para chamar o form de um 
outro sistema dentro de outro.

  Obrigado


  Valcir José Tasquim
  [EMAIL PROTECTED]



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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
São Paulo Rio de Janeiro Curitiba Porto Alegre Belo 
Horizonte Brasília  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] SQL com erro básico

2004-12-10 Por tôpico Vitor Luiz Redes

Tente assim :

'SELECT NF.NF, NF.NatOpr, NF.DescrOpr, NF.DtEmiss, NF.VlNF, NF.VlICMS FROM 
NF'


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: Marcelo 
  To: lista-delphi ; Delphi-br ; delphi Lista 
  Sent: Friday, December 10, 2004 9:29 PM
  Subject: [delphi-br] SQL com erro básico


  Olá pessoal

  Estou tentando gerar um relatório, mas está dando esso na minha query, e como 
sou novato nisso, estou meio perdido.
  A Query é a seguinte:
   With QryNF do
   begin
  Close;
  SQL.Clear;
  SQL.Add ('SELECT NF, NatOpr, DescrOpr, DtEmiss, VlNF, VlICMS FROM 
NF');
  VData1 := edDt1.Text;
  VData2 := edDt2.Text;
  VData1 := '#'+FormatDateTime ('mm/dd/yy', StrToDate (VData1))+'#';
  VData2 := '#'+FormatDateTime ('mm/dd/yy', StrToDate (VData2))+'#';
  SQL.Add ('WHERE DtEmiss = '+VData1+'AND DtEmiss = '+VData2);
  SQL.Add ('GROUP BY NatOpr');
  Open;
   end;
  Dá o erro: Você tentou executar uma consulta que não inclui a expressão 'NF' 
especificada como parte de uma função agregada.
  Mas qdo eu retiro a linha do GROUP BY, funciona, embora não agrupe como eu 
desejo.

  Onde estou errando?
  Uso Delphi 5, Access e ADO.

  Marcelo



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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
 
  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 




Re: [delphi-br] Imagens nos botões

2004-12-08 Por tôpico Vitor Luiz Redes

Nesse caso, você deve pintar os bmp´s com uma camada cinza ou de alguma 
outra cor escura ... salvar os dois bmp´s juntos, lado a lado, e colocar o 
NumGlyphs do TSpeedButton para dois ...
Para um exemplo, veja as imagens da Borland no Arquivos de programas - 
Borland Shared ... e por aí vai ...


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---


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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] d8 - windows forms - ponteiros

2004-12-06 Por tôpico Vitor Luiz Redes

Eu não testei, mas, o famoso if Assigned( Objeto ) não funciona ?


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: [EMAIL PROTECTED] 
  To: [EMAIL PROTECTED] 
  Sent: Saturday, December 04, 2004 12:28 PM
  Subject: [delphi-br] d8 - windows forms - ponteiros



  Olá pessoal,
Estou tentando montar um formulário default com windows forms que
  contenha um ponteiro para um menuitem.
Os demais formularios descenderão deste, e cada um terá seu controle do
  menuitem pessoal.
Pelo que pude ver, tenho de armazenar em um intptr e naum mais em um
  ponteiro especifico.
Bom, mas e para eu saber qual o objeto apontado, sendo que é genérico. ??
Tentei também verificar se o objeto estava criado objeto  nil mas tb
  naum funciona em windows forms, alguem sabe como eu posso saber se o
  objeto esta criado ou não?


abraços a todos
 Santcioli





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Então, qualé que é a do .NET?

2004-12-03 Por tôpico Vitor Luiz Redes

QUALIDADE DE SOFTWARE. 

A cara, vai me dizer que o .NET tem tanta qualidade assim. 
Vai dizer que ele é rápido e estável?
Não interessa q com ele seja mais fácil de programar pra web,
o que importa é o funcionamento. 

Pelo menos é o que parece. Vou investir um tempo nisso sim, se não, como 
vou poder opinar ? Aliás, como você pode opinar, se não vai usar o .NET nunca ? 
Como vai saber se ele atende as suas espectativas ? Lendo artigos 
sensacionalistas ? Digo, sensasionalistas de ambas as partes, os prós e contras 
a Microsoft ...

Isso é muitissimo facil de explicar porque a Microsoft encostou o IE no
canto e largou pra lá. NÃO TEM CONCORRENTE!

Cara, a MS não tem concorrentes significativos em várias ramos. 
O próprio SO e a Suíte Office. Por causa disso eles dexam de atualizar 
seus produtos? Não concordo com isso... Se o mercado tá pedindo novas
tecnologias web a MS ainda assim não iria atualizar por causa da falta
de concorrente??? E o comodismo não pode existir numa empresa que
quer se manter no topo.

Não acredito que isso exista lá.

Opera? Sei não. Não fede e nem cheira. 

Bom dae vai de gosto. Temos vários browser alternativos e melhores que
o I.E. Eu uso o Firefox (que é aberto e ESTÁVEL). Por sinal,
se vocês estam acompanhando os números. O Firefox vem crescendo
numa rapidez grande. Quem quiser baixar: http://br.mozdev.org/
Qualquer dúvida me digam.

Crescendo numa rapidez grande comparado ao que ? Meu, usuários instalam o 
Windows e tem o Internet Explorer já ... quem usa browsers alternativos, é quem 
conhece e quer experimentar ou quem trabalha SÓ com outros sistemas 
operacionais ... se não ...

Não tive intenção de ser grosso, apesar de saber que fui. Só que acho
que as pessoas tem q tratar suas opiniões não como verdades absolutas.
Acima estam expressas minha opiniões e se eu estiver errado, isso nós
vamus ver com o tempo. Agora, por favor, não venha dizer coisas que não sabe
e acusar os outros de serem capitalistas. Minhas sinceras desculpas,
mas as vezes se precisa ser enfático contra discursos idiotas.

Quem está dizendo verdades absolutas agora é vc ... e outra, não adianta 
ficar nervoso com essas coisas meu. A rivalidade vai existir sempre, se não as 
coisas não melhorariam. O Linux sempre vai existir, mas nunca será um Windows, 
e vice-versa ... um sempre estará a frente do outro em alguns quesitos ...

Führ
---
.NET a puta que pariu!

Ok.

---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: Gustavo Führ - RDC 
  To: [EMAIL PROTECTED] 
  Sent: Friday, December 03, 2004 4:18 PM
  Subject: RES: [delphi-br] Então, qualé que é a do .NET?


  Primeiro, 
  acredito que para se manter uma discussão de auto nível, deve-se
  saber do que está se falando senão saí merda como algumas ae embaixo.


  QUALIDADE DE SOFTWARE. 

  A cara, vai me dizer que o .NET tem tanta qualidade assim. 
  Vai dizer que ele é rápido e estável?
  Não interessa q com ele seja mais fácil de programar pra web,
  o que importa é o funcionamento. 


  framework for todo aberto, daí nego começa a
  fuçar nele e daí que ele começa a ficar instável do mesmo jeito

  Vem cá, o Windows é estável? Opa, não! E ele é código
  fechado. O Linux, por outro lado, é código aberto e é muito mais
  estável que o Windows. Vai estudar antes de vim falar que o
  open source não funciona.

  Uma crítica que tem que ser fechada mesmo e a outra customizável

  Sim, sim... A Microsoft vai fazer isso claro. Junto com o Papai Noel
  e Elvis. Ridicúlo esse pensamento de que só metade código aberto...
  Se uma parte depende de todo o resto como tu vai mexer só em uma.

  a estudar o DHTML
  O avanço tem que ser bem maior que isso. A tecnologia web tá 
  bem longe de substituir. Mas isso vcs sabem... 


  Isso é muitissimo facil de explicar porque a Microsoft encostou o IE no
  canto e largou pra lá. NÃO TEM CONCORRENTE!

  Cara, a MS não tem concorrentes significativos em várias ramos. 
  O próprio SO e a Suíte Office. Por causa disso eles dexam de atualizar 
  seus produtos? Não concordo com isso... Se o mercado tá pedindo novas
  tecnologias web a MS ainda assim não iria atualizar por causa da falta
  de concorrente??? E o comodismo não pode existir numa empresa que
  quer se manter no topo.


  Opera? Sei não. Não fede e nem cheira. 

  Bom dae vai de gosto. Temos vários browser alternativos e melhores que
  o I.E. Eu uso o Firefox (que é aberto e ESTÁVEL). Por sinal,
  se vocês estam acompanhando os números. O Firefox vem crescendo
  numa rapidez grande. Quem quiser baixar: http://br.mozdev.org/
  Qualquer dúvida me digam.


  HEHEHE, pago pra ver ce sustentar isto até o final!
  Quero ver um cliente te pagar 10 mil num projeto que requeira dotNET, se
  você não faz...


  Quem é tu pra dizer que

Re: [delphi-br] Re: Ajuda em Procedure

2004-12-02 Por tôpico Vitor Luiz Redes

eu coloquei uma há algum tempo na área de arquivos do grupo ...


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: [EMAIL PROTECTED] 
  To: [EMAIL PROTECTED] 
  Sent: Thursday, December 02, 2004 3:50 PM
  Subject: Re: [delphi-br] Re: Ajuda em Procedure



  Valmir, é tipo assim: eu quero criar uma procedure pra disparar sempre pra
  poder abrir meus formulários...nessa procedure eu vou fazer um teste pra
  ver primeiro se o usuário tem acesso...depois abro...assim evita de ter no
  meu form principal várias vezes o teste por exemplo:

if F_Sacados = NIL then
  Application.CreateForm(TF_Sacados, F_Sacados);
F_Sacados.ShowModal;

  então eu quero criar uma procedure que faça isso pra todos os forms

  Richard Wagner
  [EMAIL PROTECTED]
  [EMAIL PROTECTED]
  ICQ: 171647537

   ...E se a música parar, só restará o som da chuva,
  toda a esperança e glória, todo o sacrifício em vão.
  E se o amor remanescer, mesmo tudo estando perdido,
  nós pagaremos o preço e não contaremos o custo...

  Neil Peart



 
  valmsrj 
 
  [EMAIL PROTECTED]   Para:   
[EMAIL PROTECTED]  
  21.com.br   cc:  
 
   Assunto: [delphi-br] Re: Ajuda 
em Procedure   
  02/12/2004
 
  15:24 
 
  Favor 
 
  responder a   
 
  delphi-br 
 

 

 






  Não entendi muito bem o q vc quer mas acho q assim vai ficar melhor
  (é só uma sugestão). Se não for isso, me diga...

  // implementação
  procedure TForm1.ShowForm(Form: TForm);
  var
F: TForm;
  begin
F:= TForm.Create(Application);
F.ShowModal;
F.Release;
  end;

  // chamando o método
  ShowForm(Form2);


  Valmir Santana
  [EMAIL PROTECTED]





  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]

  Links do Yahoo! Grupos














  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
São Paulo Rio de Janeiro Curitiba Porto Alegre Belo 
Horizonte Brasília  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Então, qualé que é a do .NET?

2004-12-02 Por tôpico Vitor Luiz Redes

Eu acredito que felizmente ou infelizmente, a tendência é sim o .NET.
Se não for exatamente o da Microsoft, será algo parecido, de outra empresa, 
o que é improvável.
A tendência será sempre a facilidade, os produtos que mais vendem, são os 
que mais fazem, e de forma mais fácil, mais auto explicativa e mais visível 
possível.
Gente, nenhum usuário quer fazer um curso para instalar um sistema 
operacional, eles o querem em algum ícone, prontinho para ser instalado. Eles 
querem o que todos mundo usa, para que não precisem pesquisar por aí ... enfim, 
o mais fácil em TODOS os sentidos. Infelizmente, esse caminho mais fácil é a 
Microsoft.
As vezes o que os desenvolvedores não entendem, é que alterar um arquivo 
texto dentro do diretório c:\int\hsdgh\bin\tdg é complicado para quem não 
conhece, e é complicado ainda mais, para pessoas que tem outros propósitos para 
ser informatizado. A maioria das empresas quer que você dê lucro a elas, querem 
o retorno do investimento que fizeram, e é isso que você deve dar a elas, se 
não o que você está fazendo não é bom para ela.
Se a Microsoft fica ou não com tudo, ou quase tudo, é culpa da competência 
deles. Existem empresas que ficam com tudo aqui também, e o que deve ser feito 
? Produtos melhores, com melhores custos, de mais fácil acesso, e 
principalmente, de mais fácil uso.
Botõezinhos, links e figurinhas são fescuras ? Pode ser, mas o que vende é 
isso. É mais fácil, vende mais ! Notem que, eu não estou dizendo que outras 
linguagens e plataformas não são dessa maneira, algumas são, mas o mito Linux é 
complicado, sempre bai prevalecer enquanto os defensores não se juntarem. É o 
que eu disse no começo, ninguém quer fazer um curso para instalar um sistema. É 
melhor pagar mais barato e comprar um pronto !
   


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: Williams Diaz 
  To: [EMAIL PROTECTED] 
  Sent: Friday, December 03, 2004 12:11 AM
  Subject: Re: [delphi-br] Então, qualé que é a do .NET?


  Walter,

  nós estamos no primeiro projeto agora, apanhando que nem loucos, mas todo e 
  qualquer projeto novo será para internet agora.
  Pode ser que eu esteja enganado (sinceramente até desejo isso no fundo, 
  assim meus sistemas antigos terão maior sobrevida).
  Mas a RM, a Microsiga, o SAP e outros ERP já estão com os seus produtos ou 
  prontos ou em desenvolvimento. O da RM está redondinho inclusive. Nenhuma 
  corporação de porte compra mais software que não seja para internet.

  Muitas empresas públicas e privadas (receita federal, bancos, municipios) 
  tem milhares de aplicações em browser, interagindo com usuário, calculando, 
  acessando e atualizando bases de dados. A cámara de vereadores de Salvador 
  inclusive já usa uma contabilidade feita em java. Lojas de magazine já estão 
  consultando estoques via browser. E a velocidade e largura de banda não são 
  mais problemas.
  Montar um servidor dentro de uma empresa já não é nenhum mistério. Tem muita 
  gente fazendo isso. Assim como voz por IP e cámaras espalhadas em obras de 
  construção civil com o dono acessando via internet. Tenho visto isso de mais 
  por aqui.

  Não é a toa que o delphi 2005 e o VS estão aí.
  Mas é isso, é um sentimento apenas-na verdade não estou completamente 
  convencido disso, é bom ouvir a tua opinião.

  williams

  *---
  Williams Díaz
  [EMAIL PROTECTED]
  http://www.interban.com.br

  - Original Message - 
  From: Walter Alves Chagas Junior [EMAIL PROTECTED]
  To: [EMAIL PROTECTED]
  Sent: Thursday, December 02, 2004 5:31 PM
  Subject: RES: [delphi-br] Então, qualé que é a do .NET?



  Williams, você já programou para internet? Já desenvolveu alguma coisa que
  dependa do Browser para interagir com o usuário?

  Pra que isto aconteça, tanto o Browser, como as linguagens de programação
  (PHP, ASP, HTML, DHTM, etc) terão que evoluir muito ainda. Porque hoje a
  limitação destes insumos é um verdadeiro gargalo para quaquer aplicação WEB
  que você queira fazer. Posso até concordar com você, que este tipo de
  interface venha substituir as janelas do Windows, mas isto ainda está bem
  longe de acontecer, até mesmo porque pra se chegar lá, 10 milhões de coisas
  ainda terão que ser resolvidas, dentre as que citei acima, ainda temos o
  problema da segurança na WEB, a banda, o tráfego e o custo de implantar uma
  solução desta natureza. Pra implantar um sistema que use os Winforms,
  bastaria montar o ambiente de servidor que você conhece muito bem. Pra
  montar um ambiente, pra usar o Browser como interface com o usuário, ainda
  tem que montar uma estrutura de provedor dentro da empresa. Ou seja, mais
  custo que muitos não estarão dispostos a desmbolsar.

  Eu não apostaria

Re: [delphi-br] Alguém pode me ajudar com validação de datas???

2004-11-30 Por tôpico Vitor Luiz Redes

o que gostaria de saber exatamente ?


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: Felipe Lucate 
  To: [EMAIL PROTECTED] 
  Sent: Tuesday, November 30, 2004 3:32 PM
  Subject: [delphi-br] Alguém pode me ajudar com validação de datas???


  E ae pessoal, tudo bom?

  Alguém me dá uma força com validação de datas??
  estou desesperado atraz disso, preciso resolver esse problema o mais rápido o 
possivel, alguém pode me ajudar???

  Desde já agradeço..
  Um abraço

  
  -
  Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!

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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
São Paulo Rio de Janeiro Curitiba Porto Alegre Belo 
Horizonte Brasília  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] d6 / Usar FOR com nomes de objetos

2004-11-29 Por tôpico Vitor Luiz Redes

for Contador := 0 to ComponentCount - 1 do
if Components[ Contador ] is TEdit then
with TEdit( Components[ Contador ] ) do
begin
 ReadOnly := True;
Font.Style := [bsBold];
Color := clBtnFace;
end;


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: Rodrigo Americo 
  To: [Delphi-Br] 
  Sent: Monday, November 29, 2004 10:17 AM
  Subject: [delphi-br] d6 / Usar FOR com nomes de objetos


  Pessoal,

  A dúvida é a seguinte:

  Tenho vários TEdit cujos nomes são EditData1, EditData2, EditData3, 
EditData4...
  Gostaria de fazer modificações gerais, em run-time, neste conjunto de
  objetos, por exemplo:

  with EditData1 do
  begin
ReadOnly := True;
Font.Style := [bsBold];
Color := clBtnFace;
  end;

  Gostaria de fazer algo do tipo (é só a idéia!):

  for I := 1 to 4 do
  begin
with EditData[I] do
begin
  ReadOnly := True;
  Font.Style := [bsBold];
  Color := clBtnFace;
end;
  end;

  Alguém sabe como fazer?

  Obrigado,

  Rodrigo Américo


  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] SetFocus

2004-11-25 Por tôpico Vitor Luiz Redes

que erro ?


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: Erika Lemes 
  To: [EMAIL PROTECTED] 
  Sent: Thursday, November 25, 2004 2:25 PM
  Subject: Re: [delphi-br] SetFocus



  Não deu certo. Eu quero que abra o form de pesquisa quando teclo F2 no Edit. 
Fiz assim, mas está dando erro! Alguém sabe o que pode ser?

  procedure T_Form1.MnPesquisarClick(Sender: TObject);
  begin
  if (_Form1.ActiveControl = _Form1.Edit5) then begin 
  {TENTEI TBÉM COLOCAR if (Edit5.Focused) then begin}
 if not assigned(_Pesq_Convenios) then
_Form_Pesquisa:= _Form_Pesquisa.Create(Application);
 _Form_Pesquisa.ShowModal;
  end;
  end;

  Obrigado!
  Erika

  
  -
  Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!

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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Firebird Embutido

2004-11-19 Por tôpico Vitor Luiz Redes

Como assim ? Derrubar o aplicativo ou a conexão ? Isso vai depender do que 
você está fazendo depois de incluir o registro, se o TDataSet for fechado, a 
conexão irá cair, se não, teoricamente a conexão estará aberta.
Se sua aplicação utilizar com muita frequência os TDataSet´s, deixe o 
KeepConnection True, e você não terá problemas ...
Agora, se sua aplicação for acessada remotamente, é recomendável que você 
trate a conexão somente quando uma transação for necessária ...


---
Vitor Luiz Redes 
Desenvolvimento
---
Redsystem Informática  
[EMAIL PROTECTED] 
---
  - Original Message - 
  From: Alexandre Pedroto ® 
  To: [EMAIL PROTECTED] 
  Sent: Friday, November 19, 2004 1:02 AM
  Subject: [delphi-br] Firebird Embutido


  Amigos,

  Estou usando o Firebird 1.5 (o último) embutido, numa aplicação com
  DBExpress.

  Está funcionando normalmente, exceto...

  No componente TSQLConnection, quando deixo o parâmetro KeepConnection em
  false, após uma inclusão, o aplicativo inteiro cai. Quando retorno para
  true, volta ao normal .

  Provavelmente é um bug, concordam? Pois o servidor não deveria derrubar o
  aplicativo.

  Gostaria, se possível, que alguém fizesse o teste.

  Grato,

  Alexandre.
  ---
  Email sem vírus
  Checked by AVG anti-virus system (http://www.grisoft.com).
  Version: 6.0.797 / Virus Database: 541 - Release Date: 15/11/2004



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
São Paulo Rio de Janeiro Curitiba Porto Alegre Belo 
Horizonte Brasília  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Qual editor de relatórios é melhor que o Quick Report ?

2004-11-17 Por tôpico Vitor Luiz Redes

Na minha opinião, todos os outros editores famosos do mercado são 
significativamente superiores ao Quick Report. Mas a necessidade de utiliza-los 
varia bastatnte.
Se você quiser um Editor de relatórios para não esquentar a cabeça, use o 
Crystal Reports. Na minha opinião, o melhor ! O Rave é bom tb, mas a minha 
curta experiência com o mesmo, detectou uma série de Bug´s, mas creio que com 
as atualizações seja possível conserta-los.
Outros editores conhecidos: Fortes Report, Fast Report ...

Vitor Luiz Redes

  - Original Message - 
  From: Florentino - Agrosoft 
  To: [EMAIL PROTECTED] 
  Sent: Sunday, November 14, 2004 11:52 AM
  Subject: [delphi-br] Qual editor de relatórios é melhor que o Quick Report ?



  Amigos,
  Trabalho com o QR para edição de relatórios, contudo tenho percebido que ele 
é um tanto pobre em recursos. Quem conhece outro editor melhor?
  Desde já agradeço.

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






  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
São Paulo Rio de Janeiro Curitiba Porto Alegre Belo 
Horizonte Brasília  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Pegar caption do botão

2004-11-17 Por tôpico Vitor Luiz Redes

if (Sender as TButton).Caption = 'Inserir' then
begin
Procedimentos de inserção ...
end else

Vitor Redes


  - Original Message - 
  From: Hélton Ribeiro Nunes 
  To: [EMAIL PROTECTED] 
  Sent: Wednesday, November 17, 2004 2:06 PM
  Subject: [delphi-br] Pegar caption do botão


  Pessoal

  Preciso, dentro do evento onclick de um botão, utilizar o caption dele. 
  Quero fazer isso para não ter q programar cada um dos botões q tenho no 
  formulário, e sim, apenas uma unica vez.

  []´s






  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
São Paulo Rio de Janeiro Curitiba Porto Alegre Belo 
Horizonte Brasília  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Duvida Componentes dialogs !??

2004-11-16 Por tôpico Vitor Luiz Redes

A única solução que encontrei para isso, foi desenvolver um formulário que 
atenda a essas necessidades ...
Tente o Shell, ou o Win31 caso seja VCL, e se for CLX, se não me engano, 
tem uma paleta que possui esses componentes (de acesso a pastas, drives e 
arquivos).

Vitor Luiz Redes


  - Original Message - 
  From: acolombobermudez 
  To: [EMAIL PROTECTED] 
  Sent: Tuesday, November 16, 2004 9:41 AM
  Subject: [delphi-br] Duvida Componentes dialogs !??



  Bom dia a todos! Gostaria de saber se no delphi existe algum 
  componente que  retorne somente o path do diretório que eu quiser 
  selecionar. Sei que no delphi existe na paleta Dialogs :SaveDialog, 
  OpenDialog, que faz algo proximo do que preciso, mas estes eu sou 
  obrigado a especificar uma extensão de arquivo e selecionar o 
  arquivo, me retornamdo na verdade o path do arquivo escolhido.
  Em Resumo, esses dialogs fazem isto:
  Path : C:\windows\nuvem.bmp ; mas Eu preciso disto:
  Path:  C:\windows\
  Existe algum componente que me retorne somente o caminho do diretorio 
  onde estou? 





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
  PUBLICIDADE

   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 




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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: Ao Vitor [delphi-br] Qual a melhor maneira de trabalhar com TTable ?

2004-11-09 Por tôpico Vitor Luiz Redes


Se não o Hospedeiro,
quem faz do parasita,
um parasita ?

Vitor Luiz Redes

Redsystem Informática
  - Original Message - 
  From: Marcelo Silva 
  To: [EMAIL PROTECTED] 
  Sent: Monday, November 08, 2004 5:37 PM
  Subject: Re: Ao Vitor [delphi-br] Qual a melhor maneira de trabalhar com 
TTable ?


  Ei Alexandre verifiquei no Help do Delphi e vi o que quis dizer...
  Be fiz assim Accept := DataSet['COD_CLI'] = Edit1.Text;
  Mas teve o Mesmo efeito de um if dentro do while... e desta forma acaba 
demorando para trazer os resultados...
  O detalhe é que ele carrega a tabela inteira desta forma o while percorre 
toda esta tabela que tem uns 300.000 registros e a cada dia cresce mais...
  Preciso de uma forma eficiente...
  A Maneira que o Vitor colocou é ótima ... porém gostaria que fosse possivel 
passar tipo um Array de opçõe tipo:

  SetRange([Array],[Array]);

  Mas o SetRange não trabalha assim... ele trabalha

  SetRange([Inicio],[Final]);

  Preciso de algo como o clausula IN de um select tipo

  SetRange(IN [Valore1,Valor2. Etc]);

  Entendeu ?

  Ou é claro... uma outra forma que de uma melhor performance a busca de uma 
TTable

  * Não posso utilizar outros componentes por que já existe um programa em 
clipper que acessa a mesma tabela e faz uso dos indices em outra pasta ... é 
uma saquinho... só consegui fazer funcionar com AdsTables.

  Marcelo Silva
  Cel. 11 9693-4251
  ICQ - 49224093
  MSN [EMAIL PROTECTED] 
- Original Message - 
From: Alexandre Oliveira 
To: [EMAIL PROTECTED] 
Sent: Monday, November 08, 2004 6:17 PM
Subject: Re: Ao Vitor [delphi-br] Qual a melhor maneira de trabalhar com 
TTable ?


Olá,

Olha Marcelo, veja, se (tipopagto='D') = verdadeiro(boolean), então acepta
este registro no filtro, senão falso, não acepta. No caso de um while esse
registro fará ou não parte dele.

É isso que o exemplo quer dizer. Você quer filtrar registros, então qual é a
condição para filtrá-los ? Tipo NumDependentes  0 ? Mande a expressão do
filtro pra gente ver.

Alexandre Oliveira

- Original Message -
From: Marcelo Silva [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Monday, November 08, 2004 3:52 PM
Subject: Ao Vitor [delphi-br] Qual a melhor maneira de trabalhar com TTable
?



Vitor sua dica foi muito boa e retorna o resultado praticamente
instantaneamente

Tenho outro detalhe em questão...
Como trazer varios Clientes (CODCLI) que não sejam sequenciais, por exemplo
10089 , 34556, 23321, 12345 etc... (Não posso coloca de 0 a tal porque não
quero todos) Acho que deu pra entender né...
Ou seja, um será o Cliente Principal e os outros seriam dependentes

Então teria que buscar

if (CODCLI Tem Dependentes) then
Quem são ?

Pega todos e verifica em outra tabela se estes tem vendas na tabela
Vendas...

Então preciso que este range me traga como se fosse um IN de um select.

Marcelo Silva
Cel. 11 9693-4251
ICQ - 49224093
MSN [EMAIL PROTECTED]
  - Original Message -
  From: Vitor Luiz Redes
  To: [EMAIL PROTECTED]
  Sent: Monday, November 08, 2004 12:20 PM
  Subject: Re: Res: [delphi-br] Qual a melhor maneira de trabalhar com
TTable ?


  Para percorrer no While, somente os registros desejados ... altere as
  propriedades IndexFieldNames e Sete um Range da seginte maneira ...

  Table.IndexFieldNames:='CODCLI';
  Table.SetRange([1],[50]);

  Veja que no exemplo acima, o while irá percorrer somente os registro
que
  estejam entre 1 e 50.


  Se não o Hospedeiro,
  quem faz do parasita,
  um parasita ?

  Vitor Luiz Redes
  
  Redsystem Informática
  - Original Message -
  From: Stock [EMAIL PROTECTED]
  To: [EMAIL PROTECTED]
  Sent: Monday, November 08, 2004 12:04 PM
  Subject: [Norton AntiSpam] Res: [delphi-br] Qual a melhor maneira de
  trabalhar com TTable ?





  como vc ta fazendo esse filtro?
  o componente table, filtrado, so traz os registros solicitados, no while
so
  ira percorrer estes registros... vc deve ta carregando a tabela toda...


  [EMAIL PROTECTED]
  600 modelos de sites profissionais - Imperdivel
  http://www.kitsites.com/index.php?ref=50

  ---Mensagem original---

  De: [EMAIL PROTECTED]
  Data: 11/08/04 11:38:50
  Para: [EMAIL PROTECTED]
  Assunto: [delphi-br] Qual a melhor maneira de trabalhar com TTable ?

  Estou trabalhando com arquivos DBF e gostaria de saber qual a melhor
maneira
  de se trabalhar com TTables ?

  Tipo...

  Para abrir a tabela ele abre numa boa bem rapido...
  Quando coloco o Filtro que quero no DBGrid ele mostra somente os registro
  que preciso..
  Mas vejo que no While ele percorre toda a tabela

Re: Ao Vitor [delphi-br] Qual a melhor maneira de trabalhar com TTable ?

2004-11-09 Por tôpico Vitor Luiz Redes

É, no seu caso, acho que a melhor maneira, é Setar o Range para o menor e 
maior valor, e depois filtrar como puder ...
Mas o ideal mesmo, era usar uma Query, assim, você faria isso rapidinho ...


Se não o Hospedeiro,
quem faz do parasita,
um parasita ?

Vitor Luiz Redes

Redsystem Informática
  - Original Message - 
  From: Marcelo Silva 
  To: [EMAIL PROTECTED] 
  Sent: Monday, November 08, 2004 5:37 PM
  Subject: Re: Ao Vitor [delphi-br] Qual a melhor maneira de trabalhar com 
TTable ?


  Ei Alexandre verifiquei no Help do Delphi e vi o que quis dizer...
  Be fiz assim Accept := DataSet['COD_CLI'] = Edit1.Text;
  Mas teve o Mesmo efeito de um if dentro do while... e desta forma acaba 
demorando para trazer os resultados...
  O detalhe é que ele carrega a tabela inteira desta forma o while percorre 
toda esta tabela que tem uns 300.000 registros e a cada dia cresce mais...
  Preciso de uma forma eficiente...
  A Maneira que o Vitor colocou é ótima ... porém gostaria que fosse possivel 
passar tipo um Array de opçõe tipo:

  SetRange([Array],[Array]);

  Mas o SetRange não trabalha assim... ele trabalha

  SetRange([Inicio],[Final]);

  Preciso de algo como o clausula IN de um select tipo

  SetRange(IN [Valore1,Valor2. Etc]);

  Entendeu ?

  Ou é claro... uma outra forma que de uma melhor performance a busca de uma 
TTable

  * Não posso utilizar outros componentes por que já existe um programa em 
clipper que acessa a mesma tabela e faz uso dos indices em outra pasta ... é 
uma saquinho... só consegui fazer funcionar com AdsTables.

  Marcelo Silva
  Cel. 11 9693-4251
  ICQ - 49224093
  MSN [EMAIL PROTECTED] 
- Original Message - 
From: Alexandre Oliveira 
To: [EMAIL PROTECTED] 
Sent: Monday, November 08, 2004 6:17 PM
Subject: Re: Ao Vitor [delphi-br] Qual a melhor maneira de trabalhar com 
TTable ?


Olá,

Olha Marcelo, veja, se (tipopagto='D') = verdadeiro(boolean), então acepta
este registro no filtro, senão falso, não acepta. No caso de um while esse
registro fará ou não parte dele.

É isso que o exemplo quer dizer. Você quer filtrar registros, então qual é a
condição para filtrá-los ? Tipo NumDependentes  0 ? Mande a expressão do
filtro pra gente ver.

Alexandre Oliveira

- Original Message -
From: Marcelo Silva [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Monday, November 08, 2004 3:52 PM
Subject: Ao Vitor [delphi-br] Qual a melhor maneira de trabalhar com TTable
?



Vitor sua dica foi muito boa e retorna o resultado praticamente
instantaneamente

Tenho outro detalhe em questão...
Como trazer varios Clientes (CODCLI) que não sejam sequenciais, por exemplo
10089 , 34556, 23321, 12345 etc... (Não posso coloca de 0 a tal porque não
quero todos) Acho que deu pra entender né...
Ou seja, um será o Cliente Principal e os outros seriam dependentes

Então teria que buscar

if (CODCLI Tem Dependentes) then
Quem são ?

Pega todos e verifica em outra tabela se estes tem vendas na tabela
Vendas...

Então preciso que este range me traga como se fosse um IN de um select.

Marcelo Silva
Cel. 11 9693-4251
ICQ - 49224093
MSN [EMAIL PROTECTED]
  - Original Message -
  From: Vitor Luiz Redes
  To: [EMAIL PROTECTED]
  Sent: Monday, November 08, 2004 12:20 PM
  Subject: Re: Res: [delphi-br] Qual a melhor maneira de trabalhar com
TTable ?


  Para percorrer no While, somente os registros desejados ... altere as
  propriedades IndexFieldNames e Sete um Range da seginte maneira ...

  Table.IndexFieldNames:='CODCLI';
  Table.SetRange([1],[50]);

  Veja que no exemplo acima, o while irá percorrer somente os registro
que
  estejam entre 1 e 50.


  Se não o Hospedeiro,
  quem faz do parasita,
  um parasita ?

  Vitor Luiz Redes
  
  Redsystem Informática
  - Original Message -
  From: Stock [EMAIL PROTECTED]
  To: [EMAIL PROTECTED]
  Sent: Monday, November 08, 2004 12:04 PM
  Subject: [Norton AntiSpam] Res: [delphi-br] Qual a melhor maneira de
  trabalhar com TTable ?





  como vc ta fazendo esse filtro?
  o componente table, filtrado, so traz os registros solicitados, no while
so
  ira percorrer estes registros... vc deve ta carregando a tabela toda...


  [EMAIL PROTECTED]
  600 modelos de sites profissionais - Imperdivel
  http://www.kitsites.com/index.php?ref=50

  ---Mensagem original---

  De: [EMAIL PROTECTED]
  Data: 11/08/04 11:38:50
  Para: [EMAIL PROTECTED]
  Assunto: [delphi-br] Qual a melhor maneira de trabalhar com TTable ?

  Estou trabalhando com arquivos DBF e gostaria de saber qual a melhor
maneira
  de se trabalhar com TTables ?

  Tipo...

  Para

Re: [delphi-br] Duvida COnsulta de Data

2004-11-09 Por tôpico Vitor Luiz Redes

Você pode fazer de duas maneiras ...
Uma, seria formatar a data para ano, mes e dia ...
Outra seria ... StrToDateTime(StringData) ...


Se não o Hospedeiro,
quem faz do parasita,
um parasita ?

Vitor Luiz Redes

Redsystem Informática
  - Original Message - 
  From: Rodrigo Brito 
  To: [EMAIL PROTECTED] 
  Sent: Tuesday, November 09, 2004 1:51 PM
  Subject: [delphi-br] Duvida COnsulta de Data


  Bom TArde,

  Tenho um programa básico de estoque, uso o delphi6 e o paradox 7, no 
  banco os campos data estão como texto, isso atrrapalha na consulta de um 
  período , teria alguma maneira de quando for consultar informar que o 
  campo data que é texto passe a ser como um campo data..?


  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
 
  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] formatar valores em um dbgrid

2004-11-02 Por tôpico Vitor Luiz Redes

No Fields Editor, tem a propriedade EditMask para campos que não são numéricos.
Para campos numéricos, use DisplayFormat(?) ou algo assim ...


Se não o Hospedeiro,
quem faz do parasita,
um parasita ?

Vitor Luiz Redes

Redsystem Informática
  - Original Message - 
  From: Otavio Gasparovic do Nascimento 
  To: [EMAIL PROTECTED] 
  Sent: Tuesday, November 02, 2004 11:33 AM
  Subject: RES: [delphi-br] formatar valores em um dbgrid


  No fields editor não tem edit mask  vou tentar em algum evento se alguem
  descobrir algo avise,
  obrigado a todos..

  -Mensagem original-
  De: Williams Diaz [mailto:[EMAIL PROTECTED]
  Enviada em: terça-feira, 2 de novembro de 2004 11:15
  Para: [EMAIL PROTECTED]
  Assunto: Re: [delphi-br] formatar valores em um dbgrid



  Tem Edit Mask no fields editor? - vou dar uma olhadinha, mas creio que
  formato o valor de outra forma, num evento ou alguma coisa assim.

  williams

  *---
  Williams Díaz
  [EMAIL PROTECTED]
  http://www.interban.com.br

  - Original Message -
  From: Gustavo Führ - RDC [EMAIL PROTECTED]
  To: [EMAIL PROTECTED]
  Sent: Monday, November 01, 2004 8:21 AM
  Subject: Re: [delphi-br] formatar valores em um dbgrid


  
  
   Kra use a formatação do campo mesmo
   no Fields Editor o campo EditMask
   e coloque a mascára
  
   Führ
  
  
   Otavio Gasparovic do Nascimento wrote:
  
  Pessoal,
  
  Preciso formatar um valor em um dbgrid como faço deu branco total...
  
  
  obrigado



  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]

  Links do Yahoo! Grupos









  ---
  Incoming mail is certified Virus Free.
  Checked by AVG anti-virus system (http://www.grisoft.com).
  Version: 6.0.788 / Virus Database: 533 - Release Date: 01/11/2004

  ---
  Outgoing mail is certified Virus Free.
  Checked by AVG anti-virus system (http://www.grisoft.com).
  Version: 6.0.788 / Virus Database: 533 - Release Date: 01/11/2004



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
 
  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Ordenar

2004-10-29 Por tôpico Vitor Luiz Redes

Não me lembro se no BDE tem isso, mas altere o IndexFieldNames da Query, Table ou 
DataSet, que os registros se ordenarão ...

ex: Query.IndexFieldNames:='CAMPO';


Se não o Hospedeiro,
quem faz do parasita,
um parasita ?

Vitor Luiz Redes

Redsystem Informática
  - Original Message - 
  From: Renato Fonseca 
  To: [EMAIL PROTECTED] 
  Sent: Friday, October 29, 2004 4:04 PM
  Subject: [delphi-br] Ordenar


  Caros Desenvolvedores,

  Desenvolvo uma aplicação em Delphi 7 com banco de dados mysql usando componentes DBE.

  Gostaria de saber, como eu faço para ordenar um conjunto de registros de uma query, 
sem precisar fazer uma nova consulta no banco??

  Tipo um order by dentro da query.


  Grato

  Renato Fonseca.

  
  -
  Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!

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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte 
Brasília  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Pesquisa

2004-10-22 Por tôpico Vitor Luiz Redes

Um Locate com uma chave como parâmetro, provavelmente fará no mesmo tempo levado 
pelo BDE ... ou ainda, um select ...


Se não o Hospedeiro,
quem faz do parasita,
um parasita ?

Vitor Luiz Redes

Redsystem Informática
  - Original Message - 
  From: Depto de Informatica 
  To: [EMAIL PROTECTED] 
  Sent: Friday, October 22, 2004 11:29 AM
  Subject: [delphi-br] Pesquisa


  Caros colegas, desenvolvo em Delphi 5, base de dados Access e ADO.
  Com o BDE eu posso fazer pesquisas em tabelas utilizando o FindKey(), o que torna a 
pesquisa bastante rápida porque ela é indexada e não sequencial e também eu não 
preciso abrir ou fechar uma Query, porém no ADO eu não tenho esta opção. O que eu 
posso utilizar para fazer a pesquisa que me dê o mesmo desempenho do FindKey ?

  Obrigado,

  Luiz Carlos

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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte 
Brasília  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] único login para duas conexões db2 e sql ?????

2004-10-22 Por tôpico Vitor Luiz Redes

Seguinte  grave um arquivo INI, txt, ou um registro mesmo, no seguinte molde 
... 

with DM.Conexao_DADOS.Params do
begin
Clear;
Add('Drivername:='+DM.Conexao_parametros.DriverName);
Add('Database='+DM.Conexao_parametros.DataBase);
Add('Rolename=Rolename');
Add('User_Name='+DM.Conexao_parametros.User_Name);
Add('Password='+DM.Conexao_parametros.Password);
Add('Blobsize=-1');
Add('ErrorSourceFile=');
Add('LocaleCode=');
Add('RoleName=RoleName');
Add('ServerCharSet=');
Add('SQLDialect=3');
Add('Interbase_TransIsolation=ReadCommited');
Add('WaitOnLocks=TRUE');
SaveToFile('c:\Redsystem\Config\DODATA.con');
end;

Depois, só faça o procedimento acima, com os componentes devidamente 
desconectados, e com os distintos nomes de cada um ...


Se não o Hospedeiro,
quem faz do parasita,
um parasita ?

Vitor Luiz Redes

Redsystem Informática
  - Original Message - 
  From: delphi6_2005 
  To: [EMAIL PROTECTED] 
  Sent: Friday, October 22, 2004 11:15 AM
  Subject: [delphi-br] único login para duas conexões db2 e sql ?



  Algum amigo poderia me dar uma dica de como implementar uma tela de 
  login para conectar dois bancos, se é melhor usar arquivo ini, ou 
  algum exemplo que possa me passar, estou tendo muita dificuldade com 
  DBExpress.

  Agradeço a ajuda

  Paulo





  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
 
  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Posicionar cursor no item desejado

2004-10-21 Por tôpico Vitor Luiz Redes

tente com Locate('CODPED',7,[])

Se não o Hospedeiro,
quem faz do parasita,
um parasita ?

Vitor Luiz Redes

Redsystem Informática

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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] Diferença entre datas

2004-10-21 Por tôpico Vitor Luiz Redes

if TblPagamentosData1.ASDATETIMETblPagamentosData2.ASDATETIME THEN
Raise Exception.Create('A data inicial não pode ser menor do que a final');
ou, o contrário, no caso de uma condição para continuar um procedimento ...

if TblPagamentosData2.ASDATETIME=TblPagamentosData1.ASDATETIME THEN
begin
{ procedimento }
end else
Raise Exception.Create('A data inicial não pode ser menor do que a final');


Se não o Hospedeiro,
quem faz do parasita,
um parasita ?

Vitor Luiz Redes

Redsystem Informática
  - Original Message - 
  From: Adenes I. Freire Junior 
  To: [EMAIL PROTECTED] 
  Sent: Thursday, October 21, 2004 9:39 AM
  Subject: [delphi-br] Diferença entre datas


  Como sei se uma data é maior ou menor do que a outras?
  Tenho dois campos; TblPagamentosData1 e TblPagamentosData2
  O campo Data2 tem que ser maior ou igual ao campo da Data1.

  Adenes I. Freire Junior

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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
 
  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





Re: [delphi-br] formato ingles/portugues

2004-10-21 Por tôpico Vitor Luiz Redes

Deculpe-me, me expressei de forma incorreta ... você deve ajustar o 
DecimalSeparator, somente para valores que por um acaso sejam passados para o banco de 
dados ...
Se trabalham com TDB´s, o componente fará isso automaticamente, se não, os valores 
terão de ser passados manualmente ...


Se não o Hospedeiro,
quem faz do parasita,
um parasita ?

Vitor Luiz Redes

Redsystem Informática
  - Original Message - 
  From: Laira 
  To: [EMAIL PROTECTED] 
  Sent: Thursday, October 21, 2004 11:57 AM
  Subject: [delphi-br] formato ingles/portugues


  Olá..

  Na sintaxe das instruções sql´s utiliza-se a virgula como separador de colunas... 
Existe alguma forma de mudar isto? Seja por recurso em banco de dados ou outra coisa 
qquer...

  A situação é esta: Na empresa temos como banco de dados o db2 e linguagem de 
programação delphi 6, hoje o banco está instalado em inglês, temos a intenção de 
modificar para português. Nas configurações das máquinas utilizamos o formato inglês, 
ou seja, para separador de decimais o ponto e para separador de milhares a vírgula, se 
modificar isto para separador de decimais a virgula e separador de milhares o ponto, 
ao gravar acarreta o erro de que foram informadas mais colunas do que o existente na 
tabela.
  Alguem utiliza o formato brasileiro para trabalhar? como vc´s fazem? 

  Agradeço desde já qquer ajuda..

  Laira




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



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  Para ver as mensagens antigas, acesse:
  http://br.groups.yahoo.com/group/delphi-br/messages

  Para falar com o moderador, envie um e-mail para:
  [EMAIL PROTECTED] ou [EMAIL PROTECTED]



Yahoo! Grupos, um serviço oferecido por: 
 
São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte 
Brasília  
 
   


--
  Links do Yahoo! Grupos

a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
  
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
  
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do 
Yahoo!. 



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



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html

 





  1   2   >