Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.44 MB
Время: 0.042 c
15-1184662575
Vlad Oshin
2007-07-17 12:56
2007.08.19
подскажите с разряженными матрицами или что иное


1-1181652993
Tab
2007-06-12 16:56
2007.08.19
координаты x и y при начале Drag n Drop


2-1185515794
click
2007-07-27 09:56
2007.08.19
FindFirst_FindNext & Filter


15-1184932058
EGFEFG
2007-07-20 15:47
2007.08.19
Почему компьютер трещит!


15-1184888238
Чаво
2007-07-20 03:37
2007.08.19
Как принудительно обновить курсор?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский