Статьи Королевства Дельфи


Решение


Для решения данной проблемы необходимо активировать автоматически обновление ActionList, для этого в DLL определим процедуру.

procedure ApplicationHM; begin Application.HandleMessage; Application.ProcessMessages; end;

укажем ее в операторе exports, что бы основное приложение могло его вызвать.

Вызываться данная процедура будет в тот момент, когда приложение становится в режим ожидания (событие OnIdle), например ожидание ввода данных от пользователя. Для этого в основной форме приложения определим процедуру

procedure TfrmMain.ApplicationIdle(Sender: TObject; var Done: Boolean); begin ApplicationHM; Application.ProcessMessages; end;

и в момент создания формы переопределим событие Application.OnIdle

procedure TfrmMain.FormCreate(Sender: TObject); begin Application.OnIdle := ApplicationIdle; end;

Скачать пример: (13K.)


Специально для






Начало  Назад  Вперед



Книжный магазин