How to - Register

unit Regapps;  {Register Components for WebHub Demos}

interface

uses Classes, DsgnIntf, 
tFish;  {tFish is the unit containing the class definitions}

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents( 'HT+', [ TFishApp, TFishSession]);     {palette, [classes]}
end;

end.