📄 u3_5_1.pas
字号:
unit U3_5_1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, Buttons;
type
TFzd = class(TForm)
Pzz: TPanel;
Lbzz: TLabel;
Pkm: TPanel;
Lbkm: TLabel;
Edkm: TEdit;
Lbks: TLabel;
Lbkl: TLabel;
CBkl: TComboBox;
LBjs: TLabel;
EDtime2: TEdit;
Pxf: TPanel;
P1: TPanel;
Pfw: TPanel;
Lbxd: TLabel;
Edxd: TEdit;
Lbxz: TLabel;
Edxz: TEdit;
Lbkd: TLabel;
Edkd: TEdit;
Lbfl: TLabel;
Cbfl: TComboBox;
Lb: TLabel;
Cbfj: TComboBox;
Lbfw: TLabel;
LBfj: TLabel;
Edfw: TEdit;
Edfj: TEdit;
Lfe: TLabel;
Lbje: TLabel;
Edfe: TEdit;
Edje: TEdit;
Lbzk: TLabel;
Cbzk: TComboBox;
Lbzl: TLabel;
Edzl: TEdit;
Lbzj: TLabel;
Edzj: TEdit;
Lbyh: TLabel;
Edyh: TEdit;
Lbql: TLabel;
Edql: TEdit;
Lbys: TLabel;
Edit1: TEdit;
Lbjy: TLabel;
Edjy: TEdit;
Lbbz: TLabel;
Edbz: TEdit;
Gbqz: TGroupBox;
Label1: TLabel;
Edgz: TEdit;
Lbdf: TLabel;
Eddf: TEdit;
Lbyy: TLabel;
Edyy: TEdit;
SBok: TSpeedButton;
SBqx: TSpeedButton;
SBfh: TSpeedButton;
EDtime1: TEdit;
private
{ Private declarations }
public
{ Public declarations }
end;
var
Fzd: TFzd;
implementation
{$R *.dfm}
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -