u_form_filemanage.pas

来自「这是delphi7.0开发的人力资源培训考核软件」· PAS 代码 · 共 35 行

unit U_Form_FileManage;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, WinSkinStore, WinSkinData;

type
  TForm_FileManage = class(TForm)
    SkinData1: TSkinData;
    SkinStore1: TSkinStore;
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form_FileManage: TForm_FileManage;

  ////////////////////////////////////////////
implementation

{$R *.dfm}

  /////////////////////////////////////
procedure TForm_FileManage.FormCreate(Sender: TObject);
begin
    showmessage('aaaaaaaaaaaaaaaaaaaaaa');
end;

end.