MouseEnter and MouseLeave on a DLL form
Posted on 2003-11-13
Hello every one. This is my first question here on this site which btw seems like a blast.
I have this form on a dll (IRForm), and when I show it, I can't get the MouseEnter and MouseLeave events on my labels in the DLLForm.
I call it like this on my main form:
ShowDllIRForm(MainForm.Handle).ParentWindow := MainPanel.Handle;
And the ShowDllIRForm in my dll looks like this
function ShowDllIRForm(hApp: THandle): TCustomForm; stdcall;
Application.Handle := hApp;
if not assigned(IRForm) then
IRForm := TIRForm.Create(Application);
result := IRForm;
Like this, the MouseEvents won't work
procedure TIRForm.Label1MouseEnter(Sender: TObject);
label1.Font.Color := clBlue;
But if I switch the DLLForm call from 'show' to 'showmodal' I get those mouse-events. BUT, the DLLForm is docked on my mainform and on the mainform there is a menu which I can't get access to on showmodal.
How shall I solve this problem? Is there a way to get the mouse-events when you use 'show' and not 'showmodal'?
thanks in advance