VPF::Ошибка при вызове подсказки в DLL

Rakhim

Дата 31.1.2009, 18:32 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 49
Регистрация: 12.8.2004

Репутация: нет
Всего: нет

В есть Dll в которой вызывается форма.
Если навести мышкой на компонент не выходит подсказка (текст написанный в поле Hint)
Выходит следующая ошибка -
'Cannot assign a TFont to a TFont'

Вот код, может что-то еще нужно присвоить с главного приложения

Код


var
  Dll_Application: TApplication;
  Dll_Screen: TScreen;

function Get_Form_Class(Number_Form: Integer; MainApp: TApplication;
  MainScreen:TScreen): TAbstractClass;
begin
  // присвоение с главного приложения
  if not Assigned(Dll_Application) then
  begin
    Dll_Application := Application;
  end;

  if not Assigned(Dll_Screen) then
  begin
    Dll_Screen := Screen;
  end;

  Application := MainApp;
  Screen:= MainScreen;

  case Number_Form of
    1: Result:= TfmNavigator;
    2: Result:= TfmList_El_Dvig_Not_Kran;
   15: Result:= TfmSertifikat_Dvig;
  else
    Result:=nil;
  end; //case
end;

Rrader

Дата 31.1.2009, 18:49 (ссылка)

(голосов:1)

Загрузка ...

Inspired =)

Профиль
Группа: Экс. модератор
Сообщений: 1535
Регистрация: 7.5.2005

Репутация: 70
Всего: 191

Rakhim, передача объектов из приложения в DLL небезопасна. Вот закон Мерфи и выполнился.

Почитай тут, чудо шестое.

Пройди еще тест smile

Многое узнаешь smile

--------------------

Let's do this quickly!
Rest in peace, Vit!

Rakhim

Дата 1.2.2009, 10:59 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 49
Регистрация: 12.8.2004

Репутация: нет
Всего: нет

Rrader, спасибо

Я так понял что лучше перейти на BPL.

Не подскажете ссылка на ток как работать с BPL.
Как загружать и выгружать пакета?
Как вызывать функции?

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »