WMKey

Question

Estou fazendo um componente lista o problema que to tentando resolver � que quando o componente tiver em foco e quando apertar as setas mover dentro do componente entre os registro da lista??

Alguem pode me ajudar??

Massuda · Answer

Imagino que �lista� seja um listbox... para trocar dois itens de posi��o dentro do listbox, fa�a...

// troca as posi��es dos dois primeiros itens do listbox
SeuListBox.Items.Exchange(0, 1);

Rud� · Answer

Descupe acho que n�o expliquei direito, estou criando um componente tipo um listbox, s� que eu to fazendo um personalizado para o que eu quero s� que eu to tentando resolver esse problema de usar as setas para mudar de registro, quero saber como detectar elas!

Massuda · Answer

No seu componente, sobreescreva o m�todo protegido DoKeyDown...

type
  TSeuListBox = class...
  ...
  protected
    procedure KeyDown(var Key: Word; Shift: TShiftState); override;
  ...


procedure TSeuListBox.KeyDown(var Key: Word; Shift: TShiftState);
begin
  // talvez tenha que verificar o valor de Shift!

  // exemplo de como tratar seta para cima/para baixo
  if Key = VK_UP then begin
    ... trata seta para cima...
    Key := #0; // descarta
  end
  else if Key = VK_DOWN then begin
    ... trata seta para baixo...
    Key := 0; // descarta
  end;

  inherited KeyDown(Key, Shift);
end;

Rud� · Answer

Fiz isso mas quando aperto alguma seta ele muda de componente e n�o executa nenhuma a��o no componente!...

Massuda · Answer

Qual � a classe pai do seu componente?...

Rud� · Answer

TCustomControl...

Rud� · Answer

Alguem?...

Massuda · Answer

Como est� o KeyPreview do seu form? Voc� tem algum tratamento especial de teclas no seu form?...

Rud� · Answer

O KeyPreview est� falseN�o tem nenhum tratamento!...

Massuda · Answer

O comportamento que voc� descreveu (seta para cima/para baixo muda de componente) s� � poss�vel se tiver algo no form interceptando e tratando as teclas antes dos componentes....

Rud� · Answer

Criei um novo projeto e coloque dois botoes depois rode se vc apertar qualquer tecla ele vai mudar o foco entre os botoes!...

F�rum WMKey #322812