Why would anyone make an empty Register procedure?

[Jan Doggen]

Hi, I found this (parts left out). The Register procedure is empty. Why is
it in there?
Thanks
Jan

unit PageControlExu;
{ This component removes the border at the pagecontrol(only when there are
one ore more tabs). }
interface

uses
Windows,Messages,Classes,CommCtrl,ComCtrls;

type
TPageControlEx=class(TPageControl)
private
{...}
protected
public
published
end;

procedure Register;

implementation

constructor TPageControlEx.Create(AOwner: TComponent);
begin
{...}
end;

procedure TPageControlEx.WndProc(var Message:TMessage);
begin
{...}
end;

procedure Register;
begin
end;

end.

========================================================================================
http://www.jandoggen.org http://www.beautyofpeople.com
http://www.puddingclub.nl

[David HAROUCHE]

Could have been from a code generator !

DH>

[Marc Rohloff [TeamB]]

On Thu, 8 May 2008 19:16:08 +0200, Jan Doggen wrote:

> Hi, I found this (parts left out). The Register procedure is empty. Why is
> it in there?

It looks like they deleted or moved the code inside (I assume to
register TPageControlEx) and never deleted the procedure.
You should be able to remove it.

--
Marc Rohloff [TeamB]
marc -at- marc rohloff -dot- com

[Jan Doggen]

Mmmm, yes, maybe they moved the RegisterComponents call. The code I'm
talking about is a mess of packages, design- and runtime mixed, "compile
with runtime packages" checked but then with all the original Delphi units
imported into a custom package so the Delphi bpls don't have to be
distributed, etc...

Jan

"Marc Rohloff [TeamB]" <ma...@nospam.marcrohloff.com> schreef in bericht
news:19mknshk...@dlg.marcrohloff.com...