Para ficar registrado e compartilhar com alguém que possa precisar um dia...

A idéia da varíavel e do evento onClick atualizar ela não funcionou, pois o 
onEnter ocorre antes do onClick.

Conforme tinha dito o componente TMaterial tem 4 TEdits (eu tinha dito 3)

fMaterial + fCor + fTamanho + fDescricaoManual.

Como pelo TAB ele irá sempre "cair" o foco no fMaterial, então se o foco 
estiver em um dos outros 
é porque foi clicado com o mouse (teoricamente).

o código ficou assim: inclui a condição (Not fDescricaoManual.Focused) 

procedure TMaterial.CMEnter(var Message: TCMEnter);
begin
   fValorAnterior := GetValor;
   //Se clicar direto na descrição, o foco ficará nela
   if (Not fDescricaoManual.Focused) and ClFocus(fMaterial) then
   begin
      fMaterial.SelectAll;
      fMaterial.SetFocus;
   end;
end;

Obrigado aos que me ajudaram.

Att,

Celso Lorenzetti
Analista de Sistemas
msn: [EMAIL PROTECTED]
--------------------------------------------------------------
SysRS Tecnologia da Informação Ltda.
             www.sysrs.com.br
  ----- Original Message ----- 
  From: [EMAIL PROTECTED] 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, November 14, 2007 4:56 PM
  Subject: Re: [delphi-br] Determinar de onde veio o foco


  Calma Davi, se também foi novato no assunto, lembre-se disso...
  Não é só saber os comandos, procedures, funções e tipos de variaveis, tem a 
lógica também, o que vem antes o que vem depois, tem que entender as 
procedures/funções pra saber se é necessários fazer um (e qual esse um) e 
depois o outro (e qual esse outro), se o rapaz ta aprendendo e vc quer ajudar, 
ajuda, se não pula a pergunta UAI SÔ! hehehhehe

  Sem crise heim, PAZ e abraços a todos...

  Luiz Escobar - Analista/Desenvolvedor:
  WEB - HTML/JavaScript/PHP/MySQL 
  WINDOWS - Delphi/ASSEMBLY/MySQL/xBase
  SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse10.2), Windows 2K/XP

  From: Davi Eduardo Borges Wall 
  Sent: Wednesday, November 14, 2007 4:47 PM
  To: delphi-br@yahoogrupos.com.br 
  Subject: RES: [delphi-br] Determinar de onde veio o foco

  Eu discordo completamente.

  Como um Analista de Sistema pode definir um sistema sem saber potencial de 
desenvolvimento do seu framework ? Se ele nunca foi programador? 

  Ok Vamos assumir que há essa possibilidade, vamos assumir que realmente 
alguém consegue definir telas e processos sem entender o framework,

  Mas então como essa pessoa pode estar implementando algo?

  Outra coisa,

  Essas dúvidas que você está perguntando, são coisas básicas de Delphi, que 
lendo qualquer apostila iniciante você poderá aprender rapidinho.

  Você por acaso não sabe Delphi e está programando com ele? É isso ? 

  Se for isso eu até entenderia, e te aconselharia a procurar uma apostila de 
Delphi.

  []'s

  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Celso 
Lorenzetti - GMail
  Enviada em: quarta-feira, 14 de novembro de 2007 17:32
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Determinar de onde veio o foco

  Esqueci de comentar Davi,

  essa lista também é para programador júnior. Sem contar que Analista de 
Sistemas e Programador, 
  são funções diferentes e que não necessariamente, um tem que saber em 
detalhes a função do outro.

  Concordas?

  Att,

  Celso Lorenzetti
  Analista de Sistemas
  msn: [EMAIL PROTECTED] <mailto:celsolorenzetti%40ibest.com.br> 
  ----------------------------------------------------------
  SysRS Tecnologia da Informação Ltda.
  www.sysrs.com.br
  ----- Original Message ----- 
  From: Davi Eduardo Borges Wall 
  To: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> 
  Sent: Wednesday, November 14, 2007 3:13 PM
  Subject: RES: [delphi-br] Determinar de onde veio o foco

  Celso, sinceramente, ali embaixo do seu nome diz ANALISTA DE SISTEMAS. 
Lembre-se disso.

  Essas são perguntas de programador Junior.

  Para saber se o EDIT foi clicado, uma das alternativas (a mais simples que 
consigo imaginar) é pegar o EVENTO ONCLICK DO EDIT?

  Se gerou o evento então é pq foi clicado nesse componente????? Não seria isso 
???

  De: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> 
[mailto:delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> ] 
Em nome de Celso Lorenzetti - GMail
  Enviada em: quarta-feira, 14 de novembro de 2007 16:59
  Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> 
  Assunto: [delphi-br] Determinar de onde veio o foco

  Mais uma,

  tem como eu saber se o foco que o componente TEdit recebeu, 

  foi porque o usuário teclou um Tab no componente anterior ou se ele clicou 
direto nele com o mouse?

  Obrigado.

  Att,

  Celso Lorenzetti
  Analista de Sistemas
  msn: [EMAIL PROTECTED] <mailto:celsolorenzetti%40ibest.com.br> 
<mailto:celsolorenzetti%40ibest.com.br> 
  ----------------------------------------------------------
  SysRS Tecnologia da Informação Ltda.
  www.sysrs.com.br

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

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

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

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

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



   

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

Responder a