Re: [delphi-br] pular campos com setas

2005-06-23 Por tôpico -=SchiavoR=-
Como os outros amigos da lista disseram esta pratica não é aconselhavel, 
e se você for usar setas ESQUERDA - DIREITA para saltar de campos ai 
você vai perder quase todo o recurso de navegação em texo, restando 
apenas a tecla BACKSPACE e DELETE que navegam atraves de modificacao do 
texto, mas de qualquer forma vai a dica:

   case Key of
 VK_DOWN, VK_RIGHT, VK_RETURN : Direction := 0; {Next}
 VK_UP, VK_LEFT : Direction := 1; {Previous}
   end;

Para saber o nome virtual de todas as tecla no help do delphi procure 
por Virtual Key Codes, tem a tabela completa.

[ ]'s e Cuidado em como vai usar isto ae.

Paulo Cesar Rohleder escreveu:

> DEU CERTO SCHIAVO, MAS COMO EU PODERIA FAZER PARA INCLUIR JUNTO AINDA 
> AS TECLAS9DIREITA ESQUERDA) PARA FAZEREM  A MESMA COISA QUE FRENTE E 
> PARA TRAS???
>
> procedure TForm1.FormKeyDown(
>  Sender : TObject;
>  var Key: Word;
>  Shift : TShiftState
>) ;
> var
>Direction : Integer;
> begin
>Direction := -1;
>case Key of
>  //Estou usando as setas para cima, para baixo e enter, mas vc pode
> usar qualquer tecla que sejejar
>  VK_DOWN, VK_RETURN : Direction := 0; {Next}
>  VK_UP : Direction := 1; {Previous}
>end;
>if Direction <> -1 then
>begin
>  Perform(WM_NEXTDLGCTL, Direction, 0) ;
>  Key := 0;
>end;
> end;
>
>
>
>
> ---
> avast! Antivirus: Outbound message clean.
> Virus Database (VPS): 0525-3, 23/06/2005
> Tested on: 23/6/2005 11:14:41
> avast! - copyright (c) 1988-2005 ALWIL Software.
> http://www.avast.com
>
>
>
>
> [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 Termos do
>   Serviço do Yahoo! .
>
>



-- 
< 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] pular campos com setas

2005-06-23 Por tôpico Paulo Cesar Rohleder
Obrigado Demian...Sempre atento..Valeu pela Dica
  - Original Message - 
  From: Demian Lessa 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, June 23, 2005 11:12 AM
  Subject: Re: [delphi-br] pular campos com setas


  Paulo,

  Só pra te avisar- vc percebe que alterando o significado das setas no 
  Windows, onde elas são auxiliares na edição de texto dentro dos 
  controles, para realizar a tarefa de TAB e SHIFT+TAB você infringe um 
  princípio básico da interação com o usuário? Chama-se, em inglês, de 
  "Least astonishment principle" que, grosseiramente falando, significa 
  "Princípio da mínima surpresa". O básico desse princípio é que, sempre 
  que possível, o usuário não deve se surpreender com funcionalidades ou 
  características de sua interface. Garanto a você que *qualquer* usuário 
  acostumado a utilizar as setas para voltar ou avançar no texto para 
  corrigir um caractere ou coisa semelhante ficará ***muito*** surpreso 
  com a pequena mudança de significado que você confere às setas. E, 
  aliás, você também fere um princípio de padronização- qual outro sistema 
  do Windows funciona dessa forma???

  Desculpe-me se acha que estou entrando em sua semana, mas achei que 
  vaila a observação.

  Cordialmente,

  Demian Lessa
  Salvador - Brasil

  Paulo Cesar Rohleder wrote:
  > Obrigado pela resposta e disposição...VALEU MESMO...
  > 
  > TANKS LISTA


  -- 
  <<<<< 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!. 






avast! Antivirus: Inbound message clean. 

Virus Database (VPS): 0525-3, 23/06/2005
Tested on: 23/6/2005 11:22:25
avast! - copyright (c) 1988-2005 ALWIL Software.
 



