dsnsubdp.pas

主要介绍超市管理系统的后台系统,后台程序是系统初始化和系统维护最常使用的一部分程序,主要任务是建产基本数据,进出货盘点和打印报表.后台程序主要负责的都是管理上的功能,当后台建立完整的数据后,前台才能顺

unit DsnSubDp;

// Runtime Design System Version 2.x   1998/06/08-
// Copyright Kazuhiro Sasaki 1997-1998.

interface

uses
  Windows, Classes, Forms, Controls, Messages, Dialogs, Graphics,
  DsnHandle, DsnSub8, DsnSubGr;

type
  TPaintCanvas = procedure(Sender:TObject; Canvas:TCanvas) of object;

  TDsnDpRegister = class(TDsnGrRegister)
  protected
    procedure CreateHandler;override;
  end;

  TMultiDpHandler = class(TMultiGrHandler)
  protected
    function CreateHandlerRect(Control:TControl):THandlerRect;override;
  end;

implementation

procedure TDsnDpRegister.CreateHandler;
begin
  FHandler:= TMultiDpHandler.Create;
end;

function TMultiDpHandler.CreateHandlerRect(Control:TControl):THandlerRect;
begin
  Result:= THandler8Rect.Create(Control,Size,CutSizeX,CutSizeY,PenWidth,ColorMulti,ColorSingle,Color);
end;

end.