datamodule.pas

来自「轴承表面质量缺陷识别与统计系统,基于DELPHI 7.0」· PAS 代码 · 共 27 行

unit datamodule;

interface

uses
  SysUtils, Classes, Graphics;
   //Windows, Classes, Forms, Controls, StdCtrls, ExtCtrls, Menus,
     // math,Messages, SysUtils, Variants,Dialogs, ExtDlgs, ComCtrls;
type
  TDataModule1 = class(TDataModule)
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  DataModule1: TDataModule1;
  mark1,mark2:boolean;
  loaderbmp:TBitmap ;
  withdrawbmp,ChangedBitmap:TBitmap;
implementation

{$R *.dfm}

end.