I tried to make dll or package with some TMyControl (wich use QForms) & i'd like to use this "library" dinamically (for creating this controls inside it).
The problem is:
- Dll inititialization failed: "Can't create TApplication object in library" (why not?)
- Package initialize withour errors, but TMyControl not created correct (if i write: MyControl.Parent:=Panel1 it's not apear on panel)

please check if i make error somewhere

=========== package code ====
unit AAA; // package use it

TMyControl=class(TControl)
end;

function MyControlInPackage(AOwner: TComponent): TControl; cdecl;
begin
result:=TMyControl.Create(AOwner);
result.ParentFont:=False; // without this parent can't be chenged ??
end;

exports
MyControlInPackage;

==========================

============ application code ===

function MyControlInPackage(AOwner: TComponent): TControl; cdecl; external "package.bpl";


function TForm1.Button1Click(...);
var f: TControl;
begin
f:=MyControlInPackage(Self);
f.Parent:=Panel1;
end;

c Dll не получиться потому как используешь QForms, остается только package.
попробуй:

function TForm1.Button1Click(...);
var f: TControl;
begin
f:=MyControlInPackage(Panel1);
end;

function MyControlInPackage(AOwner: TComponent): TControl; cdecl;
begin
result:=TMyControl.Create(AOwner);
result.Parent := AOwner;
result.ParentFont:=False;
end;

А чего у Вас в Uses написано?

Vit а почему заинтересовал uses? по моему проблема в том что обработчик TMyControl.SetParentFont при FParent = nil ругается, конечно не плохо было бы взглянуть на него, но в ошибке вороде бы речь об этом...

Цитата(eof @ 10.6.2003, 00:35)

Vit а почему заинтересовал uses? по моему проблема в том что обработчик TMyControl.SetParentFont при FParent = nil ругается, конечно не плохо было бы взглянуть на него, но в ошибке вороде бы речь об этом...

Чтобы убедится что не мешаются объекты CLX и VCL