我在空间的keydown事件中写了
if Key = VK_RETURN then
PostMessage(Handle, WM_KEYDOWN, VK_TAB, 0);
if Key = VK_PRIOR then
PostMessage(Handle,WM_NEXTDLGCTL, 1,0);
为什么我回车或者pageup时,焦点为什么不向下转移或者向上转移。
我界面中有DBMemo要么就是在其他编辑框pageup时,全都跳到这个DBMemo中?
if Key = VK_RETURN then
PostMessage(Handle, WM_KEYDOWN, VK_TAB, 0);
if Key = VK_PRIOR then
PostMessage(Handle,WM_NEXTDLGCTL, 1,0);
为什么我回车或者pageup时,焦点为什么不向下转移或者向上转移。
我界面中有DBMemo要么就是在其他编辑框pageup时,全都跳到这个DBMemo中?
我界面中有DBMemo要么就是在其他编辑框pageup时,全都跳到这个DBMemo中?说说你需要什么功能??
if Key = VK_RETURN then
PostMessage(Handle, WM_KEYDOWN, VK_TAB, 0);
if Key = VK_PRIOR then
PostMessage(Handle,WM_NEXTDLGCTL, 1,0);
我也将From的privewKey属性设为True和False,可是不管在那个编辑框在按下"Page Down"键时,焦点老是跳到同一个地方就是DBMemo中。
procedure SelectNext(CurControl: TWinControl; GoForward, CheckTabStop: Boolean);procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key= VK_RETURN then
begin
SelectNext(ActiveControl,true,true);
end else if key = VK_PRIOR then
SelectNext(ActiveControl,false,true);
end;