喫茶XRAY [Mr.XRAY掲示板]

プレビュー表示コンポーネント、利用させていただきありがとうございます。

ちょっと残念なのがキーボードで操作できないこと。
いつものように勝手に修正してみました。

最初 plPrev.pas のソースを一生懸命追っかけていましたが全然理解できず。
休憩して、冷えた桃を食べたら plPrevfrm.pas を見つけることが出来ました。

桃サイコー　(^_^)

//=============================================================================
//  Keyによって操作　　A 2012/07/31
//=============================================================================
procedure TplPrevForm.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Key = VK_F10 then
  begin
    if PrintBtn.Enabled = True then
      PrintBtnClick( Sender );
  end;
  if Key = VK_F9 then
    if CloseBtn.Enabled = True then
      CloseBtnClick( Sender );
  if Key = VK_HOME then
    if FirstPageBtn.Enabled = True then
      FirstPageBtnClick( Sender );
  if Key = VK_END then
    if LastPageBtn.Enabled = True then
      LastPageBtnClick( Sender );
  if Key = VK_PRIOR then
    if PriorPageBtn.Enabled = True then
      PriorPageBtnClick( Sender );
  if Key = VK_NEXT then
    if NextPageBtn.Enabled = True then
      NextPageBtnClick( Sender );
end;