---
avast! Antivirus: Outbound message clean.
Virus Database (VPS): 0525-3, 23/06/2005
Tested on: 23/6/2005 11:24:04
avast! - copyright (c) 1988-2005 ALWIL Software.
http://www.avast.com




[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

 




RES: [delphi-br] pular campos com setas

2005-06-23 Por tôpico Walter Alves Chagas Junior
Isto, além de despadronizar o procedimento padrão adotado pelo Windows,
causa um certo desconforto com o usuário, que já acostumado com o TAB, se
depara com outra forma de pular campos. Gera transtorno, gera gargalo no
fluxo do processo, gera confusão na hora de fazer o input de dados. Foi
muito importante a observação do Demian nisto daí porque antigamente, nos
ex-clippeiros e acima de tudo Doseiros, tinhamos o  habito de, quando
desenvolvia para windows, a primeira coisa a fazer e trocar o modo de
mudança de campos pra compatibilizar o costume dos usuários, recêm migrados
de sistemas MS-DOS para Windows. Mas naquela época o Windows tava chegando
ainda e havia muita gente ainda operando em MS-DOS. Naquela época ainda
fazia sentido isto. Hoje já se vão quase 10 anos que o DOS se transformou em
história e o Clipper já não é mais protagonista do meio, então se olharmos
bem, não faz muito sentido mudar a padronização do Windows para
compatibilizar hábitos do usuário com a plataforma antiga, até mesmo porque
os novos usuários já estão mesmo habituados é com o TAB. 

 
 
 []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: Demian Lessa [mailto:[EMAIL PROTECTED]
> Enviada em: quinta-feira, 23 de junho de 2005 11:12
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: [delphi-br] pular campos com setas
> 
> 
> Paulo,
> 
> Só pra te avisar- vc percebe que alterando o significado das setas no 
> Windows, onde elas são auxiliares na edição de texto dentro dos 
> controles, para realizar a tarefa de TAB e SHIFT+TAB você infringe um 
> princípio básico da interação com o usuário? Chama-se, em inglês, de 
> "Least astonishment principle" que, grosseiramente falando, significa 
> "Princípio da mínima surpresa". O básico desse princípio é 
> que, sempre 
> que possível, o usuário não deve se surpreender com 
> funcionalidades ou 
> características de sua interface. Garanto a você que 
> *qualquer* usuário 
> acostumado a utilizar as setas para voltar ou avançar no texto para 
> corrigir um caractere ou coisa semelhante ficará ***muito*** surpreso 
> com a pequena mudança de significado que você confere às setas. E, 
> aliás, você também fere um princípio de padronização- qual 
> outro sistema 
> do Windows funciona dessa forma???
> 
> Desculpe-me se acha que estou entrando em sua semana, mas achei que 
> vaila a observação.
> 
> Cordialmente,
> 
> Demian Lessa
> Salvador - Brasil
> 
> Paulo Cesar Rohleder wrote:
> > Obrigado pela resposta e disposição...VALEU MESMO...
> > 
> > TANKS LISTA
> 
> 
> -- 
> <<<<< 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

<*> 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] pular campos com setas

2005-06-23 Por tôpico Demian Lessa
Paulo,

Só pra te avisar- vc percebe que alterando o significado das setas no 
Windows, onde elas são auxiliares na edição de texto dentro dos 
controles, para realizar a tarefa de TAB e SHIFT+TAB você infringe um 
princípio básico da interação com o usuário? Chama-se, em inglês, de 
"Least astonishment principle" que, grosseiramente falando, significa 
"Princípio da mínima surpresa". O básico desse princípio é que, sempre 
que possível, o usuário não deve se surpreender com funcionalidades ou 
características de sua interface. Garanto a você que *qualquer* usuário 
acostumado a utilizar as setas para voltar ou avançar no texto para 
corrigir um caractere ou coisa semelhante ficará ***muito*** surpreso 
com a pequena mudança de significado que você confere às setas. E, 
aliás, você também fere um princípio de padronização- qual outro sistema 
do Windows funciona dessa forma???

Desculpe-me se acha que estou entrando em sua semana, mas achei que 
vaila a observação.

Cordialmente,

Demian Lessa
Salvador - Brasil

Paulo Cesar Rohleder wrote:
> Obrigado pela resposta e disposição...VALEU MESMO...
> 
> TANKS LISTA


-- 
< 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] pular campos com setas

