datamodule.pas

来自「数字图像模式识别工程软件设计第1章基于图像分析的黄豆质量评估系统」· 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;
  LoadedBmp:TBitmap ;
  withdrawbmp,ChangedBitmap:TBitmap;
implementation

{$R *.dfm}

end.