[Bulbo]

Перерыл Google, форумы и т.д.

Проблема в создании компонентов из DLL.

Создаю форму из длл примерно так:

PHP код:

function CreateTheForm: Pointer;
begin
 Result := TForm1.Create(nil);
end;

function ShowTheForm(P: Pointer): Boolean;
const
  mrOK = 1;
begin

  Result := TForm1(P).ShowModal = mrOK;
end;

 
ShowTheForm(CreateTheForm); 


Вроде все тип топ "Создалась, проявилась"...

создаю компонент где то так:

PHP код:

CoInitializeEx(nil,COINIT_APARTMENTTHREADED);
RdpDoc.Rdp:= TMsRdpClient3.Create(Form1);
RdpDoc.Rdp.Parent:=  Form1;
RdpDoc.Rdp.Left:=10;
RdpDoc.Rdp.Top:=10;
RdpDoc.Rdp.Visible:=True;
RdpDoc.Rdp.Tag:=0;
RdpDoc.Rdp.Server:='192.168.1.1';
RdpDoc.rdp.UserName:='111';
RdpDoc.rdp.AdvancedSettings4.Set_ClearTextPassword('111');
RdpDoc.rdp.Connect; 


в ЕХЕ все отлично а вот в длл как то не получилось.... (Форма виснет при создание RDP компонента).

Если в длл вызвать форму так:

PHP код:

Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run; 


то компонент RDP создаеться но при попытки вызова функции Connect виснет аналогочно первому варианту.

Перечитал все, видел такую же проблему и с TWebBrowser...

По теме нашел: http://www.sql.ru/forum/actualthread.aspx?tid=106803

у парня таже проблема ну думаю это не из за самого компонента, есть какой то подводный камень в этой жуткой мути...


Задача: Адекватно работать с компонентами из DLL. Накидайте ссылок, может кто то тоже сталкивался с этим. Заранее спасибо.

[Aristarh Dark]

Батенька, хотите адекватно работать с компонентами из DLL - эзайте COM (у Тенцера есть отличная книжка).

[Bulbo]

Сообщение от Aristarh Dark

Батенька, хотите адекватно работать с компонентами из DLL - эзайте COM (у Тенцера есть отличная книжка).

Уважаемый модератор форума delphisources.ru очень признателен вам за помощь. Но только если бы я хотел почитать книжку много уважаемого Тенцера я наверно прочитал бы ее без обращения к вашему форуму.

Ну и по скольку вы так настоичиво советуете ее прочитать я думаю она вам очень понравилась, и вы все поняли по вопросу интерфесов COM, ну и конечно можете с удовольствием нам смертым новичкам расказать как это все красиво сделать. Я думаю форумы именно для этого и создаються? ну что бы люди помогали друг другу! или это рекламный проект дяди Тенцера по продажи его полиграфической продукции?

Покажите пример кода создания TForm из DLL а так же создание в ней TWebBrowser и вызов события navigate.



П.С. Очень признателен что модераторы форума первыми откликнулись на мой весьма не легкие вопросы, надеюсь на их проффесионализм....