untvcomputeroutaccessory.pas

来自「销售软件」· PAS 代码 · 共 24 行

unit untVComputerOutAccessory;

interface

uses
  SysUtils,
  ADODB_TLB,
  JCAMTableView;

const
  VN_COMPUTEROUTACCESSORY = 'v_ComputerOutAccessory';
  KFN_COMPUTEROUTACCESSORY = 'OutAccessory_ID';

type
  TViewComputerOutAccessory = class( TCustomTableView )
  private
  public
    property Connection;
  end;

implementation

end.