Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.21;
Скачать: 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 вся ветка

Текущий архив: 2002.10.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.02 c
1-68757
AL2002
2002-10-09 19:23
2002.10.21
SaveDialog. Как убрать путь?


8-68875
RDS-Vic
2002-06-23 15:49
2002.10.21
Irfan View 3.70


14-69013
Эрик
2002-09-26 14:51
2002.10.21
У кого есть Delphi servise pack 2?


1-68815
Sabor
2002-10-09 20:31
2002.10.21
Stringgrid?


14-69008
Esu
2002-09-29 18:02
2002.10.21
Наши программисты!!