delphi中的窗体怎么取得焦点

delphi中的窗体怎么取得焦点,第1张

例如:有form1、form2 两个窗体,form1中有两个按钮,
button2是显示form2并将焦点设置于edit3。  程序如下:
unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;
type
  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
var
  Form1: TForm1;
implementation
uses Unit2;
{$R dfm}
procedure TForm1Button1Click(Sender: TObject);
begin
    form1SetFocus;
end;
procedure TForm1Button2Click(Sender: TObject);
begin
    form2Show;
    //form2setfocus;
    form2Edit3SetFocus;
end;
end

以上就是关于delphi中的窗体怎么取得焦点全部的内容,包括:delphi中的窗体怎么取得焦点、、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/web/9378776.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-27
下一篇 2023-04-27

发表评论

登录后才能评论

评论列表(0条)

保存