[droguerman]

añades tu archivo pas tanto al programa como a la dll

en tu dll creas la siguiente funcion


function devolverMiClase : longint
begin
result longint(TMiClases.create);
end;

en tu programa vuelves a hacer el casting

function obtenerClase: TMiClase;
begin
result := TMiClase(devolverMiClase);
end;