Thema
:
Delphi
Unterschied einfache Taste - Tastenkombination
Einzelnen Beitrag anzeigen
toms
(CodeLib-Manager)
Registriert seit: 10. Jun 2002
4.648 Beiträge
Delphi XE Professional
#
5
Re: Unterschied einfache Taste - Tastenkombination
12. Mär 2005, 18:53
So geht's bei mir:
zusammenfalten
·
markieren
Delphi-Quellcode:
procedure
Memo1KeyDown(Sender: TObject;
var
Key: Word;
Shift: TShiftState);
begin
if
(key = 17)
or
((key = vk_prior)
and
(shift = [ssSHIFT] ))
then
begin
PageControl1.ActivePageIndex:=1;
if
memo2.CanFocus
then
memo2.SetFocus;
key := $0;
end
;
end
;
Thomas
Zitat
toms
Öffentliches Profil ansehen
Mehr Beiträge von toms finden