【delphi开源代码栏目提醒】:网学会员为需要delphi开源代码的朋友们搜集整理了EditDutyEmployeeForm.pas相关资料,希望对各位网友有所帮助!
unit EditDutyEmployeeForm;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TFrmEditDuty = class(TForm)
procedure FormClose(Sender: TObject; var Action: TCloseAction);
private
{ Private declarations }
public
{ Public declarations }
end;
var
FrmEditDuty: TFrmEditDuty;
implementation
{$R *.dfm}
procedure TFrmEditDuty.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
Action:=caFree;
end;
end.
上一篇:
EditCustomer.pas
下一篇:
法律专业开题报告范文