2005-06-23 Por tôpico Paulo Cesar Rohleder
DEU CERTO SCHIAVO, MAS COMO EU PODERIA FAZER PARA INCLUIR JUNTO AINDA AS 
TECLAS9DIREITA ESQUERDA) PARA FAZEREM  A MESMA COISA QUE FRENTE E PARA TRAS???

procedure TForm1.FormKeyDown(
 Sender : TObject;
 var Key: Word;
 Shift : TShiftState
   ) ;
var
   Direction : Integer;
begin
   Direction := -1;
   case Key of
 //Estou usando as setas para cima, para baixo e enter, mas vc pode 
usar qualquer tecla que sejejar
 VK_DOWN, VK_RETURN : Direction := 0; {Next}
 VK_UP : Direction := 1; {Previous}
   end;
   if Direction <> -1 then
   begin
 Perform(WM_NEXTDLGCTL, Direction, 0) ;
 Key := 0;
   end;
end;




---
avast! Antivirus: Outbound message clean.
Virus Database (VPS): 0525-3, 23/06/2005
Tested on: 23/6/2005 11:14:41
avast! - copyright (c) 1988-2005 ALWIL Software.
http://www.avast.com




[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] pular campos com setas

2005-06-23 Por tôpico Paulo Cesar Rohleder
Obrigado pela resposta e disposição...VALEU MESMO...

TANKS LISTA


---
avast! Antivirus: Outbound message clean.
Virus Database (VPS): 0525-3, 23/06/2005
Tested on: 23/6/2005 11:07:25
avast! - copyright (c) 1988-2005 ALWIL Software.
http://www.avast.com




[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] pular campos com setas

2005-06-23 Por tôpico -=SchiavoR=-
Você pode mudar para o proximo componente ou o componente anteriror 
usando esta rotina no evento FormKeyDown, para que ela funcione a 
propriedade KeyPreview do formulário deve estar setada como true:

procedure TForm1.FormKeyDown(
 Sender : TObject;
 var Key: Word;
 Shift : TShiftState
   ) ;
var
   Direction : Integer;
begin
   Direction := -1;
   case Key of
 //Estou usando as setas para cima, para baixo e enter, mas vc pode 
usar qualquer tecla que sejejar
 VK_DOWN, VK_RETURN : Direction := 0; {Next}
 VK_UP : Direction := 1; {Previous}
   end;
   if Direction <> -1 then
   begin
 Perform(WM_NEXTDLGCTL, Direction, 0) ;
 Key := 0;
   end;
end;

Paulo Cesar Rohleder escreveu:

> Por favor como faço para pular entres os campos com as setas( frente, 
> tras, direita esquerda)
> preciso saber como faço esta implemtação..alguém tem um exemplo???
>
>
> ---
> avast! Antivirus: Outbound message clean.
> Virus Database (VPS): 0525-3, 23/06/2005
> Tested on: 23/6/2005 10:38:11
> avast! - copyright (c) 1988-2005 ALWIL Software.
> http://www.avast.com
>
>
>
>
> [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 Termos do
>   Serviço do Yahoo! .
>
>



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

 




[delphi-br] pular campos com setas

2005-06-23 Por tôpico Paulo Cesar Rohleder
Por favor como faço para pular entres os campos com as setas( frente, tras, 
direita esquerda)
preciso saber como faço esta implemtação..alguém tem um exemplo???


---
avast! Antivirus: Outbound message clean.
Virus Database (VPS): 0525-3, 23/06/2005
Tested on: 23/6/2005 10:38:11
avast! - copyright (c) 1988-2005 ALWIL Software.
http://www.avast.com




[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