Einzelnen Beitrag anzeigen

Benutzerbild von toms
toms
(CodeLib-Manager)

Registriert seit: 10. Jun 2002
4.648 Beiträge
 
Delphi XE Professional
 
#5

Re: Unterschied einfache Taste - Tastenkombination

  Alt 12. Mär 2005, 17:53
So geht's bei mir:

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
  Mit Zitat antworten Zitat