tntjvdbother_register.pas

TntExUpdate 是 流行的 TntUnicodeControls控件的扩展包.包括很难找到的 TntJVCL 也在里面. TntSysUtils2.pas/TntSysUtilsEx.pa

unit TntJvDBOther_Register;

interface

procedure Register;

implementation

uses
  DesignIntf, Classes,
  TntVer, TntJvAbout,
  TntJvDBRecCountLabel, TntJvDBGridS;

procedure Register;
procedure RegH (CC: TClass);
begin
  RegisterPropertyEditor(TypeInfo(TAboutInfo), CC, 'About', TAboutTntJv);
end;
begin
  RegisterComponents('Tnt Jv Data Controls', [
    TTntDBRecCountLabel,
    TTntJvDBGridS]);
  RegH (TTntDBRecCountLabel);
  RegH (TTntJvDBGridS);
end;

end.