Jak przejść klawiszem Enter do następnego EditText?

0

nie wiem jak napisać to, ktoś pomoże?

1

Najprościej w OnKeyPress sprawdzasz czy to enter i jeżeli tak to wywołujesz:

SelectNext(ActiveControl,true,true);

Można też dodać dla formatki popupmenu, do popupmenu dodać menuitem w którym ustawić ShortCut - Enter zaś reakcja - jak wyżej.

object Form1: TForm1
  ...

  PopupMenu = PopupMenu1
  object PopupMenu1: TPopupMenu
    Left = 127
    Top = 154
    object MenuItem1: TMenuItem
      ShortCut = 13
      Visible = False
      OnClick = MenuItem1Click
    end
  end
end
0
_13th_Dragon napisał(a):

Najprościej w OnKeyPress sprawdzasz czy to enter i jeżeli tak to wywołujesz:

SelectNext(ActiveControl,true,true);

Można też dodać dla formatki popupmenu, do popupmenu dodać menuitem w którym ustawić ShortCut - Enter zaś reakcja - jak wyżej.

PopupMenu? Naprawdę? A do przechowywania stringa dodać memo z ustawionym Visible na False?
A wystarczy w google wpisać "delphi enter as tab" i przejrzeć wyniki...

0

do przechodzenia do następnej kontrolki służy Tab.

1 użytkowników online, w tym zalogowanych: 0, gości: 1