Как передать фокус из DBEdit на SpeedButton, из DBMemo в DBEdit ?

← →
Denmin © (2004-11-25 10:03) [0]

Здравствуйте. Скажите пожалуйста, можно ли передать фокус из DBEdit на SpeedButton, а из DBMemo в DBEdit ?
Заранее благодарен.

← →
Denmin © (2004-11-25 10:05) [1]

забыл сказать, что обрабатываю событие onkeydown и по условию VK_RETURN или VK_DOWN должен срабатывать переход фокуса.

← →
icWasya © (2004-11-25 10:57) [2]

ну на SpeedButton нельзя однозначно а на всё остальное -

DBEdit1.SetFocus + F1

← →
zz 5 © (2004-11-25 11:01) [3]

TSpeedButton - не окно в понимании Windows, т.е. своего Handle он не имеет, поэтому на него нельзя передать фокус.
А вообще для передачи фокуса удобно пользоваться SelectNext + Расставить контролы в TabOrder

← →
Denmin © (2004-11-25 11:11) [4]

ладно со speedbutton нельзя. но так и с dbmemo не получается, расставил номера в taborder, по табу двигается, но вот по VK_DOWN не хочет из dbmemo выходить. selectnext тоже не помогает

← →
ЮЮ © (2004-11-25 11:27) [5]

у мемо в options есть TabWants

← →
Denmin © (2004-11-25 11:42) [6]

ни с WantsTab ни без него из dbmemo в dbedit никак не попасть

← →
zz 5 © (2004-11-25 12:19) [7]

А так попробуй:

procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_DOWN then
PostMessage(Edit1.Handle,WM_ACTIVATE,MakeLong(WA_CLICKACTIVE,0),Memo1.Handle)
end;

VK_DOWN это не выход из мемо, а перемещение вних.

-> Anatoly Podgoretsky
я конечно понимаю что это перемещение вниз, но юзерам не объяснишь.

-> zz 5
получилось.
спасибо.

У тебя какие то особенные пользователи, не такие как у других?

Как передать фокус из DBEdit на SpeedButton, из DBMemo в DBEdit ? Найти похожие ветки