Форум: "Основная";
Текущий архив: 2003.10.20;
Скачать: [xml.tar.bz2];
Вниз
перемещение между TEdit ами по нажатию Enter Найти похожие ветки
← →
AndrewPo (2003-10-08 11:51) [0]Добрый день,
подскажите, как сделать, чтоб при нажатии Enter внутрях TEdit"а фокус перемещался к следующему по порядку TEdit"у?
← →
bon (2003-10-08 12:07) [1]на событие TEdit1
if key=13 then Edit2.SetFocus;
← →
ZEE (2003-10-08 12:13) [2]>bon (08.10.03 12:07) [1]
>на событие TEdit1
наверно на событие KeyDown или KeyUp ...
← →
bon (2003-10-08 12:21) [3]>ZEE © (08.10.03 12:13) [2]
>наверно на событие KeyDown или KeyUp ...
без разницы
← →
ZEE (2003-10-08 12:30) [4]> bon (08.10.03 12:21) [3]
> без разницы
без разницы - что?
"на событие TEdit1" - нет такого события
← →
bon (2003-10-08 12:37) [5]>ZEE © (08.10.03 12:30) [4]
>без разницы - что?
>"на событие TEdit1" - нет такого события
KeyDown или KeyUp ...
← →
Developerr (2003-10-08 13:05) [6]В событии OnKeyDown пишешь
SelectNext((Sender as TWinControl),true,true);
← →
Developerr (2003-10-08 13:07) [7]
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key=VK_RETURN then
SelectNext((Sender as TWinControl),true,true);
end;
← →
ZEE (2003-10-08 13:08) [8]>bon (08.10.03 12:21) [3]
>без разницы
+
>bon (08.10.03 12:37) [5]
>KeyDown или KeyUp ...
есть разница - по KeyDown будет бегать по всем эдитам пока не отпустишь клавишу, а по KeyUp - перепрыгнет только один раз при отпускании...
← →
AndrewPo (2003-10-08 16:53) [9]большое спасибо всем :)
Администрации: можете удалять эту ветку :)
← →
satron (2003-10-08 17:02) [10]все хорошо, только при нажатии Ентер в Едите винда издает звуки, ........не проблема конечно, но..... не красиво, как быть в этой ситуации ?????
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.10.20;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.007 c
