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

Вниз

Не работают "горячие" клавиши в DLL   Найти похожие ветки 

← →
vtur ©   (2007-07-27 11:31) [0]

Здраствуйте, коллеги.

Я разрабатываю Delphi-приложение БД, которое должно работать с разными типами СУБД: Intebase (Firebird), Oracle, MS SQL2000/2005. Я поступил следующим образом: адаптировал приложение для каждой СУБД,  оформил их в виде соответствующих DLL-модулей и создал некое приложение, которое запускает нужный DLL-модуль.
Все работает замечательно, кроме одного: функции всплывающего меню нельзя вызвать при помощи назначенных им "горячих" клавиш, хотя в аналогичных ЕХЕ-шниках с этим вопросов нет.

Может кто-то подскажет, как решить данную проблему?

---

← →
Сергей М. ©   (2007-07-27 12:10) [1]

> функции всплывающего меню


Какое отношение всплывающее меню имеет к dll ?

---

← →
Lacmus ©   (2007-07-27 12:50) [2]

В dll передавать Application.Handle главного приложения,



library Project3;

uses
 SysUtils,
 Classes,
 Forms,
 Unit2 in "Unit2.pas" {Form2};

{$R *.res}

procedure Test(aHandle: Integer); stdcall;
begin
 Application.Handle := aHandle;
 TForm2.Create(Application).Show
end;

exports
 Test;

begin
end.


---

← →
Lacmus ©   (2007-07-27 12:50) [3]

В dll передавать Application.Handle главного приложения,



library Project3;

uses
 SysUtils,
 Classes,
 Forms,
 Unit2 in "Unit2.pas" {Form2};

{$R *.res}

procedure Test(aHandle: Integer); stdcall;
begin
 Application.Handle := aHandle;
 TForm2.Create(Application).Show
end;

exports
 Test;

begin
end.


---

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

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

Наверх

Память: 0.47 MB
Время: 0.016 c