I do NOT WANT TO USE PACKAGES (BPL) only DLL.!!!!!

I do NOT WANT TO USE PACKAGES (BPL) only DLL.!!!!!
I made an application ,fairly complex over 10 years ago,to show all information
of a dfm file . components,properties and much more including editing and making a pas!! out of a dfm.
I am using alot whene i need to know the properties of a problematic dfm,so i can change its properties.
(The IDE some times reject the dfm!!).
Now to the point. I intend to publish the program. for that i want to make a DLL for programers, JvPlugin?
to publish component in Dll. at a time i was talled it is imposible to do it.I made a small test program+dll.
In the Dll
uses
  SysUtils,  LblEffct,  << this to register
  Classes,
  DllForm in 'DllForm.pas' {frmDllForm};<< just for testing not needed

function GetClass : TPersistentClass;
begin
  result := TLabelEffect;<<<<<<<< send component
end;
------------------------------------
 In the main test project i have

function GetMyClass:TPersistentClass;stdcall;external
'Project1dll.dll' name 'GetClass';

procedure TForm1.Button3Click(Sender: TObject);
var
  x:TPersistentClass;
  y:TClass;
begin
  x:= GetMyClass ;
 // x.ClassName <<<< i can see the name !! but

 // y:=x.ClassParent;
 //x.
 // RegisterClass(TPersistentClass(TComponentClass(x)));
  RegisterClass(TPersistentClass(x)); <<<<< this DOSE NOT WORK ERROR any better idea if posible
   y:=FindClass('TLabelEffect');
end;

As a matter of fact i want to get an ARRAY OF COMPONETS and use RegisterClasses.
Any Help?

Comments