Главная страница
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.023 c
6-68902
ec
2002-08-20 12:24
2002.10.21
Проверка имени пользователя и пароля


1-68849
Пончик
2002-10-10 13:32
2002.10.21
Компоненты


14-68987
Beglec
2002-09-28 21:54
2002.10.21
Где можно СКАЧАТЬ Delphi 7.0


1-68768
arra
2002-10-11 16:34
2002.10.21
Как сделать и добавить Gif картинку в Делфи


1-68833
Николай Васильев
2002-10-10 12:31
2002.10.21
Привязать кнопку к правому нижнему углу формы