Скачать: CL | DM;

COM-server в design-time не выгружается...   Найти похожие ветки 

← →
Wetnose   (2002-10-11 09:20) [0]

Создал на C# компонент, типа:


...

using System.Runtime.IntropService;

namespace Wetnose.Test
{
[Guid("...")]
public interface IMyIface
{
...
}

[Guid("...")]
public class MyClass : IMyIface
{
public MyClass()
{
// специально показываю форму, чтобы видеть,
// когда сервер загружен ...
new System.Windows.Forms.Form().Show();
}

...
}
}

всё собралось и зарегистрировалось.

Нарисовал компонет на Delphi (7), котрый юзает
данный сервак:


type
TMyClass = class(TComponent)
private
FServer: Variant;
...
published
property ServerName: String;
property Active: boolean read FActive write SetActive;
end;

...

procedure TMyClass.SetActive(Value: boolean);
begin
...

FServer := Unassigned;
if Value
then
FServer := CreateOleObject(ServerName);

...
end;


В дизайнере бросаю компонент на форму.
Задаю:

ServerName -> "Wetnose.Test.MyClass"
Active -> true

Сервер загружается (вижу форму, создаваемую сервером).

Active -> false

Форма сервера не исчезает!!!

Active -> true

Error: Параметр задан неверно!!!

Что не так? почему сервер не выгрузился?
Excel.Application, например, выгружается (гад)!

Что мене делать? Пока Delphi не закроешь, сервер работает!

---

← →
AndreyAG   (2002-10-11 10:20) [1]

Всё верно! если ты подгрузил компонент, то ты сразу его включил.
Предусмотри функцию включения сервера!

---

← →
Wetnose   (2002-10-11 11:26) [2]

А как выключить сервер? Как это обычно делают?

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: -0.986 c