F�rum Usar a tecla "ENTER" com a fun��o da tecla "TAB" no FastReport 3.0 #399117

13/04/2011

Bom dia,
Estou otimizando alguns relat�rios e queria implementar essa funcionalidade da tecla enter para pular os campos. Por�m no FastReport n�o posso usar o c�digo que uso em aplica��es delphi que seria:

Procedure Tform1.FormKeyPress(Sender: Tobject; var Key: Char);


If key = #13 then
Begin
  Key:= #0;
  Perform(Wm_NextDlgCtl,0,0);
end;


end;

No FastReport n�o consigo usar a fun��o Perform, ele n�o tem, pelo menos nessa vers�o. Gostaria de saber se algu�m j� passou por essa situa��o e conseguiu resolver.

Obrigado pela aten��o.

Dyego Almeida

Curtir t�pico

+ 0

Responder

Posts

13/04/2011

Rodrigo Mattos

amigo eu n�o sei se da certo, mas no evento OnKeyDown voc� faz assim:


procedure TfrmLisCidade.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  inherited;
  if Key = VK_RETURN then
    SelectNext(ActiveControl, True, True);
end;

Espero ter Ajudado.
http://mundodoprogramador.wordpress.com

Responder

Gostei + 0

13/04/2011

Dyego Almeida

Ent�o Rodrigo, n�o funcionou, ele n�o reconheceu a fun��o "SelectNext". Se tiver uma outra solu��o para apresentar agradeceria. Muito obrigado por ajudar.
Abra�o.

Responder

Gostei + 0

13/04/2011

Rodrigo Mattos

amigo em que evento voc� est� fazendo o c�digo?

Responder

Gostei + 0

13/04/2011

Dyego Almeida

No evento que voc� falou, "OnkeyDown" , segue abaixo o c�digo:

procedure DialogPage1OnKeyDown(Sender: TfrxComponent; var Key: Word; Shift: TShiftState);begin  inherited;  if Key = VK_RETURN then    SelectNext(ActiveControl, True, True);end;

O FastReport n�o identifica o inherited, e nem o SelectNext. Voc� mexe com essa ferramenta de relat�rios?

Abra�o.

Responder

Gostei + 0

13/04/2011

Rodrigo Mattos

n�o, eu n�o mexo com FastReport mas eu achei que ia funcionar trocar o tab pelo enter, eu vou dar uma pesquisada vou ver o que eu acho, qualquer coisa eu respondo aqui.

http://mundodoprogramador.wordpress.com

Responder

Gostei + 0

13/04/2011

Dyego Almeida

Beleza, obrigado pela ajuda.

Abra�o.

Responder

Gostei + 0

17/04/2013

Jos�

Obrigado pelo retorno, estou encerrando este t�pico.

Responder

Gostei + 0