怎样屏蔽屏幕的焦点

Question

设置表单的activecontrol属性为一个你认为无关紧要的控件就可以了

Answer 1

把它的enable设定为false不就可以了吗，使问题太简单，还是太复杂，我都有些搞不清楚了。

Answer 2

试试这个,不要忘了加分和FAQ
procedure TForm1.DBEdit1Enter(Sender: TObject);
begin
    PostMessage(DBEdit1.handle,WM_KillFocus,0,0);
end;

Answer 3

试试这个,不要忘了加分和FAQ
procedure TForm1.DBEdit1Enter(Sender: TObject);
begin
    PostMessage(DBEdit1.handle,WM_KillFocus,0,0);
end;

Answer 4

设置它的属性setfacous就可以了

Answer 5

if DBEdit1.Focused then
begin
  DBEdit1.Enabled:= False;
  DBEdit1.Enabled:= True;
end;

Answer 6

to:tmh2000(飞影) 
语句怎样写啊，我用form4.DBEdit5.SetFocus:=false;
但编译时说[Error] animalfees.pas(72): Left side cannot be assigned to，请问怎样解决。

Answer 7

我明白怎么回事了，是我的编程思想有问题，我只要像 whw123(令狐冲) 
说的那样做就行了，谢谢各位。