[Delphi] Przechodzenie do nowej kontrolki

[Delphi] Przechodzenie do nowej kontrolki
0

Pisząc program przechodzę do nowej kontrolki np. tak :

procedure Edit.KeyPress;
begin
if Key := #13 then
Perform (WM_NextDlgCtl1,0,0);
end;

ale napisałem komponent Edit i w samym programie tego komponentu ten chwyt nie działa!
Jak pisząc nowy komponent można przejść klawiszem ENTER do następnej kontrolki :[

Dryobates
  • Rejestracja:prawie 23 lata
  • Ostatnio:około 6 lat
0

A nie łatwiej użyć TForm.FocusControl i TForm.ActiveControl?--Jest jeszcze jeden błąd ... :)

Apel: Piszcie w tematach o jaki język programowania chodzi np. : [Delphi], [C++], itp.

Pomoc do Delphi po polsku. http://www.4programmers.net/forum/index.php?action=show&id=21335&c=2

Oficjalny kanał IRC serwisu 4programers:
serwer: warszawa.ircnet.pl sieć: POLNet kanał: #4programmers.net


Jest jeszcze jeden błąd :)
Unix is user friendly. It's just very particular about who it's friends are.
Johny_Morfina
  • Rejestracja:ponad 22 lata
  • Ostatnio:około 5 lat
  • Postów:448
0

form1.activecontrol := form1.findnextcontrol((sender as Twincontrol),true,false,false);


Misiekd
  • Rejestracja:ponad 21 lat
  • Ostatnio:ponad 12 lat
  • Postów:7923
0

Wiecie, Borland o tym pomyślał :)

Kopiuj
Form1.SelectNext(Form1.ActiveControl, False, True);

a to do OnKeyDown formy i formie ustawić KeyPreview na True


- Ciemna druga strona jest.
- Nie marudź Yoda, tylko jedz tego tosta.
Google NIE GRYZIE!
Pomogłem - kliknij

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.