Delphi-Quellcode:
nit XPManifest1;
interface
uses
SysUtils, Classes, XPMan;
type
TXPManifest1 = class(TXPManifest)
private
{ Private-Deklarationen }
protected
{ Protected-Deklarationen }
public
{ Public-Deklarationen }
published
{ Published-Deklarationen }
end;
procedure Register;
implementation
procedure Register;
begin
RegisterComponents('Samples', [TXPManifest1]);
end;
end.
so habs endlich geschaft unter komponente... hättet ihr gleich gesagt