名前
題名
▼ snail3さん > プレビュー 表示コンポーネント、利用させていただきありがとうございます。 > > ちょっと残念なのがキーボードで操作できないこと。 > いつものように勝手に修正してみました。 > > 最初 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;
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link