在delphi中如何用代码让光标处于stringgrid的单元格中
展开全部
在form1的create或show或active代码中加入以下语句:
stringgrid1.TabOrder:=0;
或者:
stringgrid1.SetFocus;
(这个语句的作用是说在进入你的form1窗体时,最先获得焦点的是stringgrid1)
示例:
procedure TForm1.FormCreate(Sender: TObject);
begin
edit8.TabOrder:=0;
//stringgrid1.TabOrder:=0;
end;
procedure TForm1.FormShow(Sender: TObject);
begin
stringgrid1.SetFocus;
end;
procedure TForm1.FormActivate(Sender: TObject);
begin
stringgrid1.SetFocus;
end;
stringgrid1.TabOrder:=0;
或者:
stringgrid1.SetFocus;
(这个语句的作用是说在进入你的form1窗体时,最先获得焦点的是stringgrid1)
示例:
procedure TForm1.FormCreate(Sender: TObject);
begin
edit8.TabOrder:=0;
//stringgrid1.TabOrder:=0;
end;
procedure TForm1.FormShow(Sender: TObject);
begin
stringgrid1.SetFocus;
end;
procedure TForm1.FormActivate(Sender: TObject);
begin
stringgrid1.SetFocus;
end;
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询