Tabela Ascii (Resolvido)

[Tbaiano]

E ai massa beleza,

Como poderia fazer para quando fosse precionado PageUp e PageDown ele mudasse de registro.

Next e Prior no Banco de Dados...

Só que não sei o código na Tabela ASCII dessas duas Teclas se alguém souber...

Valeu...

Tbaiano

[Progr'amador]

Olá Tbaiano,

No OnKeyDown do form:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  case Key of
     33: Table1.Prior; //Page Up
     34: Table1.Next; //Page Down
  end;
end;

e na propriedade KeyPreview do form, coloque TRUE.

Abs. Progr'amador.

[Tbaiano]

Obrigado pela ajuda. Pode Fechar...

Tbaiano